VandenBroeck and Keller, Equation (24)

Time bar (total: 4.3s)

start0.0ms (0%)

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

analyze177.0ms (4.2%)

Memory
-21.2MiB live, 207.4MiB allocated; 47ms collecting garbage
Algorithm
1×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.9%0.1%0%0%0%0
0%0%99.9%0.1%0%0%0%1
0%0%99.9%0.1%0%0%0%2
0%0%99.9%0.1%0%0%0%3
25%25%74.9%0.1%0%0%0%4
25%25%74.9%0.1%0%0%0%5
37.5%37.5%62.4%0.1%0%0%0%6
37.5%37.5%62.4%0.1%0%0%0%7
43.8%43.7%56.2%0.1%0%0%0%8
43.8%43.7%56.2%0.1%0%0%0%9
46.9%46.8%53.1%0.1%0%0%0%10
46.9%46.8%53.1%0.1%0%0%0%11
48.4%48.4%51.5%0.1%0%0%0%12
Compiler

Compiled 14 to 12 computations (14.3% saved)

sample1.6s (37.9%)

Memory
66.9MiB live, 1 506.8MiB allocated; 942ms collecting garbage
Samples
1.3s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 924.0ms
ival-neg: 309.0ms (33.4% of total)
ival-tan: 197.0ms (21.3% of total)
ival-sin: 177.0ms (19.1% of total)
ival-div: 135.0ms (14.6% of total)
ival-mult: 54.0ms (5.8% of total)
ival-add: 41.0ms (4.4% of total)
exact: 7.0ms (0.8% of total)
ival-assert: 3.0ms (0.3% of total)
adjust: 2.0ms (0.2% of total)
Bogosity

explain180.0ms (4.2%)

Memory
-33.2MiB live, 182.8MiB allocated; 27ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
00-0-#s(literal 1 binary64)
00-0-(*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))
00-0-(neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B))))
00-0-(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
00-0-(/.f64 #s(literal 1 binary64) (sin.f64 B))
00-0-(/.f64 #s(literal 1 binary64) (tan.f64 B))
00-0-(tan.f64 B)
00-0-B
00-0-(sin.f64 B)
00-0-x
Confusion
Predicted +Predicted -
+00
-0256
Precision
0/0
Recall
0/0
Confusion?
Predicted +Predicted MaybePredicted -
+000
-00256
Precision?
0/0
Recall?
0/0
Freqs
test
numberfreq
0256
Total Confusion?
Predicted +Predicted MaybePredicted -
+000
-001
Precision?
0/0
Recall?
0/0
Samples
57.0ms512×0valid
Compiler

Compiled 96 to 34 computations (64.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 41.0ms
ival-tan: 13.0ms (32% of total)
ival-sin: 12.0ms (29.5% of total)
ival-div: 7.0ms (17.2% of total)
ival-mult: 3.0ms (7.4% of total)
ival-add: 2.0ms (4.9% of total)
ival-neg: 2.0ms (4.9% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

preprocess262.0ms (6.2%)

Memory
1.9MiB live, 191.3MiB allocated; 20ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
03177
17555
217354
334654
4122654
5600554
01012
01712
1309
2599
31239
44789
518889
662059
080719
Stop Event
1×iter limit
1×node limit
1×iter limit
1×node limit
Calls
Call 1
Inputs
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
Outputs
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (tan.f64 B)) x) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
Symmetry

(negabs B)

Compiler

Compiled 12 to 10 computations (16.7% saved)

eval0.0ms (0%)

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

Compiled 0 to 2 computations (-∞% saved)

prune0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶99.8%
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
Compiler

Compiled 12 to 10 computations (16.7% saved)

series16.0ms (0.4%)

Memory
20.7MiB live, 20.7MiB allocated; 0ms collecting garbage
Counts
10 → 42
Calls
Call 1
Inputs
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B))))
(*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))
x
(/.f64 #s(literal 1 binary64) (tan.f64 B))
#s(literal 1 binary64)
(tan.f64 B)
B
(/.f64 #s(literal 1 binary64) (sin.f64 B))
(sin.f64 B)
Outputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ 31/15120 (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ x B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (tan B) #s(hole binary64 B))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* 1/3 (pow B 2))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* 2/15 (pow B 2))))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 2/15 (* 17/315 (pow B 2))))))))))
#s(approx B #s(hole binary64 B))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (sin B) #s(hole binary64 B))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* -1/6 (pow B 2))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* 1/120 (pow B 2)) 1/6))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/120 (* -1/5040 (pow B 2)))) 1/6))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (tan B) #s(hole binary64 (/ (sin B) (cos B))))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (sin B) #s(hole binary64 (sin B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx x #s(hole binary64 x))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
Calls

6 calls:

TimeVariablePointExpression
4.0ms
x
@inf
((+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (/ 1 (sin B)) (sin B))
3.0ms
B
@inf
((+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (/ 1 (sin B)) (sin B))
2.0ms
B
@-inf
((+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (/ 1 (sin B)) (sin B))
2.0ms
B
@0
((+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (/ 1 (sin B)) (sin B))
2.0ms
x
@-inf
((+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) x (/ 1 (tan B)) 1 (tan B) B (/ 1 (sin B)) (sin B))

rewrite204.0ms (4.8%)

Memory
21.9MiB live, 245.5MiB allocated; 36ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0223892
0235831
11365823
08222774
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
52 → 89
Calls
Call 1
Inputs
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B))))
(*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))
x
(/.f64 #s(literal 1 binary64) (tan.f64 B))
#s(literal 1 binary64)
(tan.f64 B)
B
(/.f64 #s(literal 1 binary64) (sin.f64 B))
(sin.f64 B)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ 31/15120 (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ x B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (tan B) #s(hole binary64 B))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* 1/3 (pow B 2))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* 2/15 (pow B 2))))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 2/15 (* 17/315 (pow B 2))))))))))
#s(approx B #s(hole binary64 B))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (sin B) #s(hole binary64 B))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* -1/6 (pow B 2))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* 1/120 (pow B 2)) 1/6))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/120 (* -1/5040 (pow B 2)))) 1/6))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (tan B) #s(hole binary64 (/ (sin B) (cos B))))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (sin B) #s(hole binary64 (sin B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx x #s(hole binary64 x))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
Outputs
(/.f64 (-.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x))) (-.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))))
(/.f64 (fma.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (*.f64 (pow.f64 (neg.f64 x) #s(literal 3 binary64)) (pow.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64)))) (fma.f64 (neg.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (neg.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (-.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)))) (neg.f64 (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (neg.f64 x) #s(literal 3 binary64)) (pow.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (-.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64))) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(/.f64 (fma.f64 (pow.f64 (neg.f64 x) #s(literal 3 binary64)) (pow.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (-.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(fma.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(fma.f64 x (neg.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(+.f64 (/.f64 (*.f64 (pow.f64 (neg.f64 x) #s(literal 3 binary64)) (pow.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (-.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (-.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))))
(+.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))))
(+.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(*.f64 x (neg.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64))))
(neg.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)
(*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(/.f64 (neg.f64 (*.f64 x #s(literal 1 binary64))) (neg.f64 (tan.f64 B)))
(/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))
x
(pow.f64 (tan.f64 B) #s(literal -1 binary64))
(/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (cos.f64 B) (cos.f64 (+.f64 (neg.f64 B) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (tan.f64 B)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (tan.f64 B))))
(/.f64 #s(literal 1 binary64) (pow.f64 (tan.f64 B) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (tan.f64 B))
(tan.f64 (+.f64 (+.f64 (neg.f64 B) (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64)))
(tan.f64 (+.f64 (neg.f64 (+.f64 B (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(tan.f64 (+.f64 (neg.f64 B) (/.f64 (PI.f64) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (tan.f64 B)) #s(literal -1 binary64)))
#s(literal 1 binary64)
(/.f64 (neg.f64 (neg.f64 (sin.f64 B))) (neg.f64 (neg.f64 (cos.f64 B))))
(/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))
(/.f64 (neg.f64 (sin.f64 B)) (neg.f64 (cos.f64 B)))
(/.f64 (sin.f64 B) (cos.f64 B))
(tan.f64 (+.f64 (+.f64 B (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 B (PI.f64)))
(tan.f64 B)
B
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 B)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sin.f64 B))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 B) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sin.f64 B))
(exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64)))
(sin.f64 B)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (/.f64 (-.f64 #s(literal 1 binary64) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (/.f64 (-.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) x #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) x) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (/.f64 (-.f64 (*.f64 (fma.f64 (+.f64 (fma.f64 #s(literal 1/3 binary64) x #s(literal 1/6 binary64)) (*.f64 (fma.f64 x #s(literal 1/45 binary64) #s(literal 7/360 binary64)) (*.f64 B B))) (*.f64 B B) #s(literal 1 binary64)) (neg.f64 B)) (*.f64 B (neg.f64 x))) (*.f64 B (neg.f64 B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (/.f64 (-.f64 (*.f64 (fma.f64 (+.f64 (fma.f64 #s(literal 1/3 binary64) x #s(literal 1/6 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal -1/9 binary64) x)) (fma.f64 (+.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (*.f64 x #s(literal 1/105 binary64))) #s(literal 31/15120 binary64)) (*.f64 B B) (*.f64 #s(literal 2/15 binary64) x))) (*.f64 B B))) (*.f64 B B) #s(literal 1 binary64)) (neg.f64 B)) (*.f64 B (neg.f64 x))) (*.f64 B (neg.f64 B))))
#s(approx (neg (* x (/ 1 (tan B)))) (*.f64 (/.f64 x B) #s(literal -1 binary64)))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 B B) x) #s(literal 1/3 binary64)) x) B))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 x #s(literal 1/45 binary64)) (*.f64 B B) (*.f64 #s(literal 1/3 binary64) x)) (*.f64 B B)) (neg.f64 B)) (*.f64 B (neg.f64 x))) (*.f64 B (neg.f64 B))))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (+.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (*.f64 x #s(literal 1/105 binary64))) (*.f64 B B) (*.f64 #s(literal 2/15 binary64) x)) (*.f64 #s(literal -1/9 binary64) x)) (*.f64 B B) (*.f64 #s(literal 1/3 binary64) x)) (*.f64 B B)) (neg.f64 B)) (*.f64 B (neg.f64 x))) (*.f64 B (neg.f64 B))))
#s(approx (* x (/ 1 (tan B))) (/.f64 x B))
#s(approx (* x (/ 1 (tan B))) (/.f64 (fma.f64 (*.f64 (*.f64 B B) x) #s(literal -1/3 binary64) x) B))
#s(approx (* x (/ 1 (tan B))) (/.f64 (fma.f64 (neg.f64 x) B (*.f64 (neg.f64 B) (*.f64 (fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 B B)) (*.f64 x #s(literal 1/45 binary64)) (*.f64 #s(literal -1/3 binary64) x)) (*.f64 B B)))) (*.f64 (neg.f64 B) B)))
#s(approx (* x (/ 1 (tan B))) (/.f64 (fma.f64 (neg.f64 x) B (*.f64 (neg.f64 B) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 B B)) (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (*.f64 x #s(literal 1/105 binary64)))) (*.f64 x #s(literal 1/45 binary64))) (*.f64 B B) (*.f64 #s(literal -1/3 binary64) x)) (*.f64 B B)))) (*.f64 (neg.f64 B) B)))
#s(approx (/ 1 (tan B)) (pow.f64 B #s(literal -1 binary64)))
#s(approx (/ 1 (tan B)) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (/ 1 (tan B)) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (/ 1 (tan B)) (/.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -2/945 binary64) (*.f64 B B)) #s(literal 1/45 binary64)) (*.f64 B B)) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (tan B) B)
#s(approx (tan B) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (tan B) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 B B) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (tan B) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 B B) #s(literal 2/15 binary64)) (*.f64 B B) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx B B)
#s(approx (/ 1 (sin B)) (pow.f64 B #s(literal -1 binary64)))
#s(approx (/ 1 (sin B)) (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (/ 1 (sin B)) (/.f64 (fma.f64 (fma.f64 #s(literal 7/360 binary64) (*.f64 B B) #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (/ 1 (sin B)) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 31/15120 binary64) (*.f64 B B) #s(literal 7/360 binary64)) (*.f64 B B) #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (sin B) B)
#s(approx (sin B) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (sin B) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (sin B) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 B B) #s(literal 1/120 binary64)) (*.f64 B B)) #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (neg (* x (/ 1 (tan B)))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (* x (/ 1 (tan B))) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B)))
#s(approx (/ 1 (tan B)) (/.f64 (cos.f64 B) (sin.f64 B)))
#s(approx (tan B) (tan.f64 B))
#s(approx (/ 1 (sin B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (sin B) (sin.f64 B))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x) #s(literal 1 binary64)) (sin.f64 B)))
#s(approx x x)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (*.f64 #s(literal -1 binary64) x) (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)))))

eval19.0ms (0.4%)

Memory
-31.9MiB live, 32.7MiB allocated; 10ms collecting garbage
Compiler

Compiled 2 054 to 447 computations (78.2% saved)

prune33.0ms (0.8%)

Memory
-20.0MiB live, 70.6MiB allocated; 11ms collecting garbage
Pruning

7 alts after pruning (7 fresh and 0 done)

PrunedKeptTotal
New85792
Fresh000
Picked101
Done000
Total86793
Accuracy
100.0%
Counts
93 → 7
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.8%
(fma.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
47.8%
(/.f64 (fma.f64 (pow.f64 (neg.f64 x) #s(literal 3 binary64)) (pow.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (-.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
▶57.2%
(-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
▶99.8%
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
▶80.3%
(+.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
▶68.0%
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))))
▶86.0%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
Compiler

Compiled 374 to 218 computations (41.7% saved)

series208.0ms (4.9%)

Memory
15.2MiB live, 200.6MiB allocated; 40ms collecting garbage
Counts
49 → 260
Calls
Call 1
Inputs
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B)))
(/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))
(*.f64 x #s(literal 1 binary64))
x
#s(literal 1 binary64)
(tan.f64 B)
B
(/.f64 #s(literal 1 binary64) (sin.f64 B))
(sin.f64 B)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x)
(-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))
(pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))
(*.f64 (sin.f64 B) x)
#s(literal -1 binary64)
(/.f64 (cos.f64 B) (sin.f64 B))
(cos.f64 B)
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))))
(neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B))))
(*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))
(/.f64 #s(literal 1 binary64) (tan.f64 B))
(exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64)))
(*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))
(log.f64 (sin.f64 B))
(+.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(neg.f64 (tan.f64 B))
(tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)
(pow.f64 (tan.f64 B) #s(literal -1 binary64))
(-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(neg.f64 x)
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 B) #s(literal 2 binary64))
Outputs
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (* 1/3 x)))) x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ 31/15120 (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ x B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (tan B) #s(hole binary64 B))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* 1/3 (pow B 2))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* 2/15 (pow B 2))))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 2/15 (* 17/315 (pow B 2))))))))))
#s(approx B #s(hole binary64 B))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (sin B) #s(hole binary64 B))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* -1/6 (pow B 2))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* 1/120 (pow B 2)) 1/6))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/120 (* -1/5040 (pow B 2)))) 1/6))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ 31/15120 (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (/ (* x (- (/ 1 x) 1)) B)))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (/ (+ (* x (- (/ 1 x) 1)) (* (pow B 2) (* x (+ 1/3 (* 1/6 (/ 1 x)))))) B)))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (/ (+ (* x (- (/ 1 x) 1)) (* (pow B 2) (+ (* x (+ 1/3 (* 1/6 (/ 1 x)))) (* (pow B 2) (* x (+ 1/45 (* 7/360 (/ 1 x)))))))) B)))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (/ (+ (* x (- (/ 1 x) 1)) (* (pow B 2) (+ (* x (+ 1/3 (* 1/6 (/ 1 x)))) (* (pow B 2) (+ (* x (+ 1/45 (* 7/360 (/ 1 x)))) (* (pow B 2) (* x (+ 2/945 (* 31/15120 (/ 1 x)))))))))) B)))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) #s(hole binary64 (/ (- (/ 1 x) 1) B)))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 1/3 (* 1/6 (/ 1 x)))) (/ 1 x)) 1) B)))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 1/3 (+ (* 1/6 (/ 1 x)) (* (pow B 2) (+ 1/45 (* 7/360 (/ 1 x))))))) (/ 1 x)) 1) B)))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 1/3 (+ (* 1/6 (/ 1 x)) (* (pow B 2) (+ 1/45 (+ (* 7/360 (/ 1 x)) (* (pow B 2) (+ 2/945 (* 31/15120 (/ 1 x)))))))))) (/ 1 x)) 1) B)))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ 1 (* B x))))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ (+ (* 1/6 (/ (pow B 2) x)) (/ 1 x)) B)))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* 7/360 (/ (pow B 2) x)) (* 1/6 (/ 1 x)))) (/ 1 x)) B)))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* (pow B 2) (+ (* 31/15120 (/ (pow B 2) x)) (* 7/360 (/ 1 x)))) (* 1/6 (/ 1 x)))) (/ 1 x)) B)))
#s(approx (* (sin B) x) #s(hole binary64 (* B x)))
#s(approx (* (sin B) x) #s(hole binary64 (* B (+ x (* -1/6 (* (pow B 2) x))))))
#s(approx (* (sin B) x) #s(hole binary64 (* B (+ x (* (pow B 2) (+ (* -1/6 x) (* 1/120 (* (pow B 2) x))))))))
#s(approx (* (sin B) x) #s(hole binary64 (* B (+ x (* (pow B 2) (+ (* -1/6 x) (* (pow B 2) (+ (* -1/5040 (* (pow B 2) x)) (* 1/120 x)))))))))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (cos B) #s(hole binary64 1))
#s(approx (cos B) #s(hole binary64 (+ 1 (* -1/2 (pow B 2)))))
#s(approx (cos B) #s(hole binary64 (+ 1 (* (pow B 2) (- (* 1/24 (pow B 2)) 1/2)))))
#s(approx (cos B) #s(hole binary64 (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/24 (* -1/720 (pow B 2)))) 1/2)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ 31/15120 (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ x B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ 1 B)))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (* -1 (log B))))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (+ (* -1 (log B)) (* 1/6 (pow B 2)))))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (+ (* -1 (log B)) (* (pow B 2) (+ 1/6 (* 1/180 (pow B 2)))))))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (+ (* -1 (log B)) (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 1/180 (* 1/2835 (pow B 2)))))))))
#s(approx (log (sin B)) #s(hole binary64 (log B)))
#s(approx (log (sin B)) #s(hole binary64 (+ (log B) (* -1/6 (pow B 2)))))
#s(approx (log (sin B)) #s(hole binary64 (+ (log B) (* (pow B 2) (- (* -1/180 (pow B 2)) 1/6)))))
#s(approx (log (sin B)) #s(hole binary64 (+ (log B) (* (pow B 2) (- (* (pow B 2) (- (* -1/2835 (pow B 2)) 1/180)) 1/6)))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ 1 B)))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ (+ 1 (* -1 (/ (* B (* x (sin (* 1/2 (PI))))) (cos (* 1/2 (PI)))))) B)))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ (+ 1 (* B (- (* B (- (+ 1/6 (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2))) (* -1 x))) (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI))))))) B)))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ (+ 1 (* B (- (* B (- (+ 1/6 (+ (/ (* B (* (sin (* 1/2 (PI))) (- (* -1 x) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2))))) (cos (* 1/2 (PI)))) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (* -1 x))) (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI))))))) B)))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) #s(hole binary64 (* -1 (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) #s(hole binary64 (- (* B (- (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)) (* -1 x))) (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) #s(hole binary64 (- (* B (- (+ (/ (* B (* (sin (* 1/2 (PI))) (- (* -1 x) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2))))) (cos (* 1/2 (PI)))) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2))) (* -1 x))) (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) #s(hole binary64 (- (* B (- (+ (* B (+ (* B (- (+ (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1 x) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (pow (cos (* 1/2 (PI))) 2))) (* 1/3 (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (* -1/3 x))) (/ (* (sin (* 1/2 (PI))) (- (* -1 x) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (cos (* 1/2 (PI)))))) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2))) (* -1 x))) (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))))) #s(hole binary64 (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))))) #s(hole binary64 (+ (* B (- (* -1 x) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))))) #s(hole binary64 (+ (* B (- (+ (* -1 x) (* -1 (/ (* B (* (sin (* 1/2 (PI))) (- (* -1 x) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2))))) (cos (* 1/2 (PI)))))) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))))) #s(hole binary64 (+ (* B (- (+ (* -1 x) (* B (- (* B (- (* -1/3 x) (+ (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1 x) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (pow (cos (* 1/2 (PI))) 2))) (* 1/3 (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))))) (/ (* (sin (* 1/2 (PI))) (- (* -1 x) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (cos (* 1/2 (PI))))))) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) #s(hole binary64 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (* B (+ 1 (/ (pow (sin (* 1/2 (PI))) 2) (pow (cos (* 1/2 (PI))) 2))))) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) #s(hole binary64 (+ (* B (- (/ (* B (* (sin (* 1/2 (PI))) (+ 1 (/ (pow (sin (* 1/2 (PI))) 2) (pow (cos (* 1/2 (PI))) 2))))) (cos (* 1/2 (PI)))) (+ 1 (/ (pow (sin (* 1/2 (PI))) 2) (pow (cos (* 1/2 (PI))) 2))))) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) #s(hole binary64 (+ (* B (- (* B (- (* -1 (* B (+ 1/3 (+ (* 1/3 (/ (pow (sin (* 1/2 (PI))) 2) (pow (cos (* 1/2 (PI))) 2))) (/ (* (pow (sin (* 1/2 (PI))) 2) (+ 1 (/ (pow (sin (* 1/2 (PI))) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (cos (* 1/2 (PI))) 2)))))) (* -1 (/ (* (sin (* 1/2 (PI))) (+ 1 (/ (pow (sin (* 1/2 (PI))) 2) (pow (cos (* 1/2 (PI))) 2)))) (cos (* 1/2 (PI))))))) (+ 1 (/ (pow (sin (* 1/2 (PI))) 2) (pow (cos (* 1/2 (PI))) 2))))) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (+ (* -1 B) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (+ (* B (- (* -1/3 (pow B 2)) 1)) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (+ (* B (- (* (pow B 2) (- (* -2/15 (pow B 2)) 1/3)) 1)) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (neg (tan B)) #s(hole binary64 (* -1 B)))
#s(approx (neg (tan B)) #s(hole binary64 (* B (- (* -1/3 (pow B 2)) 1))))
#s(approx (neg (tan B)) #s(hole binary64 (* B (- (* (pow B 2) (- (* -2/15 (pow B 2)) 1/3)) 1))))
#s(approx (neg (tan B)) #s(hole binary64 (* B (- (* (pow B 2) (- (* (pow B 2) (- (* -17/315 (pow B 2)) 2/15)) 1/3)) 1))))
#s(approx (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) #s(hole binary64 1))
#s(approx (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) #s(hole binary64 (+ 1 (/ (* B (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) #s(hole binary64 (+ 1 (* B (- (* 1/3 (/ (* (pow B 2) (sin (* 1/2 (PI)))) (cos (* 1/2 (PI))))) (* -1 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))))))))
#s(approx (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) #s(hole binary64 (+ 1 (* B (- (* (pow B 2) (- (* 2/15 (/ (* (pow B 2) (sin (* 1/2 (PI)))) (cos (* 1/2 (PI))))) (* -1/3 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))))) (* -1 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))))))))
#s(approx (* (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (* -1 (/ (* B (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (* (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (* B (+ (* -1 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))) (* -1/3 (/ (* (pow B 2) (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))))
#s(approx (* (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (* B (+ (* -1 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))) (* (pow B 2) (+ (* -1/3 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))) (* -2/15 (/ (* (pow B 2) (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))))))
#s(approx (* (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (* B (+ (* -1 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))) (* (pow B 2) (+ (* -1/3 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))) (* (pow B 2) (+ (* -2/15 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))) (* -17/315 (/ (* (pow B 2) (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ (- (/ (pow x 2) (- (* -1 x) 1)) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (* 1/3 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))))) (/ (pow x 2) (- (* -1 x) 1))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* 1/3 (/ x (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))) (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))))))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))))) (/ (pow x 2) (- (* -1 x) 1))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* 1/3 (/ x (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (+ (* (pow B 2) (- (+ (* -1/3 (/ (+ (* -1/9 x) (* 2/15 x)) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (+ (* -1/9 x) (* 2/15 x)) 7/360) (pow (- (* -1 x) 1) 2))) (+ (* -2/45 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 17/315 (/ x (pow (- (* -1 x) 1) 2))) (+ (/ (* (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))) (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1/3 (- (* 1/3 x) 1/6)) (+ (* -1/9 x) (+ (* 2/45 (- (* -1 x) 1)) (* 2/15 x)))) 7/360) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1))) (+ (* -1 (/ (* (pow x 2) (* (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6))) (pow (- (* -1 x) 1) 3))) (+ (* 31/15120 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/315 (/ 1 (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (+ (* 17/315 x) (+ (* 62/315 (- (* -1 x) 1)) (+ (* 17/45 (- (* 1/3 x) 1/6)) (* 2/3 (- (+ (* -1/9 x) (* 2/15 x)) 7/360))))))) 31/15120)) (pow (- (* -1 x) 1) 2)))))))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))) (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))))))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))))) (/ (pow x 2) (- (* -1 x) 1))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (pow x 2) (* B (- (* -1 x) 1)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow B 2) (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6))) (pow (- (* -1 x) 1) 2))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1))) (+ (* -1 (/ (* (pow x 2) (* (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6))) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (+ (* 17/315 x) (+ (* 62/315 (- (* -1 x) 1)) (+ (* 17/45 (- (* 1/3 x) 1/6)) (* 2/3 (- (+ (* -1/9 x) (* 2/15 x)) 7/360))))))) 31/15120)) (pow (- (* -1 x) 1) 2)))))) (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (pow x 2) (pow B 2))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (+ (* -2/3 (* (pow B 2) (pow x 2))) (pow x 2)) (pow B 2))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2))))) (* 2/3 (pow x 2)))) (pow x 2)) (pow B 2))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -2/3 (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2)))) (+ (* -34/135 (pow x 2)) (* 62/315 (pow x 2)))))) (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2))))) (* 2/3 (pow x 2)))) (pow x 2)) (pow B 2))))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ x B)))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ 1 B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ (- (* -1 x) 1) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (* 1/3 x) 1/6))) 1) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (+ (* 1/3 x) (* (pow B 2) (- (+ (* -1/9 x) (* 2/15 x)) 7/360))) 1/6))) 1) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (+ (* 1/3 x) (* (pow B 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))) 31/15120)))) 7/360))) 1/6))) 1) B)))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (* -1 (/ x B))))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* 1/3 (* (pow B 2) x))) B)))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))))) B)))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x)))))))))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ 1 B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ 1 (* B (- (* -1 x) 1)))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (* (pow B 2) (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (* (pow B 2) (- (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (+ (* 31/15120 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/315 (/ 1 (- (* -1 x) 1)))) (+ (* -1/3 (/ (+ (* -1/9 x) (* 2/15 x)) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (+ (* -1/9 x) (* 2/15 x)) 7/360) (pow (- (* -1 x) 1) 2))) (+ (* -2/45 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 17/315 (/ x (pow (- (* -1 x) 1) 2))) (+ (/ (* (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))) (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1/3 (- (* 1/3 x) 1/6)) (+ (* -1/9 x) (+ (* 2/45 (- (* -1 x) 1)) (* 2/15 x)))) 7/360) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))))))) (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (pow (pow (sin B) 2) -1) #s(hole binary64 (/ 1 (pow B 2))))
#s(approx (pow (pow (sin B) 2) -1) #s(hole binary64 (/ (+ 1 (* 1/3 (pow B 2))) (pow B 2))))
#s(approx (pow (pow (sin B) 2) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/3 (* 1/15 (pow B 2))))) (pow B 2))))
#s(approx (pow (pow (sin B) 2) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 1/15 (* 2/189 (pow B 2))))))) (pow B 2))))
#s(approx (pow (sin B) 2) #s(hole binary64 (pow B 2)))
#s(approx (pow (sin B) 2) #s(hole binary64 (* (pow B 2) (+ 1 (* -1/3 (pow B 2))))))
#s(approx (pow (sin B) 2) #s(hole binary64 (* (pow B 2) (+ 1 (* (pow B 2) (- (* 2/45 (pow B 2)) 1/3))))))
#s(approx (pow (sin B) 2) #s(hole binary64 (* (pow B 2) (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 2/45 (* -1/315 (pow B 2)))) 1/3))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (tan B) #s(hole binary64 (/ (sin B) (cos B))))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (sin B) #s(hole binary64 (sin B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) #s(hole binary64 (- (/ 1 (* x (sin B))) (/ (cos B) (sin B)))))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ 1 (* x (sin B)))))
#s(approx (* (sin B) x) #s(hole binary64 (* x (sin B))))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (cos B) #s(hole binary64 (cos B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (* -1 (log (sin B)))))
#s(approx (log (sin B)) #s(hole binary64 (log (sin B))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI)))))))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) #s(hole binary64 (* -1 (/ (* x (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI)))))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))))) #s(hole binary64 (/ (* x (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI))))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) #s(hole binary64 (/ (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI))))))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))))
#s(approx (neg (tan B)) #s(hole binary64 (* -1 (/ (sin B) (cos B)))))
#s(approx (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) #s(hole binary64 (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI)))))))))
#s(approx (* (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI))))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (- (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2))))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (pow (pow (sin B) 2) -1) #s(hole binary64 (/ 1 (pow (sin B) 2))))
#s(approx (pow (sin B) 2) #s(hole binary64 (pow (sin B) 2)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (* x 1) #s(hole binary64 x))
#s(approx x #s(hole binary64 x))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) #s(hole binary64 (/ 1 (* x (sin B)))))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) x)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (+ (* x (- (/ (sin B) (* (cos B) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI))))))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI))))))))))) (/ 1 (sin B)))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) #s(hole binary64 (* x (- (/ (sin B) (* (cos B) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI))))))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI)))))))))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (+ (* x (+ (* -1 (/ (cos B) (sin B))) (* x (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (pow (cos B) 2) (sin B)))))) (/ 1 (sin B)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (* (pow x 2) (pow (cos B) 2)) (sin B)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (* x (pow (cos B) 3)) (sin B))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* x (- (* -1 (/ (* x (pow (cos B) 4)) (sin B))) (* -1 (/ (pow (cos B) 3) (sin B)))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* x (- (* x (- (/ (* x (pow (cos B) 5)) (sin B)) (/ (pow (cos B) 4) (sin B)))) (* -1 (/ (pow (cos B) 3) (sin B)))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ -1 (sin B))))
#s(approx (neg x) #s(hole binary64 (* -1 x)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (- (/ (* x (cos B)) (sin B)) (/ 1 (sin B)))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (- (* x (- (* -1 (/ (* x (pow (cos B) 2)) (sin B))) (* -1 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (- (* x (- (* x (- (/ (* x (pow (cos B) 3)) (sin B)) (/ (pow (cos B) 2) (sin B)))) (* -1 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) #s(hole binary64 (* -1 (/ (cos B) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (* x (- (/ (sin B) (* (cos B) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI))))))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (* x (- (+ (/ 1 (* x (sin B))) (/ (sin B) (* (cos B) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI)))))))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI)))))))))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))) (/ 1 (* (pow x 2) (* (cos B) (sin B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (/ 1 (* x (sin B))) (/ 1 (* (pow x 3) (* (pow (cos B) 2) (sin B)))))) (/ 1 (* (pow x 2) (* (cos B) (sin B))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (* -1 (* x (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B)))))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ -1 (* x (* (cos B) (sin B))))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (- (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (/ 1 (* (cos B) (sin B)))) x)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (- (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (+ (/ 1 (* (cos B) (sin B))) (/ 1 (* (pow x 2) (* (pow (cos B) 3) (sin B)))))) x)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (- (+ (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (/ 1 (* (pow x 3) (* (pow (cos B) 4) (sin B))))) (+ (/ 1 (* (cos B) (sin B))) (/ 1 (* (pow x 2) (* (pow (cos B) 3) (sin B)))))) x)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (* -1 (/ (* x (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI)))))))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (* x (+ (* -1 (/ (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI))))))))) (/ 1 (* x (sin B)))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (/ 1 (sin B)) (/ 1 (* x (* (cos B) (sin B))))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (cos B) (sin B))) (/ 1 (* x (* (pow (cos B) 2) (sin B))))) x)) (/ 1 (sin B))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (- (/ 1 (* (cos B) (sin B))) (/ 1 (* x (* (pow (cos B) 2) (sin B))))) x))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (pow (cos B) 2) (sin B))) (/ 1 (* x (* (pow (cos B) 3) (sin B))))) x)) (/ 1 (* (cos B) (sin B)))) x))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (pow (cos B) 3) (sin B))) (/ 1 (* x (* (pow (cos B) 4) (sin B))))) x)) (/ 1 (* (pow (cos B) 2) (sin B)))) x)) (/ 1 (* (cos B) (sin B)))) x))))
Calls

6 calls:

TimeVariablePointExpression
104.0ms
B
@inf
((+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (neg (/ (* x 1) (tan B))) (/ (* x 1) (tan B)) (* x 1) x 1 (tan B) B (/ 1 (sin B)) (sin B) (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) (pow (* (sin B) x) -1) (* (sin B) x) -1 (/ (cos B) (sin B)) (cos B) (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) (/ 1 (tan B)) (exp (* (log (sin B)) -1)) (* (log (sin B)) -1) (log (sin B)) (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))))) (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (+ (neg (tan B)) (tan (/ (PI) 2))) (neg (tan B)) (tan (/ (PI) 2)) (/ (PI) 2) (PI) 2 (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) (* (neg (tan B)) (tan (/ (PI) 2))) (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (* (pow (tan B) -1) x) (pow (tan B) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (* (neg x) (pow (tan B) -1)) (neg x) (pow (sin B) -1) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (pow (pow (sin B) 2) -1) (pow (sin B) 2))
41.0ms
B
@-inf
((+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (neg (/ (* x 1) (tan B))) (/ (* x 1) (tan B)) (* x 1) x 1 (tan B) B (/ 1 (sin B)) (sin B) (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) (pow (* (sin B) x) -1) (* (sin B) x) -1 (/ (cos B) (sin B)) (cos B) (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) (/ 1 (tan B)) (exp (* (log (sin B)) -1)) (* (log (sin B)) -1) (log (sin B)) (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))))) (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (+ (neg (tan B)) (tan (/ (PI) 2))) (neg (tan B)) (tan (/ (PI) 2)) (/ (PI) 2) (PI) 2 (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) (* (neg (tan B)) (tan (/ (PI) 2))) (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (* (pow (tan B) -1) x) (pow (tan B) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (* (neg x) (pow (tan B) -1)) (neg x) (pow (sin B) -1) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (pow (pow (sin B) 2) -1) (pow (sin B) 2))
19.0ms
B
@0
((+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (neg (/ (* x 1) (tan B))) (/ (* x 1) (tan B)) (* x 1) x 1 (tan B) B (/ 1 (sin B)) (sin B) (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) (pow (* (sin B) x) -1) (* (sin B) x) -1 (/ (cos B) (sin B)) (cos B) (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) (/ 1 (tan B)) (exp (* (log (sin B)) -1)) (* (log (sin B)) -1) (log (sin B)) (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))))) (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (+ (neg (tan B)) (tan (/ (PI) 2))) (neg (tan B)) (tan (/ (PI) 2)) (/ (PI) 2) (PI) 2 (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) (* (neg (tan B)) (tan (/ (PI) 2))) (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (* (pow (tan B) -1) x) (pow (tan B) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (* (neg x) (pow (tan B) -1)) (neg x) (pow (sin B) -1) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (pow (pow (sin B) 2) -1) (pow (sin B) 2))
13.0ms
x
@0
((+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (neg (/ (* x 1) (tan B))) (/ (* x 1) (tan B)) (* x 1) x 1 (tan B) B (/ 1 (sin B)) (sin B) (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) (pow (* (sin B) x) -1) (* (sin B) x) -1 (/ (cos B) (sin B)) (cos B) (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) (/ 1 (tan B)) (exp (* (log (sin B)) -1)) (* (log (sin B)) -1) (log (sin B)) (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))))) (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (+ (neg (tan B)) (tan (/ (PI) 2))) (neg (tan B)) (tan (/ (PI) 2)) (/ (PI) 2) (PI) 2 (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) (* (neg (tan B)) (tan (/ (PI) 2))) (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (* (pow (tan B) -1) x) (pow (tan B) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (* (neg x) (pow (tan B) -1)) (neg x) (pow (sin B) -1) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (pow (pow (sin B) 2) -1) (pow (sin B) 2))
12.0ms
x
@-inf
((+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (neg (/ (* x 1) (tan B))) (/ (* x 1) (tan B)) (* x 1) x 1 (tan B) B (/ 1 (sin B)) (sin B) (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) (pow (* (sin B) x) -1) (* (sin B) x) -1 (/ (cos B) (sin B)) (cos B) (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) (neg (* x (/ 1 (tan B)))) (* x (/ 1 (tan B))) (/ 1 (tan B)) (exp (* (log (sin B)) -1)) (* (log (sin B)) -1) (log (sin B)) (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))))) (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (+ (neg (tan B)) (tan (/ (PI) 2))) (neg (tan B)) (tan (/ (PI) 2)) (/ (PI) 2) (PI) 2 (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) (* (neg (tan B)) (tan (/ (PI) 2))) (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (* (pow (tan B) -1) x) (pow (tan B) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (* (neg x) (pow (tan B) -1)) (neg x) (pow (sin B) -1) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (pow (pow (sin B) 2) -1) (pow (sin B) 2))

rewrite293.0ms (6.9%)

Memory
8.0MiB live, 336.7MiB allocated; 44ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0122711342
013239261
174978836
093238520
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
309 → 523
Calls
Call 1
Inputs
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B)))
(/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))
(*.f64 x #s(literal 1 binary64))
x
#s(literal 1 binary64)
(tan.f64 B)
B
(/.f64 #s(literal 1 binary64) (sin.f64 B))
(sin.f64 B)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x)
(-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))
(pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))
(*.f64 (sin.f64 B) x)
#s(literal -1 binary64)
(/.f64 (cos.f64 B) (sin.f64 B))
(cos.f64 B)
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))))
(neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B))))
(*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))
(/.f64 #s(literal 1 binary64) (tan.f64 B))
(exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64)))
(*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))
(log.f64 (sin.f64 B))
(+.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(neg.f64 (tan.f64 B))
(tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)
(pow.f64 (tan.f64 B) #s(literal -1 binary64))
(-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(neg.f64 x)
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 B) #s(literal 2 binary64))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (* 1/3 x)))) x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ 31/15120 (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ x B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (tan B) #s(hole binary64 B))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* 1/3 (pow B 2))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* 2/15 (pow B 2))))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 2/15 (* 17/315 (pow B 2))))))))))
#s(approx B #s(hole binary64 B))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (sin B) #s(hole binary64 B))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* -1/6 (pow B 2))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* 1/120 (pow B 2)) 1/6))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/120 (* -1/5040 (pow B 2)))) 1/6))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ 31/15120 (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (/ (* x (- (/ 1 x) 1)) B)))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (/ (+ (* x (- (/ 1 x) 1)) (* (pow B 2) (* x (+ 1/3 (* 1/6 (/ 1 x)))))) B)))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (/ (+ (* x (- (/ 1 x) 1)) (* (pow B 2) (+ (* x (+ 1/3 (* 1/6 (/ 1 x)))) (* (pow B 2) (* x (+ 1/45 (* 7/360 (/ 1 x)))))))) B)))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (/ (+ (* x (- (/ 1 x) 1)) (* (pow B 2) (+ (* x (+ 1/3 (* 1/6 (/ 1 x)))) (* (pow B 2) (+ (* x (+ 1/45 (* 7/360 (/ 1 x)))) (* (pow B 2) (* x (+ 2/945 (* 31/15120 (/ 1 x)))))))))) B)))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) #s(hole binary64 (/ (- (/ 1 x) 1) B)))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 1/3 (* 1/6 (/ 1 x)))) (/ 1 x)) 1) B)))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 1/3 (+ (* 1/6 (/ 1 x)) (* (pow B 2) (+ 1/45 (* 7/360 (/ 1 x))))))) (/ 1 x)) 1) B)))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 1/3 (+ (* 1/6 (/ 1 x)) (* (pow B 2) (+ 1/45 (+ (* 7/360 (/ 1 x)) (* (pow B 2) (+ 2/945 (* 31/15120 (/ 1 x)))))))))) (/ 1 x)) 1) B)))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ 1 (* B x))))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ (+ (* 1/6 (/ (pow B 2) x)) (/ 1 x)) B)))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* 7/360 (/ (pow B 2) x)) (* 1/6 (/ 1 x)))) (/ 1 x)) B)))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* (pow B 2) (+ (* 31/15120 (/ (pow B 2) x)) (* 7/360 (/ 1 x)))) (* 1/6 (/ 1 x)))) (/ 1 x)) B)))
#s(approx (* (sin B) x) #s(hole binary64 (* B x)))
#s(approx (* (sin B) x) #s(hole binary64 (* B (+ x (* -1/6 (* (pow B 2) x))))))
#s(approx (* (sin B) x) #s(hole binary64 (* B (+ x (* (pow B 2) (+ (* -1/6 x) (* 1/120 (* (pow B 2) x))))))))
#s(approx (* (sin B) x) #s(hole binary64 (* B (+ x (* (pow B 2) (+ (* -1/6 x) (* (pow B 2) (+ (* -1/5040 (* (pow B 2) x)) (* 1/120 x)))))))))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (cos B) #s(hole binary64 1))
#s(approx (cos B) #s(hole binary64 (+ 1 (* -1/2 (pow B 2)))))
#s(approx (cos B) #s(hole binary64 (+ 1 (* (pow B 2) (- (* 1/24 (pow B 2)) 1/2)))))
#s(approx (cos B) #s(hole binary64 (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/24 (* -1/720 (pow B 2)))) 1/2)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ 31/15120 (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ x B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ 1 B)))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (* -1 (log B))))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (+ (* -1 (log B)) (* 1/6 (pow B 2)))))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (+ (* -1 (log B)) (* (pow B 2) (+ 1/6 (* 1/180 (pow B 2)))))))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (+ (* -1 (log B)) (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 1/180 (* 1/2835 (pow B 2)))))))))
#s(approx (log (sin B)) #s(hole binary64 (log B)))
#s(approx (log (sin B)) #s(hole binary64 (+ (log B) (* -1/6 (pow B 2)))))
#s(approx (log (sin B)) #s(hole binary64 (+ (log B) (* (pow B 2) (- (* -1/180 (pow B 2)) 1/6)))))
#s(approx (log (sin B)) #s(hole binary64 (+ (log B) (* (pow B 2) (- (* (pow B 2) (- (* -1/2835 (pow B 2)) 1/180)) 1/6)))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ 1 B)))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ (+ 1 (* -1 (/ (* B (* x (sin (* 1/2 (PI))))) (cos (* 1/2 (PI)))))) B)))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ (+ 1 (* B (- (* B (- (+ 1/6 (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2))) (* -1 x))) (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI))))))) B)))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ (+ 1 (* B (- (* B (- (+ 1/6 (+ (/ (* B (* (sin (* 1/2 (PI))) (- (* -1 x) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2))))) (cos (* 1/2 (PI)))) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (* -1 x))) (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI))))))) B)))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) #s(hole binary64 (* -1 (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) #s(hole binary64 (- (* B (- (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)) (* -1 x))) (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) #s(hole binary64 (- (* B (- (+ (/ (* B (* (sin (* 1/2 (PI))) (- (* -1 x) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2))))) (cos (* 1/2 (PI)))) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2))) (* -1 x))) (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) #s(hole binary64 (- (* B (- (+ (* B (+ (* B (- (+ (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1 x) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (pow (cos (* 1/2 (PI))) 2))) (* 1/3 (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (* -1/3 x))) (/ (* (sin (* 1/2 (PI))) (- (* -1 x) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (cos (* 1/2 (PI)))))) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2))) (* -1 x))) (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))))) #s(hole binary64 (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))))) #s(hole binary64 (+ (* B (- (* -1 x) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))))) #s(hole binary64 (+ (* B (- (+ (* -1 x) (* -1 (/ (* B (* (sin (* 1/2 (PI))) (- (* -1 x) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2))))) (cos (* 1/2 (PI)))))) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))))) #s(hole binary64 (+ (* B (- (+ (* -1 x) (* B (- (* B (- (* -1/3 x) (+ (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (- (* -1 x) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (pow (cos (* 1/2 (PI))) 2))) (* 1/3 (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))))) (/ (* (sin (* 1/2 (PI))) (- (* -1 x) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (cos (* 1/2 (PI))))))) (/ (* x (pow (sin (* 1/2 (PI))) 2)) (pow (cos (* 1/2 (PI))) 2)))) (/ (* x (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) #s(hole binary64 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (* B (+ 1 (/ (pow (sin (* 1/2 (PI))) 2) (pow (cos (* 1/2 (PI))) 2))))) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) #s(hole binary64 (+ (* B (- (/ (* B (* (sin (* 1/2 (PI))) (+ 1 (/ (pow (sin (* 1/2 (PI))) 2) (pow (cos (* 1/2 (PI))) 2))))) (cos (* 1/2 (PI)))) (+ 1 (/ (pow (sin (* 1/2 (PI))) 2) (pow (cos (* 1/2 (PI))) 2))))) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) #s(hole binary64 (+ (* B (- (* B (- (* -1 (* B (+ 1/3 (+ (* 1/3 (/ (pow (sin (* 1/2 (PI))) 2) (pow (cos (* 1/2 (PI))) 2))) (/ (* (pow (sin (* 1/2 (PI))) 2) (+ 1 (/ (pow (sin (* 1/2 (PI))) 2) (pow (cos (* 1/2 (PI))) 2)))) (pow (cos (* 1/2 (PI))) 2)))))) (* -1 (/ (* (sin (* 1/2 (PI))) (+ 1 (/ (pow (sin (* 1/2 (PI))) 2) (pow (cos (* 1/2 (PI))) 2)))) (cos (* 1/2 (PI))))))) (+ 1 (/ (pow (sin (* 1/2 (PI))) 2) (pow (cos (* 1/2 (PI))) 2))))) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (+ (* -1 B) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (+ (* B (- (* -1/3 (pow B 2)) 1)) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (+ (* B (- (* (pow B 2) (- (* -2/15 (pow B 2)) 1/3)) 1)) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (neg (tan B)) #s(hole binary64 (* -1 B)))
#s(approx (neg (tan B)) #s(hole binary64 (* B (- (* -1/3 (pow B 2)) 1))))
#s(approx (neg (tan B)) #s(hole binary64 (* B (- (* (pow B 2) (- (* -2/15 (pow B 2)) 1/3)) 1))))
#s(approx (neg (tan B)) #s(hole binary64 (* B (- (* (pow B 2) (- (* (pow B 2) (- (* -17/315 (pow B 2)) 2/15)) 1/3)) 1))))
#s(approx (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) #s(hole binary64 1))
#s(approx (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) #s(hole binary64 (+ 1 (/ (* B (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) #s(hole binary64 (+ 1 (* B (- (* 1/3 (/ (* (pow B 2) (sin (* 1/2 (PI)))) (cos (* 1/2 (PI))))) (* -1 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))))))))
#s(approx (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) #s(hole binary64 (+ 1 (* B (- (* (pow B 2) (- (* 2/15 (/ (* (pow B 2) (sin (* 1/2 (PI)))) (cos (* 1/2 (PI))))) (* -1/3 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))))) (* -1 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))))))))
#s(approx (* (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (* -1 (/ (* B (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))
#s(approx (* (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (* B (+ (* -1 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))) (* -1/3 (/ (* (pow B 2) (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))))
#s(approx (* (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (* B (+ (* -1 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))) (* (pow B 2) (+ (* -1/3 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))) (* -2/15 (/ (* (pow B 2) (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))))))
#s(approx (* (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (* B (+ (* -1 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))) (* (pow B 2) (+ (* -1/3 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))) (* (pow B 2) (+ (* -2/15 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))) (* -17/315 (/ (* (pow B 2) (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))))))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ (- (/ (pow x 2) (- (* -1 x) 1)) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (* 1/3 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))))) (/ (pow x 2) (- (* -1 x) 1))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* 1/3 (/ x (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))) (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))))))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))))) (/ (pow x 2) (- (* -1 x) 1))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* 1/3 (/ x (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (+ (* (pow B 2) (- (+ (* -1/3 (/ (+ (* -1/9 x) (* 2/15 x)) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (+ (* -1/9 x) (* 2/15 x)) 7/360) (pow (- (* -1 x) 1) 2))) (+ (* -2/45 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 17/315 (/ x (pow (- (* -1 x) 1) 2))) (+ (/ (* (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))) (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1/3 (- (* 1/3 x) 1/6)) (+ (* -1/9 x) (+ (* 2/45 (- (* -1 x) 1)) (* 2/15 x)))) 7/360) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1))) (+ (* -1 (/ (* (pow x 2) (* (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6))) (pow (- (* -1 x) 1) 3))) (+ (* 31/15120 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/315 (/ 1 (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (+ (* 17/315 x) (+ (* 62/315 (- (* -1 x) 1)) (+ (* 17/45 (- (* 1/3 x) 1/6)) (* 2/3 (- (+ (* -1/9 x) (* 2/15 x)) 7/360))))))) 31/15120)) (pow (- (* -1 x) 1) 2)))))))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))) (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))))))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))))) (/ (pow x 2) (- (* -1 x) 1))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (pow x 2) (* B (- (* -1 x) 1)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow B 2) (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6))) (pow (- (* -1 x) 1) 2))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1))) (+ (* -1 (/ (* (pow x 2) (* (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6))) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (+ (* 17/315 x) (+ (* 62/315 (- (* -1 x) 1)) (+ (* 17/45 (- (* 1/3 x) 1/6)) (* 2/3 (- (+ (* -1/9 x) (* 2/15 x)) 7/360))))))) 31/15120)) (pow (- (* -1 x) 1) 2)))))) (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (pow x 2) (pow B 2))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (+ (* -2/3 (* (pow B 2) (pow x 2))) (pow x 2)) (pow B 2))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2))))) (* 2/3 (pow x 2)))) (pow x 2)) (pow B 2))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -2/3 (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2)))) (+ (* -34/135 (pow x 2)) (* 62/315 (pow x 2)))))) (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2))))) (* 2/3 (pow x 2)))) (pow x 2)) (pow B 2))))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ x B)))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ 1 B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ (- (* -1 x) 1) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (* 1/3 x) 1/6))) 1) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (+ (* 1/3 x) (* (pow B 2) (- (+ (* -1/9 x) (* 2/15 x)) 7/360))) 1/6))) 1) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (+ (* 1/3 x) (* (pow B 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))) 31/15120)))) 7/360))) 1/6))) 1) B)))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (* -1 (/ x B))))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* 1/3 (* (pow B 2) x))) B)))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))))) B)))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x)))))))))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ 1 B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ 1 (* B (- (* -1 x) 1)))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (* (pow B 2) (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (* (pow B 2) (- (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (+ (* 31/15120 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/315 (/ 1 (- (* -1 x) 1)))) (+ (* -1/3 (/ (+ (* -1/9 x) (* 2/15 x)) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (+ (* -1/9 x) (* 2/15 x)) 7/360) (pow (- (* -1 x) 1) 2))) (+ (* -2/45 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 17/315 (/ x (pow (- (* -1 x) 1) 2))) (+ (/ (* (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))) (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1/3 (- (* 1/3 x) 1/6)) (+ (* -1/9 x) (+ (* 2/45 (- (* -1 x) 1)) (* 2/15 x)))) 7/360) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))))))) (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (pow (pow (sin B) 2) -1) #s(hole binary64 (/ 1 (pow B 2))))
#s(approx (pow (pow (sin B) 2) -1) #s(hole binary64 (/ (+ 1 (* 1/3 (pow B 2))) (pow B 2))))
#s(approx (pow (pow (sin B) 2) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/3 (* 1/15 (pow B 2))))) (pow B 2))))
#s(approx (pow (pow (sin B) 2) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 1/15 (* 2/189 (pow B 2))))))) (pow B 2))))
#s(approx (pow (sin B) 2) #s(hole binary64 (pow B 2)))
#s(approx (pow (sin B) 2) #s(hole binary64 (* (pow B 2) (+ 1 (* -1/3 (pow B 2))))))
#s(approx (pow (sin B) 2) #s(hole binary64 (* (pow B 2) (+ 1 (* (pow B 2) (- (* 2/45 (pow B 2)) 1/3))))))
#s(approx (pow (sin B) 2) #s(hole binary64 (* (pow B 2) (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 2/45 (* -1/315 (pow B 2)))) 1/3))))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (/ (* x 1) (tan B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* x 1) (tan B)) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (tan B) #s(hole binary64 (/ (sin B) (cos B))))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (sin B) #s(hole binary64 (sin B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) #s(hole binary64 (- (/ 1 (* x (sin B))) (/ (cos B) (sin B)))))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ 1 (* x (sin B)))))
#s(approx (* (sin B) x) #s(hole binary64 (* x (sin B))))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (cos B) #s(hole binary64 (cos B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (* x (/ 1 (tan B)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (* x (/ 1 (tan B))) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (/ 1 (tan B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (* -1 (log (sin B)))))
#s(approx (log (sin B)) #s(hole binary64 (log (sin B))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI)))))))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) #s(hole binary64 (* -1 (/ (* x (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI)))))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))))) #s(hole binary64 (/ (* x (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI))))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) #s(hole binary64 (/ (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI))))))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))))
#s(approx (neg (tan B)) #s(hole binary64 (* -1 (/ (sin B) (cos B)))))
#s(approx (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) #s(hole binary64 (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI)))))))))
#s(approx (* (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI))))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (- (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2))))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ 1 (sin B))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (pow (pow (sin B) 2) -1) #s(hole binary64 (/ 1 (pow (sin B) 2))))
#s(approx (pow (sin B) 2) #s(hole binary64 (pow (sin B) 2)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (* x 1) #s(hole binary64 x))
#s(approx x #s(hole binary64 x))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) #s(hole binary64 (/ 1 (* x (sin B)))))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) x)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (+ (* x (- (/ (sin B) (* (cos B) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI))))))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI))))))))))) (/ 1 (sin B)))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) #s(hole binary64 (* x (- (/ (sin B) (* (cos B) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI))))))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI)))))))))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (+ (* x (+ (* -1 (/ (cos B) (sin B))) (* x (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (pow (cos B) 2) (sin B)))))) (/ 1 (sin B)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (* (pow x 2) (pow (cos B) 2)) (sin B)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (* x (pow (cos B) 3)) (sin B))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* x (- (* -1 (/ (* x (pow (cos B) 4)) (sin B))) (* -1 (/ (pow (cos B) 3) (sin B)))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* x (- (* x (- (/ (* x (pow (cos B) 5)) (sin B)) (/ (pow (cos B) 4) (sin B)))) (* -1 (/ (pow (cos B) 3) (sin B)))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ -1 (sin B))))
#s(approx (neg x) #s(hole binary64 (* -1 x)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (- (/ (* x (cos B)) (sin B)) (/ 1 (sin B)))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (- (* x (- (* -1 (/ (* x (pow (cos B) 2)) (sin B))) (* -1 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (- (* x (- (* x (- (/ (* x (pow (cos B) 3)) (sin B)) (/ (pow (cos B) 2) (sin B)))) (* -1 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) #s(hole binary64 (* -1 (/ (cos B) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (* x (- (/ (sin B) (* (cos B) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI))))))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI)))))))))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (* x (- (+ (/ 1 (* x (sin B))) (/ (sin B) (* (cos B) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI)))))))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI)))))))))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))) (/ 1 (* (pow x 2) (* (cos B) (sin B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (/ 1 (* x (sin B))) (/ 1 (* (pow x 3) (* (pow (cos B) 2) (sin B)))))) (/ 1 (* (pow x 2) (* (cos B) (sin B))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (* -1 (* x (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B)))))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ -1 (* x (* (cos B) (sin B))))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (- (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (/ 1 (* (cos B) (sin B)))) x)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (- (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (+ (/ 1 (* (cos B) (sin B))) (/ 1 (* (pow x 2) (* (pow (cos B) 3) (sin B)))))) x)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (- (+ (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (/ 1 (* (pow x 3) (* (pow (cos B) 4) (sin B))))) (+ (/ 1 (* (cos B) (sin B))) (/ 1 (* (pow x 2) (* (pow (cos B) 3) (sin B)))))) x)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (* -1 (/ (* x (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI)))))))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (* x (+ (* -1 (/ (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B))) (- 1 (* -1 (/ (* (sin B) (sin (* 1/2 (PI)))) (* (cos B) (cos (* 1/2 (PI))))))))) (/ 1 (* x (sin B)))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (/ 1 (sin B)) (/ 1 (* x (* (cos B) (sin B))))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (cos B) (sin B))) (/ 1 (* x (* (pow (cos B) 2) (sin B))))) x)) (/ 1 (sin B))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (- (/ 1 (* (cos B) (sin B))) (/ 1 (* x (* (pow (cos B) 2) (sin B))))) x))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (pow (cos B) 2) (sin B))) (/ 1 (* x (* (pow (cos B) 3) (sin B))))) x)) (/ 1 (* (cos B) (sin B)))) x))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (pow (cos B) 3) (sin B))) (/ 1 (* x (* (pow (cos B) 4) (sin B))))) x)) (/ 1 (* (pow (cos B) 2) (sin B)))) x)) (/ 1 (* (cos B) (sin B)))) x))))
Outputs
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) x (-.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (*.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(fma.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))))
(fma.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(fma.f64 (*.f64 #s(literal -1 binary64) x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(fma.f64 x (neg.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(+.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(+.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x))
(*.f64 (*.f64 #s(literal -1 binary64) x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(*.f64 x (neg.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64))))
(/.f64 (*.f64 #s(literal -1 binary64) x) (tan.f64 B))
(/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B)))
(neg.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)
(*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(/.f64 (*.f64 x (fma.f64 #s(literal -1 binary64) (tan.f64 B) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))
(/.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 #s(literal -1 binary64) (tan.f64 B)))
(/.f64 x (tan.f64 B))
x
x
#s(literal 1 binary64)
(/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))
(/.f64 (neg.f64 (sin.f64 B)) (neg.f64 (cos.f64 B)))
(/.f64 (sin.f64 B) (cos.f64 B))
(tan.f64 (+.f64 (+.f64 B (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 B (PI.f64)))
(tan.f64 B)
B
(*.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)))
(pow.f64 (exp.f64 (log.f64 (sin.f64 B))) #s(literal -1 binary64))
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 B)))
(/.f64 #s(literal 1 binary64) (sin.f64 B))
(-.f64 (cosh.f64 (log.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (sinh.f64 (log.f64 (sin.f64 B))))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (sin.f64 B)))) #s(literal -1 binary64)))
(exp.f64 (log.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(+.f64 (cosh.f64 (log.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (sinh.f64 (log.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(sin.f64 B)
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x)
(*.f64 x (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 B) (sin.f64 B)) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (fma.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B)) (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (sin.f64 B)) (*.f64 (*.f64 (sin.f64 B) x) (cos.f64 B))) (*.f64 (*.f64 (sin.f64 B) x) (sin.f64 B)))
(-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))
(*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 x #s(literal -1 binary64)))
(pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))
(/.f64 (pow.f64 x #s(literal -1 binary64)) (sin.f64 B))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (sin.f64 B) x)))
(/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 B) x))
(exp.f64 (*.f64 (+.f64 (log.f64 x) (log.f64 (sin.f64 B))) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (+.f64 (log.f64 x) (log.f64 (sin.f64 B))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (+.f64 (log.f64 x) (log.f64 (sin.f64 B))) #s(literal -1 binary64))))
(*.f64 (sin.f64 B) x)
(*.f64 x (sin.f64 B))
#s(literal -1 binary64)
(/.f64 (neg.f64 (cos.f64 B)) (neg.f64 (sin.f64 B)))
(/.f64 (cos.f64 B) (sin.f64 B))
(fma.f64 (sin.f64 B) #s(literal 0 binary64) (*.f64 (cos.f64 B) #s(literal 1 binary64)))
(sin.f64 (+.f64 B (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal -1 binary64) B (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 #s(literal -1 binary64) B)))
(cos.f64 (*.f64 #s(literal -1 binary64) B))
(cos.f64 B)
(+.f64 (*.f64 (sin.f64 B) #s(literal 0 binary64)) (*.f64 (cos.f64 B) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) x (-.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (*.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(fma.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))))
(fma.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(fma.f64 (*.f64 #s(literal -1 binary64) x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(fma.f64 x (neg.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(+.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(+.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x))
(*.f64 (*.f64 #s(literal -1 binary64) x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(*.f64 x (neg.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64))))
(/.f64 (*.f64 #s(literal -1 binary64) x) (tan.f64 B))
(/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B)))
(neg.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)
(*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(/.f64 (*.f64 x (fma.f64 #s(literal -1 binary64) (tan.f64 B) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))
(/.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 #s(literal -1 binary64) (tan.f64 B)))
(/.f64 x (tan.f64 B))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)))
(pow.f64 (tan.f64 B) #s(literal -1 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal -1 binary64) (tan.f64 B) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))))
(/.f64 (fma.f64 #s(literal -1 binary64) (tan.f64 B) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))
(/.f64 (cos.f64 B) (cos.f64 (fma.f64 #s(literal -1 binary64) B (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (tan.f64 B)))
(/.f64 #s(literal 1 binary64) (tan.f64 B))
(tan.f64 (+.f64 (fma.f64 #s(literal -1 binary64) B (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64)))
(tan.f64 (+.f64 (neg.f64 (+.f64 B (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(tan.f64 (fma.f64 #s(literal -1 binary64) B (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (PI.f64))))
(tan.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (PI.f64)) (*.f64 #s(literal -1 binary64) B)))
(tan.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) B)))
(tan.f64 (fma.f64 #s(literal -1 binary64) B (/.f64 (PI.f64) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (tan.f64 B)) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (tan.f64 B)) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (tan.f64 B)) #s(literal -1 binary64))))
(+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))) (/.f64 (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))))
(*.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)))
(pow.f64 (exp.f64 (log.f64 (sin.f64 B))) #s(literal -1 binary64))
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 B)))
(/.f64 #s(literal 1 binary64) (sin.f64 B))
(-.f64 (cosh.f64 (log.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (sinh.f64 (log.f64 (sin.f64 B))))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (sin.f64 B)))) #s(literal -1 binary64)))
(exp.f64 (log.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(+.f64 (cosh.f64 (log.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (sinh.f64 (log.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (log.f64 (exp.f64 (log.f64 (sin.f64 B)))))
(*.f64 #s(literal -1 binary64) (log.f64 (sin.f64 B)))
(neg.f64 (log.f64 (sin.f64 B)))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (neg.f64 (sin.f64 B))))
(-.f64 #s(literal 0 binary64) (log.f64 (sin.f64 B)))
(+.f64 (log.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64))) (log.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64))))
(log.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(log.f64 (sin.f64 B))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) x (-.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (*.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(fma.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))))
(fma.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(fma.f64 (*.f64 #s(literal -1 binary64) x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(fma.f64 x (neg.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(+.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(+.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x))
(*.f64 (*.f64 #s(literal -1 binary64) x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(*.f64 x (neg.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64))))
(/.f64 (*.f64 #s(literal -1 binary64) x) (tan.f64 B))
(/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B)))
(neg.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)
(*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(/.f64 (*.f64 x (fma.f64 #s(literal -1 binary64) (tan.f64 B) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))
(/.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 #s(literal -1 binary64) (tan.f64 B)))
(/.f64 x (tan.f64 B))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)))
(pow.f64 (tan.f64 B) #s(literal -1 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal -1 binary64) (tan.f64 B) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))))
(/.f64 (fma.f64 #s(literal -1 binary64) (tan.f64 B) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))
(/.f64 (cos.f64 B) (cos.f64 (fma.f64 #s(literal -1 binary64) B (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (tan.f64 B)))
(/.f64 #s(literal 1 binary64) (tan.f64 B))
(tan.f64 (+.f64 (fma.f64 #s(literal -1 binary64) B (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64)))
(tan.f64 (+.f64 (neg.f64 (+.f64 B (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(tan.f64 (fma.f64 #s(literal -1 binary64) B (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (PI.f64))))
(tan.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (PI.f64)) (*.f64 #s(literal -1 binary64) B)))
(tan.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) B)))
(tan.f64 (fma.f64 #s(literal -1 binary64) B (/.f64 (PI.f64) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (tan.f64 B)) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (tan.f64 B)) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (tan.f64 B)) #s(literal -1 binary64))))
(+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))) (/.f64 (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (*.f64 #s(literal -1 binary64) (tan.f64 B))) (*.f64 (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (*.f64 #s(literal -1 binary64) (tan.f64 B))) (-.f64 (*.f64 (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))))
(fma.f64 #s(literal -1 binary64) (tan.f64 B) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))
(fma.f64 (tan.f64 B) #s(literal -1 binary64) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))
(+.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))
(+.f64 (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (*.f64 #s(literal -1 binary64) (tan.f64 B)))
(*.f64 #s(literal -1 binary64) (tan.f64 B))
(*.f64 (tan.f64 B) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 B)) (cos.f64 B))
(/.f64 (neg.f64 (sin.f64 B)) (cos.f64 B))
(neg.f64 (tan.f64 B))
(tan.f64 (fma.f64 #s(literal -1 binary64) B (PI.f64)))
(tan.f64 (neg.f64 (+.f64 B (PI.f64))))
(tan.f64 (*.f64 #s(literal -1 binary64) B))
(/.f64 (+.f64 (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (tan.f64 (PI.f64)))))
(/.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (PI.f64))) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (PI.f64))))
(/.f64 #s(literal 0 binary64) #s(literal 0 binary64))
(/.f64 #s(literal 2 binary64) #s(literal 0 binary64))
(/.f64 #s(literal 1 binary64) #s(literal 0 binary64))
(tan.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (PI.f64)))
(tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(+.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B))) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))
(*.f64 (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (*.f64 #s(literal -1 binary64) (tan.f64 B)))
(neg.f64 (*.f64 (tan.f64 B) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (*.f64 (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (fma.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (/.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (fma.f64 (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (*.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (*.f64 (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64))) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (/.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64))) (neg.f64 (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(*.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) x)
(*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 x x))
(*.f64 (fabs.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (fabs.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)))
(*.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))))
(*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 x (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)))
(pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)
(*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(/.f64 (*.f64 x (fma.f64 #s(literal -1 binary64) (tan.f64 B) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))
(/.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 #s(literal -1 binary64) (tan.f64 B)))
(/.f64 x (tan.f64 B))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)))
(pow.f64 (tan.f64 B) #s(literal -1 binary64))
(/.f64 (neg.f64 (fma.f64 #s(literal -1 binary64) (tan.f64 B) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))))
(/.f64 (fma.f64 #s(literal -1 binary64) (tan.f64 B) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))
(/.f64 (cos.f64 B) (cos.f64 (fma.f64 #s(literal -1 binary64) B (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (tan.f64 B)))
(/.f64 #s(literal 1 binary64) (tan.f64 B))
(tan.f64 (+.f64 (fma.f64 #s(literal -1 binary64) B (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64)))
(tan.f64 (+.f64 (neg.f64 (+.f64 B (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(tan.f64 (fma.f64 #s(literal -1 binary64) B (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (PI.f64))))
(tan.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (PI.f64)) (*.f64 #s(literal -1 binary64) B)))
(tan.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) B)))
(tan.f64 (fma.f64 #s(literal -1 binary64) B (/.f64 (PI.f64) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (tan.f64 B)) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (tan.f64 B)) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (tan.f64 B)) #s(literal -1 binary64))))
(+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))) (/.f64 (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (tan.f64 B)) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B)))))
(/.f64 (-.f64 (pow.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (*.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x))
(*.f64 (*.f64 #s(literal -1 binary64) x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(*.f64 x (neg.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64))))
(/.f64 (*.f64 #s(literal -1 binary64) x) (tan.f64 B))
(/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B)))
(neg.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x))
(*.f64 #s(literal -1 binary64) x)
(*.f64 x #s(literal -1 binary64))
(neg.f64 x)
(*.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)))
(pow.f64 (exp.f64 (log.f64 (sin.f64 B))) #s(literal -1 binary64))
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 B)))
(/.f64 #s(literal 1 binary64) (sin.f64 B))
(-.f64 (cosh.f64 (log.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (sinh.f64 (log.f64 (sin.f64 B))))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (sin.f64 B)))) #s(literal -1 binary64)))
(exp.f64 (log.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(+.f64 (cosh.f64 (log.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (sinh.f64 (log.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64))) (neg.f64 (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (/.f64 x (*.f64 #s(literal -1 binary64) (tan.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(*.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1/2 binary64)))
(pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 B) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -2 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64))) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64))) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64))) #s(literal -1 binary64))))
(*.f64 (pow.f64 (sin.f64 B) #s(literal 1 binary64)) (pow.f64 (sin.f64 B) #s(literal 1 binary64)))
(*.f64 (sin.f64 B) (sin.f64 B))
(pow.f64 (sin.f64 B) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 B B)) (cos.f64 (+.f64 B B))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) B))))
(exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal 2 binary64))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (-.f64 #s(literal 1 binary64) x) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (-.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) x #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) x) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (-.f64 (fma.f64 (+.f64 (fma.f64 #s(literal 1/3 binary64) x #s(literal 1/6 binary64)) (*.f64 (fma.f64 x #s(literal 1/45 binary64) #s(literal 7/360 binary64)) (*.f64 B B))) (*.f64 B B) #s(literal 1 binary64)) x) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (-.f64 (fma.f64 (+.f64 (fma.f64 #s(literal 1/3 binary64) x #s(literal 1/6 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal -1/9 binary64) x)) (fma.f64 (+.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (*.f64 x #s(literal 1/105 binary64))) #s(literal 31/15120 binary64)) (*.f64 B B) (*.f64 #s(literal 2/15 binary64) x))) (*.f64 B B))) (*.f64 B B) #s(literal 1 binary64)) x) B))
#s(approx (neg (/ (* x 1) (tan B))) (*.f64 (/.f64 x B) #s(literal -1 binary64)))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 B B) x) #s(literal 1/3 binary64)) x) B))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 x #s(literal 1/45 binary64)) (*.f64 B B) (*.f64 #s(literal 1/3 binary64) x)) (*.f64 B B)) x) B))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (-.f64 (*.f64 (fma.f64 (+.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (*.f64 x #s(literal 1/105 binary64))) (*.f64 B B) (*.f64 #s(literal 2/15 binary64) x)) (*.f64 #s(literal -1/9 binary64) x)) (*.f64 B B) (*.f64 #s(literal 1/3 binary64) x)) (*.f64 B B)) x) B))
#s(approx (/ (* x 1) (tan B)) (/.f64 x B))
#s(approx (/ (* x 1) (tan B)) (/.f64 (fma.f64 (*.f64 (*.f64 B B) x) #s(literal -1/3 binary64) x) B))
#s(approx (/ (* x 1) (tan B)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 B B)) (*.f64 x #s(literal 1/45 binary64)) (*.f64 #s(literal -1/3 binary64) x)) (*.f64 B B) x) B))
#s(approx (/ (* x 1) (tan B)) (/.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 B B)) (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (*.f64 x #s(literal 1/105 binary64)))) (*.f64 x #s(literal 1/45 binary64))) (*.f64 B B) (*.f64 #s(literal -1/3 binary64) x)) (*.f64 B B) x) B))
#s(approx (tan B) B)
#s(approx (tan B) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (tan B) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 B B) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (tan B) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 B B) #s(literal 2/15 binary64)) (*.f64 B B) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx B B)
#s(approx (exp (* (log (sin B)) -1)) (pow.f64 B #s(literal -1 binary64)))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (fma.f64 (fma.f64 #s(literal 7/360 binary64) (*.f64 B B) #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 31/15120 binary64) (*.f64 B B) #s(literal 7/360 binary64)) (*.f64 B B) #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (sin B) B)
#s(approx (sin B) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (sin B) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (sin B) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 B B) #s(literal 1/120 binary64)) (*.f64 B B)) #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (-.f64 #s(literal 1 binary64) x) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (-.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) x #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) x) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (-.f64 (fma.f64 (+.f64 (fma.f64 #s(literal 1/3 binary64) x #s(literal 1/6 binary64)) (*.f64 (fma.f64 x #s(literal 1/45 binary64) #s(literal 7/360 binary64)) (*.f64 B B))) (*.f64 B B) #s(literal 1 binary64)) x) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (-.f64 (fma.f64 (+.f64 (fma.f64 #s(literal 1/3 binary64) x #s(literal 1/6 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal -1/9 binary64) x)) (fma.f64 (+.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (*.f64 x #s(literal 1/105 binary64))) #s(literal 31/15120 binary64)) (*.f64 B B) (*.f64 #s(literal 2/15 binary64) x))) (*.f64 B B))) (*.f64 B B) #s(literal 1 binary64)) x) B))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) (/.f64 (*.f64 (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) x) B))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) (/.f64 (fma.f64 (*.f64 (fma.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/6 binary64) #s(literal 1/3 binary64)) x) (*.f64 B B) (*.f64 (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) x)) B))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) (/.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 7/360 binary64) #s(literal 1/45 binary64)) x) (*.f64 B B) (*.f64 (fma.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/6 binary64) #s(literal 1/3 binary64)) x)) (*.f64 B B) (*.f64 (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) x)) B))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) (/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 31/15120 binary64) #s(literal 2/945 binary64)) x) (*.f64 B B) (*.f64 (fma.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 7/360 binary64) #s(literal 1/45 binary64)) x)) (*.f64 B B) (*.f64 (fma.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/6 binary64) #s(literal 1/3 binary64)) x)) (*.f64 B B) (*.f64 (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) x)) B))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) (/.f64 (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64)) B))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) (/.f64 (fma.f64 (fma.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/6 binary64) #s(literal 1/3 binary64)) (*.f64 B B) (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64))) B))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) (/.f64 (fma.f64 (+.f64 (fma.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/6 binary64) #s(literal 1/3 binary64)) (*.f64 (fma.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 7/360 binary64) #s(literal 1/45 binary64)) (*.f64 B B))) (*.f64 B B) (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64))) B))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) (/.f64 (fma.f64 (+.f64 (fma.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/6 binary64) #s(literal 1/3 binary64)) (*.f64 (+.f64 (fma.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 7/360 binary64) #s(literal 1/45 binary64)) (*.f64 (fma.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 31/15120 binary64) #s(literal 2/945 binary64)) (*.f64 B B))) (*.f64 B B))) (*.f64 B B) (-.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1 binary64))) B))
#s(approx (pow (* (sin B) x) -1) (pow.f64 (*.f64 B x) #s(literal -1 binary64)))
#s(approx (pow (* (sin B) x) -1) (/.f64 (fma.f64 (/.f64 (*.f64 B B) x) #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) B))
#s(approx (pow (* (sin B) x) -1) (/.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 B B) x) #s(literal 7/360 binary64) (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/6 binary64))) (*.f64 B B) (pow.f64 x #s(literal -1 binary64))) B))
#s(approx (pow (* (sin B) x) -1) (/.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 B B) x) #s(literal 31/15120 binary64) (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 7/360 binary64))) (*.f64 B B) (*.f64 (pow.f64 x #s(literal -1 binary64)) #s(literal 1/6 binary64))) (*.f64 B B) (pow.f64 x #s(literal -1 binary64))) B))
#s(approx (* (sin B) x) (*.f64 B x))
#s(approx (* (sin B) x) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 B B)) x x) B))
#s(approx (* (sin B) x) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 B B)) x (*.f64 #s(literal -1/6 binary64) x)) (*.f64 B B) x) B))
#s(approx (* (sin B) x) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 B B)) x (*.f64 #s(literal 1/120 binary64) x)) (*.f64 B B) (*.f64 #s(literal -1/6 binary64) x)) (*.f64 B B) x) B))
#s(approx (/ (cos B) (sin B)) (pow.f64 B #s(literal -1 binary64)))
#s(approx (/ (cos B) (sin B)) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (/ (cos B) (sin B)) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (/ (cos B) (sin B)) (/.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -2/945 binary64) (*.f64 B B)) #s(literal 1/45 binary64)) (*.f64 B B)) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (cos B) #s(literal 1 binary64))
#s(approx (cos B) (fma.f64 #s(literal -1/2 binary64) (*.f64 B B) #s(literal 1 binary64)))
#s(approx (cos B) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 B B)) #s(literal 1/2 binary64)) (*.f64 B B) #s(literal 1 binary64)))
#s(approx (cos B) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 B B) #s(literal 1/24 binary64)) (*.f64 B B)) #s(literal 1/2 binary64)) (*.f64 B B) #s(literal 1 binary64)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (-.f64 #s(literal 1 binary64) x) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (-.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) x #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) x) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (-.f64 (fma.f64 (+.f64 (fma.f64 #s(literal 1/3 binary64) x #s(literal 1/6 binary64)) (*.f64 (fma.f64 x #s(literal 1/45 binary64) #s(literal 7/360 binary64)) (*.f64 B B))) (*.f64 B B) #s(literal 1 binary64)) x) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (-.f64 (fma.f64 (+.f64 (fma.f64 #s(literal 1/3 binary64) x #s(literal 1/6 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal -1/9 binary64) x)) (fma.f64 (+.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (*.f64 x #s(literal 1/105 binary64))) #s(literal 31/15120 binary64)) (*.f64 B B) (*.f64 #s(literal 2/15 binary64) x))) (*.f64 B B))) (*.f64 B B) #s(literal 1 binary64)) x) B))
#s(approx (neg (/ (* x 1) (tan B))) (*.f64 (/.f64 x B) #s(literal -1 binary64)))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 B B) x) #s(literal 1/3 binary64)) x) B))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 x #s(literal 1/45 binary64)) (*.f64 B B) (*.f64 #s(literal 1/3 binary64) x)) (*.f64 B B)) x) B))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (-.f64 (*.f64 (fma.f64 (+.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (*.f64 x #s(literal 1/105 binary64))) (*.f64 B B) (*.f64 #s(literal 2/15 binary64) x)) (*.f64 #s(literal -1/9 binary64) x)) (*.f64 B B) (*.f64 #s(literal 1/3 binary64) x)) (*.f64 B B)) x) B))
#s(approx (/ (* x 1) (tan B)) (/.f64 x B))
#s(approx (/ (* x 1) (tan B)) (/.f64 (fma.f64 (*.f64 (*.f64 B B) x) #s(literal -1/3 binary64) x) B))
#s(approx (/ (* x 1) (tan B)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 B B)) (*.f64 x #s(literal 1/45 binary64)) (*.f64 #s(literal -1/3 binary64) x)) (*.f64 B B) x) B))
#s(approx (/ (* x 1) (tan B)) (/.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 B B)) (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (*.f64 x #s(literal 1/105 binary64)))) (*.f64 x #s(literal 1/45 binary64))) (*.f64 B B) (*.f64 #s(literal -1/3 binary64) x)) (*.f64 B B) x) B))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (pow.f64 B #s(literal -1 binary64)))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (/.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -2/945 binary64) (*.f64 B B)) #s(literal 1/45 binary64)) (*.f64 B B)) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (exp (* (log (sin B)) -1)) (pow.f64 B #s(literal -1 binary64)))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (fma.f64 (fma.f64 #s(literal 7/360 binary64) (*.f64 B B) #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 31/15120 binary64) (*.f64 B B) #s(literal 7/360 binary64)) (*.f64 B B) #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (* (log (sin B)) -1) (*.f64 (log.f64 B) #s(literal -1 binary64)))
#s(approx (* (log (sin B)) -1) (fma.f64 (log.f64 B) #s(literal -1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 B B))))
#s(approx (* (log (sin B)) -1) (fma.f64 (fma.f64 #s(literal 1/180 binary64) (*.f64 B B) #s(literal 1/6 binary64)) (*.f64 B B) (*.f64 (log.f64 B) #s(literal -1 binary64))))
#s(approx (* (log (sin B)) -1) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2835 binary64) (*.f64 B B) #s(literal 1/180 binary64)) (*.f64 B B) #s(literal 1/6 binary64)) (*.f64 B B) (*.f64 (log.f64 B) #s(literal -1 binary64))))
#s(approx (log (sin B)) (log.f64 B))
#s(approx (log (sin B)) (fma.f64 #s(literal -1/6 binary64) (*.f64 B B) (log.f64 B)))
#s(approx (log (sin B)) (fma.f64 (-.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 B B)) #s(literal 1/6 binary64)) (*.f64 B B) (log.f64 B)))
#s(approx (log (sin B)) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/2835 binary64) (*.f64 B B)) #s(literal 1/180 binary64)) (*.f64 B B)) #s(literal 1/6 binary64)) (*.f64 B B) (log.f64 B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (pow.f64 B #s(literal -1 binary64)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 B x) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal -1 binary64) #s(literal 1 binary64)) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (fma.f64 x (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 1/6 binary64)) (*.f64 #s(literal -1 binary64) x)) B) (*.f64 x (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))))) B #s(literal 1 binary64)) B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (+.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) B) (-.f64 (*.f64 #s(literal -1 binary64) x) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) x) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) x))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 1/6 binary64)) (*.f64 #s(literal -1 binary64) x)) B) (*.f64 x (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))))) B #s(literal 1 binary64)) B))
#s(approx (neg (/ (* x 1) (tan B))) (*.f64 (*.f64 x (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))
#s(approx (neg (/ (* x 1) (tan B))) (-.f64 (*.f64 (fma.f64 x (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) x) B) (*.f64 x (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (neg (/ (* x 1) (tan B))) (-.f64 (*.f64 (fma.f64 B (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) x) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (fma.f64 x (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) x)) B) (*.f64 x (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (neg (/ (* x 1) (tan B))) (-.f64 (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) x) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal -1 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) x) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 1/3 binary64)) (*.f64 #s(literal -1/3 binary64) x))) B (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) x) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) B (fma.f64 x (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) x)) B) (*.f64 x (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (* x 1) (tan B)) (*.f64 x (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ (* x 1) (tan B)) (fma.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) x) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) B (*.f64 x (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (* x 1) (tan B)) (fma.f64 (-.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) B) (-.f64 (*.f64 #s(literal -1 binary64) x) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) x) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) x)) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) x) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) B (*.f64 x (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (* x 1) (tan B)) (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/3 binary64) x) (fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) x) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) x) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 1/3 binary64)))) B) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) x) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) B (*.f64 #s(literal -1 binary64) x)) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) x) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) B (*.f64 x (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (fma.f64 (*.f64 #s(literal -1 binary64) B) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 1 binary64)) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) B) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 1 binary64))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 1 binary64))) B (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 1/3 binary64))) (/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))))))) B) (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (/.f64 (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 1 binary64)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) B) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 1 binary64))) B (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) (+.f64 (*.f64 #s(literal -1 binary64) B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) (fma.f64 (-.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 B B)) #s(literal 1 binary64)) B (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -2/15 binary64) (*.f64 B B)) #s(literal 1/3 binary64)) (*.f64 B B)) #s(literal 1 binary64)) B (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (neg (tan B)) (*.f64 #s(literal -1 binary64) B))
#s(approx (neg (tan B)) (*.f64 (-.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 B B)) #s(literal 1 binary64)) B))
#s(approx (neg (tan B)) (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -2/15 binary64) (*.f64 B B)) #s(literal 1/3 binary64)) (*.f64 B B)) #s(literal 1 binary64)) B))
#s(approx (neg (tan B)) (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -17/315 binary64) (*.f64 B B)) #s(literal 2/15 binary64)) (*.f64 B B)) #s(literal 1/3 binary64)) (*.f64 B B)) #s(literal 1 binary64)) B))
#s(approx (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) #s(literal 1 binary64))
#s(approx (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) (fma.f64 B (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) #s(literal 1 binary64)))
#s(approx (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) (fma.f64 (fma.f64 (*.f64 (*.f64 B B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1/3 binary64) (*.f64 #s(literal 1 binary64) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))))) B #s(literal 1 binary64)))
#s(approx (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 B B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2/15 binary64) (*.f64 #s(literal 1/3 binary64) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))))) (*.f64 B B) (*.f64 #s(literal 1 binary64) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))))) B #s(literal 1 binary64)))
#s(approx (* (neg (tan B)) (tan (/ (PI) 2))) (*.f64 (*.f64 B (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))
#s(approx (* (neg (tan B)) (tan (/ (PI) 2))) (*.f64 (fma.f64 (*.f64 (*.f64 B B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1/3 binary64) (*.f64 (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) #s(literal -1 binary64))) B))
#s(approx (* (neg (tan B)) (tan (/ (PI) 2))) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 B B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -2/15 binary64) (*.f64 (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) #s(literal -1/3 binary64))) (*.f64 B B) (*.f64 (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) #s(literal -1 binary64))) B))
#s(approx (* (neg (tan B)) (tan (/ (PI) 2))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 B B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -17/315 binary64) (*.f64 #s(literal -2/15 binary64) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))))) (*.f64 B B) (*.f64 (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) #s(literal -1/3 binary64))) (*.f64 B B) (*.f64 (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) #s(literal -1 binary64))) B))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) B))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/.f64 (fma.f64 (-.f64 (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/3 binary64)) (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 1/6 binary64) (fma.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/3 binary64) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (*.f64 B B) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) B))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/.f64 (fma.f64 (-.f64 (fma.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -1/3 binary64) (-.f64 (fma.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -1/9 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 2/15 binary64) (/.f64 (*.f64 (-.f64 (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 1/6 binary64) (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/3 binary64))) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (fma.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))) (fma.f64 (/.f64 (*.f64 (pow.f64 (-.f64 (fma.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64))) #s(literal -1 binary64) (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 7/360 binary64) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) #s(literal 2/3 binary64))))) #s(literal 7/360 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (*.f64 B B) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 1/6 binary64) (fma.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/3 binary64) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (*.f64 B B) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) B))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (+.f64 (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -1/3 binary64) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -1/9 binary64))) (+.f64 (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 2/15 binary64))) (fma.f64 (fma.f64 (fma.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -1/9 binary64) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 2/15 binary64))) #s(literal -1/3 binary64) (-.f64 (+.f64 (fma.f64 (/.f64 (-.f64 (*.f64 x #s(literal 1/45 binary64)) #s(literal 7/360 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -1/3 binary64) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -2/45 binary64))) (+.f64 (fma.f64 #s(literal 2/45 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 17/315 binary64))) (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/15 binary64) x)))) #s(literal 7/360 binary64)) (/.f64 (-.f64 (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 1/6 binary64) (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/3 binary64))) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (*.f64 (-.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 7/360 binary64)) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) #s(literal -1/3 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -1/9 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 2/15 binary64) (/.f64 (*.f64 (-.f64 (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 1/6 binary64) (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/3 binary64))) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (fma.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))) (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (-.f64 (fma.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) #s(literal 2/3 binary64))))) #s(literal 7/360 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (-.f64 (fma.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal -1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) #s(literal 2/3 binary64))))) #s(literal 7/360 binary64)) (-.f64 (fma.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64))) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64))) #s(literal -1 binary64) (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 31/15120 binary64) (fma.f64 #s(literal 1/315 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (fma.f64 #s(literal -2/45 binary64) x (fma.f64 #s(literal 17/315 binary64) x (fma.f64 #s(literal 62/315 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (fma.f64 (-.f64 (*.f64 x #s(literal 1/45 binary64)) #s(literal 7/360 binary64)) #s(literal 2/3 binary64) (*.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))))))) #s(literal 31/15120 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))))) (*.f64 B B) (/.f64 (*.f64 (-.f64 (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 1/6 binary64) (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/3 binary64))) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (fma.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))) (fma.f64 (/.f64 (*.f64 (pow.f64 (-.f64 (fma.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64))) #s(literal -1 binary64) (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 7/360 binary64) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) #s(literal 2/3 binary64))))) #s(literal 7/360 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (*.f64 B B) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 1/6 binary64) (fma.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/3 binary64) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (*.f64 B B) (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) B))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (/.f64 (*.f64 x x) B) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (fma.f64 (*.f64 (*.f64 B B) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) #s(literal -1 binary64) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) B))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 B B)) (fma.f64 (/.f64 (*.f64 (pow.f64 (-.f64 (fma.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) #s(literal 2/3 binary64))))) #s(literal 7/360 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 B B) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) B))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 B B)) (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (-.f64 (fma.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) #s(literal 2/3 binary64))))) #s(literal 7/360 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (-.f64 (fma.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal -1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) #s(literal 2/3 binary64))))) #s(literal 7/360 binary64)) (-.f64 (fma.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64))) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (fma.f64 #s(literal -2/45 binary64) x (fma.f64 #s(literal 17/315 binary64) x (fma.f64 #s(literal 62/315 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (fma.f64 (-.f64 (*.f64 x #s(literal 1/45 binary64)) #s(literal 7/360 binary64)) #s(literal 2/3 binary64) (*.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))))))) #s(literal 31/15120 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (fma.f64 (/.f64 (*.f64 (pow.f64 (-.f64 (fma.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64))) #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) #s(literal 2/3 binary64))))) #s(literal 7/360 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (*.f64 B B)) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (*.f64 x x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (*.f64 B B) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) B))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (/.f64 (*.f64 x x) (*.f64 B B)))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (/.f64 (fma.f64 (pow.f64 (*.f64 B x) #s(literal 2 binary64)) #s(literal -2/3 binary64) (*.f64 x x)) (*.f64 B B)))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (/.f64 (fma.f64 (pow.f64 x #s(literal 1 binary64)) (pow.f64 x #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 B B)) (*.f64 (*.f64 x x) #s(literal -1/15 binary64)) (*.f64 #s(literal -2/3 binary64) (*.f64 x x))) (*.f64 B B))) (*.f64 B B)))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (/.f64 (fma.f64 (pow.f64 x #s(literal 1 binary64)) (pow.f64 x #s(literal 1 binary64)) (*.f64 (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 B B)) (fma.f64 (*.f64 (*.f64 x x) #s(literal -1/15 binary64)) #s(literal -2/3 binary64) (*.f64 (*.f64 x x) #s(literal -52/945 binary64)))) (*.f64 (*.f64 x x) #s(literal -1/15 binary64))) (*.f64 B B) (*.f64 #s(literal -2/3 binary64) (*.f64 x x))) (*.f64 B B))) (*.f64 B B)))
#s(approx (/ (* x 1) (tan B)) (/.f64 x B))
#s(approx (/ (* x 1) (tan B)) (/.f64 (fma.f64 (*.f64 (*.f64 B B) x) #s(literal -1/3 binary64) x) B))
#s(approx (/ (* x 1) (tan B)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 B B)) (*.f64 x #s(literal 1/45 binary64)) (*.f64 #s(literal -1/3 binary64) x)) (*.f64 B B) x) B))
#s(approx (/ (* x 1) (tan B)) (/.f64 (fma.f64 (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 B B)) (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (*.f64 x #s(literal 1/105 binary64)))) (*.f64 x #s(literal 1/45 binary64))) (*.f64 B B) (*.f64 #s(literal -1/3 binary64) x)) (*.f64 B B) x) B))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (pow.f64 B #s(literal -1 binary64)))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (/.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (/.f64 (fma.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -2/945 binary64) (*.f64 B B)) #s(literal 1/45 binary64)) (*.f64 B B)) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) B))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (/.f64 (-.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (*.f64 B B) (*.f64 #s(literal -1 binary64) x)) #s(literal 1 binary64)) B))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (/.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 x #s(literal 1/45 binary64)) #s(literal 7/360 binary64)) (*.f64 B B) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (*.f64 B B) (*.f64 #s(literal -1 binary64) x)) #s(literal 1 binary64)) B))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (/.f64 (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (+.f64 (fma.f64 (-.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (*.f64 x #s(literal 1/105 binary64))) #s(literal 31/15120 binary64)) (*.f64 B B) (*.f64 #s(literal 2/15 binary64) x)) (*.f64 #s(literal -1/9 binary64) x)) #s(literal 7/360 binary64)) (*.f64 B B) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (*.f64 B B) (*.f64 #s(literal -1 binary64) x)) #s(literal 1 binary64)) B))
#s(approx (neg (/ (* x 1) (tan B))) (*.f64 (/.f64 x B) #s(literal -1 binary64)))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 B B)) x (*.f64 #s(literal -1 binary64) x)) B))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (fma.f64 (fma.f64 (*.f64 x #s(literal 1/45 binary64)) (*.f64 B B) (*.f64 #s(literal 1/3 binary64) x)) (*.f64 B B) (*.f64 #s(literal -1 binary64) x)) B))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (fma.f64 (fma.f64 (+.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 x #s(literal 1/45 binary64)) (*.f64 x #s(literal 1/105 binary64))) (*.f64 B B) (*.f64 #s(literal 2/15 binary64) x)) (*.f64 #s(literal -1/9 binary64) x)) (*.f64 B B) (*.f64 #s(literal 1/3 binary64) x)) (*.f64 B B) (*.f64 #s(literal -1 binary64) x)) B))
#s(approx (exp (* (log (sin B)) -1)) (pow.f64 B #s(literal -1 binary64)))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (fma.f64 (fma.f64 #s(literal 7/360 binary64) (*.f64 B B) #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 31/15120 binary64) (*.f64 B B) #s(literal 7/360 binary64)) (*.f64 B B) #s(literal 1/6 binary64)) (*.f64 B B) #s(literal 1 binary64)) B))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (pow.f64 (*.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) B) #s(literal -1 binary64)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (fma.f64 (-.f64 (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 1/6 binary64) (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/3 binary64))) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (*.f64 B B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64))) B))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (fma.f64 (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 1/6 binary64) (-.f64 (fma.f64 (-.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 7/360 binary64)) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) #s(literal -1/3 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -1/9 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 2/15 binary64) (/.f64 (*.f64 (-.f64 (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 1/6 binary64) (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/3 binary64))) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (fma.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))) (*.f64 B B) (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/3 binary64))) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/3 binary64)))) (*.f64 B B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64))) B))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (fma.f64 (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 1/6 binary64) (-.f64 (fma.f64 (-.f64 (fma.f64 (-.f64 (-.f64 (fma.f64 #s(literal 1/315 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (*.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 31/15120 binary64))) (*.f64 (fma.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -1/9 binary64) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 2/15 binary64))) #s(literal -1/3 binary64))) (+.f64 (fma.f64 (/.f64 (-.f64 (*.f64 x #s(literal 1/45 binary64)) #s(literal 7/360 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -1/3 binary64) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -2/45 binary64))) (+.f64 (fma.f64 #s(literal 2/45 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 17/315 binary64))) (fma.f64 (-.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/15 binary64) x)))) #s(literal 7/360 binary64)) (/.f64 (-.f64 (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 1/6 binary64) (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/3 binary64))) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (*.f64 (-.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 7/360 binary64)) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) #s(literal -1/3 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -1/9 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 2/15 binary64) (/.f64 (*.f64 (-.f64 (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 1/6 binary64) (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/3 binary64))) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (fma.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))))) (*.f64 B B) (*.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 7/360 binary64))) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -1/3 binary64) (fma.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -1/9 binary64) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 2/15 binary64) (/.f64 (*.f64 (-.f64 (fma.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) #s(literal 1/6 binary64) (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/3 binary64))) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/3 binary64))) (fma.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))))) (*.f64 B B) (*.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) #s(literal 1/3 binary64))) (*.f64 (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal 1/3 binary64)))) (*.f64 B B) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64))) B))
#s(approx (pow (pow (sin B) 2) -1) (pow.f64 (*.f64 B B) #s(literal -1 binary64)))
#s(approx (pow (pow (sin B) 2) -1) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 B B) #s(literal 1 binary64)) (*.f64 B B)))
#s(approx (pow (pow (sin B) 2) -1) (/.f64 (fma.f64 (fma.f64 #s(literal 1/15 binary64) (*.f64 B B) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) (*.f64 B B)))
#s(approx (pow (pow (sin B) 2) -1) (/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 2/189 binary64) (*.f64 B B) #s(literal 1/15 binary64)) (*.f64 B B) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) (*.f64 B B)))
#s(approx (pow (sin B) 2) (*.f64 B B))
#s(approx (pow (sin B) 2) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 B B) #s(literal 1 binary64)) (*.f64 B B)))
#s(approx (pow (sin B) 2) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) (*.f64 B B)))
#s(approx (pow (sin B) 2) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 B B) #s(literal 2/45 binary64)) (*.f64 B B)) #s(literal 1/3 binary64)) (*.f64 B B) #s(literal 1 binary64)) (*.f64 B B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (/ (* x 1) (tan B)) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B)))
#s(approx (tan B) (tan.f64 B))
#s(approx (exp (* (log (sin B)) -1)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (sin B) (sin.f64 B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))))
#s(approx (pow (* (sin B) x) -1) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)))
#s(approx (* (sin B) x) (*.f64 (sin.f64 B) x))
#s(approx (/ (cos B) (sin B)) (/.f64 (cos.f64 B) (sin.f64 B)))
#s(approx (cos B) (cos.f64 B))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (/ (* x 1) (tan B)) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B)))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (/.f64 (cos.f64 B) (sin.f64 B)))
#s(approx (exp (* (log (sin B)) -1)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (* (log (sin B)) -1) (log.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (log (sin B)) (log.f64 (sin.f64 B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (-.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) (tan.f64 B)) x) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64))))))
#s(approx (neg (/ (* x 1) (tan B))) (*.f64 (/.f64 (*.f64 (-.f64 (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) (tan.f64 B)) x) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
#s(approx (/ (* x 1) (tan B)) (/.f64 (*.f64 (-.f64 (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) (tan.f64 B)) x) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (/.f64 (-.f64 (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) (tan.f64 B)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) (-.f64 (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) (tan.f64 B)))
#s(approx (neg (tan B)) (*.f64 #s(literal -1 binary64) (tan.f64 B)))
#s(approx (- 1 (* (neg (tan B)) (tan (/ (PI) 2)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64))))
#s(approx (* (neg (tan B)) (tan (/ (PI) 2))) (*.f64 (*.f64 (tan.f64 B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (/.f64 (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
#s(approx (/ (* x 1) (tan B)) (/.f64 (*.f64 (cos.f64 B) x) (sin.f64 B)))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (tan B)) (tan (/ (PI) 2))))) (/.f64 (cos.f64 B) (sin.f64 B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (-.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (neg (/ (* x 1) (tan B))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (exp (* (log (sin B)) -1)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
#s(approx (pow (pow (sin B) 2) -1) (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)))
#s(approx (pow (sin B) 2) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (* x 1) x)
#s(approx (* x 1) x)
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) (/.f64 (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))) x))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (fma.f64 (-.f64 (/.f64 (tan.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))) (/.f64 (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64))))) x (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (neg (/ (* x 1) (tan B))) (*.f64 (-.f64 (/.f64 (tan.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))) (/.f64 (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64))))) x))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (fma.f64 (fma.f64 (*.f64 #s(literal 0 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) x (/.f64 (*.f64 #s(literal -1 binary64) (cos.f64 B)) (sin.f64 B))) x (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 B) x) #s(literal 2 binary64))) (sin.f64 B)))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (fma.f64 (/.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (sin.f64 B)) (*.f64 x x) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) x) (sin.f64 B)) (*.f64 x x))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 B) #s(literal 4 binary64)) x)) (sin.f64 B)) (/.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 B) #s(literal 3 binary64))) (sin.f64 B))) x (/.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (sin.f64 B))) (*.f64 x x)))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 (fma.f64 (fma.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 B) #s(literal 5 binary64)) x) (pow.f64 (cos.f64 B) #s(literal 4 binary64))) (sin.f64 B)) x (*.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)))) x (/.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (sin.f64 B))) (*.f64 x x)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (neg x) (*.f64 #s(literal -1 binary64) x))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (-.f64 (*.f64 (cos.f64 B) x) #s(literal 1 binary64)) (sin.f64 B)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (-.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) x)) (sin.f64 B)) (/.f64 (*.f64 #s(literal -1 binary64) (cos.f64 B)) (sin.f64 B))) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (-.f64 (*.f64 (fma.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) x) (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (sin.f64 B)) x (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)))) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) (fma.f64 (/.f64 (*.f64 #s(literal -1 binary64) (cos.f64 B)) (sin.f64 B)) x (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) x)))
#s(approx (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) (/.f64 (*.f64 #s(literal -1 binary64) (cos.f64 B)) (sin.f64 B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (*.f64 (-.f64 (/.f64 (tan.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))) (/.f64 (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64))))) x))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (*.f64 (-.f64 (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (tan.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64))))) (/.f64 (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64))))) x))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (fma.f64 (/.f64 (*.f64 #s(literal -1 binary64) (cos.f64 B)) (sin.f64 B)) x (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) x)))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 (fma.f64 (/.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64) (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) (*.f64 (cos.f64 B) (sin.f64 B))))) x))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 (-.f64 (fma.f64 (/.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 x x) x) #s(literal -1 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))))) (/.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) (*.f64 (cos.f64 B) (sin.f64 B)))) x))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 B) x)) (sin.f64 B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (*.f64 (*.f64 #s(literal -1 binary64) x) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (/.f64 #s(literal -1 binary64) x) (*.f64 (cos.f64 B) (sin.f64 B))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (-.f64 (/.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) (/.f64 (pow.f64 (cos.f64 B) #s(literal -1 binary64)) (sin.f64 B))) x))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (-.f64 (-.f64 (/.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) (/.f64 (pow.f64 (cos.f64 B) #s(literal -1 binary64)) (sin.f64 B))) (/.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)))) x))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (-.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 x x) x) #s(literal -1 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 4 binary64)) (sin.f64 B))) (/.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))) (/.f64 (pow.f64 (cos.f64 B) #s(literal -1 binary64)) (sin.f64 B))) (/.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)))) x))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (*.f64 (*.f64 #s(literal -1 binary64) x) (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (*.f64 (*.f64 #s(literal -1 binary64) x) (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)))))
#s(approx (* (- (pow (* (sin B) x) -1) (/ (cos B) (sin B))) x) (*.f64 (*.f64 #s(literal -1 binary64) x) (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (*.f64 (*.f64 #s(literal -1 binary64) x) (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)))))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (*.f64 (/.f64 (*.f64 (-.f64 (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) (tan.f64 B)) x) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
#s(approx (+ (neg (/ (* x 1) (tan B))) (/ 1 (sin B))) (fma.f64 (/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64))) (tan.f64 B))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 B) (tan.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (PI.f64)))) #s(literal -1 binary64)))) x (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) x)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (*.f64 (*.f64 #s(literal -1 binary64) x) (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 (*.f64 #s(literal -1 binary64) x) (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 (*.f64 #s(literal -1 binary64) x) (fma.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (/.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 (cos.f64 B) (sin.f64 B)))) x) #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 (*.f64 #s(literal -1 binary64) x) (fma.f64 (/.f64 (fma.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 B) #s(literal -1 binary64)) (sin.f64 B)) (/.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))) x) #s(literal -1 binary64) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) x) #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 B) #s(literal -1 binary64)) (sin.f64 B)) (/.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))) x) #s(literal -1 binary64)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 (/.f64 (fma.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (sin.f64 B)) (/.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)))) x) #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal -1 binary64)) (sin.f64 B))) x) #s(literal -1 binary64)))
#s(approx (/ (pow (pow (sin B) 2) -1) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) #s(literal -1 binary64)) (sin.f64 B)) (/.f64 (pow.f64 x #s(literal -1 binary64)) (*.f64 (pow.f64 (cos.f64 B) #s(literal 4 binary64)) (sin.f64 B)))) x) #s(literal -1 binary64) (/.f64 (pow.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (sin.f64 B))) x) #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal -1 binary64)) (sin.f64 B))) x) #s(literal -1 binary64)))

eval100.0ms (2.3%)

Memory
2.2MiB live, 185.7MiB allocated; 41ms collecting garbage
Compiler

Compiled 26 218 to 2 688 computations (89.7% saved)

prune212.0ms (5%)

Memory
-8.8MiB live, 216.4MiB allocated; 238ms collecting garbage
Pruning

9 alts after pruning (5 fresh and 4 done)

PrunedKeptTotal
New5845589
Fresh202
Picked145
Done000
Total5879596
Accuracy
100.0%
Counts
596 → 9
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶99.8%
(fma.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
✓57.2%
(-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
▶57.2%
(-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
✓99.8%
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
▶78.3%
(+.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
✓68.0%
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))))
▶56.6%
(+.f64 (neg.f64 (*.f64 x (*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))))
▶33.5%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))) x))
✓86.0%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
Compiler

Compiled 443 to 238 computations (46.3% saved)

series164.0ms (3.8%)

Memory
4.6MiB live, 280.3MiB allocated; 32ms collecting garbage
Counts
60 → 313
Calls
Call 1
Inputs
(fma.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(pow.f64 (tan.f64 B) #s(literal -1 binary64))
(tan.f64 B)
B
#s(literal -1 binary64)
(*.f64 #s(literal -1 binary64) x)
x
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(sin.f64 B)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))) x))
(*.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))) x)
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))))
(-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B))))
(*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)))
(pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))
(*.f64 (sin.f64 B) x)
(*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B)))
(/.f64 (cos.f64 B) (sin.f64 B))
(cos.f64 B)
(fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))
(pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(+.f64 (neg.f64 (*.f64 x (*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))))
(neg.f64 (*.f64 x (*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)))))
(*.f64 x (*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)))
(pow.f64 (tan.f64 B) #s(literal -1/2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64)))
(*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))
(log.f64 (sin.f64 B))
(+.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(neg.f64 (tan.f64 B))
(tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(literal 1 binary64)
(*.f64 (neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64))))))
(/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))
(+.f64 (tan.f64 B) (tan.f64 (PI.f64)))
(tan.f64 (PI.f64))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64))))
(*.f64 (tan.f64 B) (tan.f64 (PI.f64)))
(/.f64 #s(literal 1 binary64) (sin.f64 B))
(-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)
(-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(neg.f64 x)
(/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(pow.f64 (sin.f64 B) #s(literal -2 binary64))
#s(literal -2 binary64)
Outputs
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (/ (+ 1 (* -1 x)) B)))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (/ (+ 1 (+ (* -1 x) (* (pow B 2) (+ 1/6 (* 1/3 x))))) B)))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (/ (+ 1 (+ (* -1 x) (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (* 2/15 x))))))))) B)))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (/ (+ 1 (+ (* -1 x) (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ 31/15120 (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x)))))))))))))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ 1 B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (tan B) #s(hole binary64 B))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* 1/3 (pow B 2))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* 2/15 (pow B 2))))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 2/15 (* 17/315 (pow B 2))))))))))
#s(approx B #s(hole binary64 B))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ 1 B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (sin B) #s(hole binary64 B))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* -1/6 (pow B 2))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* 1/120 (pow B 2)) 1/6))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/120 (* -1/5040 (pow B 2)))) 1/6))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ 31/15120 (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (/ (* x (- (/ 1 (pow x 2)) 1)) (* B (+ 1 (/ 1 x))))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (/ (+ (* (pow B 2) (- (/ (* x (+ 2/3 (* 1/3 (/ 1 (pow x 2))))) (+ 1 (/ 1 x))) (/ (* x (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)))) (/ (* x (- (/ 1 (pow x 2)) 1)) (+ 1 (/ 1 x)))) B)))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* (pow B 2) (- (/ (* x (- (* 1/15 (/ 1 (pow x 2))) 1/15)) (+ 1 (/ 1 x))) (+ (/ (* x (* (- (* 7/360 (/ 1 x)) 1/45) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ (* x (+ 2/3 (* 1/3 (/ 1 (pow x 2))))) (+ 1 (/ 1 x))) (/ (* x (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)))) (+ 1 (/ 1 x)))))) (/ (* x (+ 2/3 (* 1/3 (/ 1 (pow x 2))))) (+ 1 (/ 1 x)))) (/ (* x (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)))) (/ (* x (- (/ 1 (pow x 2)) 1)) (+ 1 (/ 1 x)))) B)))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* (pow B 2) (- (+ (* (pow B 2) (- (/ (* x (- (* 2/189 (/ 1 (pow x 2))) 2/189)) (+ 1 (/ 1 x))) (+ (/ (* x (* (- (* 31/15120 (/ 1 x)) 2/945) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)) (+ (/ (* (- (* 7/360 (/ 1 x)) 1/45) (- (/ (* x (+ 2/3 (* 1/3 (/ 1 (pow x 2))))) (+ 1 (/ 1 x))) (/ (* x (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)))) (+ 1 (/ 1 x))) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ (* x (- (* 1/15 (/ 1 (pow x 2))) 1/15)) (+ 1 (/ 1 x))) (+ (/ (* x (* (- (* 7/360 (/ 1 x)) 1/45) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ (* x (+ 2/3 (* 1/3 (/ 1 (pow x 2))))) (+ 1 (/ 1 x))) (/ (* x (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)))) (+ 1 (/ 1 x)))))) (+ 1 (/ 1 x))))))) (/ (* x (- (* 1/15 (/ 1 (pow x 2))) 1/15)) (+ 1 (/ 1 x)))) (+ (/ (* x (* (- (* 7/360 (/ 1 x)) 1/45) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ (* x (+ 2/3 (* 1/3 (/ 1 (pow x 2))))) (+ 1 (/ 1 x))) (/ (* x (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)))) (+ 1 (/ 1 x)))))) (/ (* x (+ 2/3 (* 1/3 (/ 1 (pow x 2))))) (+ 1 (/ 1 x)))) (/ (* x (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)))) (/ (* x (- (/ 1 (pow x 2)) 1)) (+ 1 (/ 1 x)))) B)))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (/ 1 (pow x 2)) 1) (* B (+ 1 (/ 1 x))))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* 1/3 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (* 2/3 (/ 1 (+ 1 (/ 1 x))))) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)))) (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (/ 1 (+ 1 (/ 1 x)))) B)))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* 1/3 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (+ (* 2/3 (/ 1 (+ 1 (/ 1 x)))) (* (pow B 2) (- (* 1/15 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (+ (* 1/15 (/ 1 (+ 1 (/ 1 x)))) (+ (/ (* (- (* 7/360 (/ 1 x)) 1/45) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (+ (* 1/3 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (* 2/3 (/ 1 (+ 1 (/ 1 x))))) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)))) (+ 1 (/ 1 x))))))))) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)))) (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (/ 1 (+ 1 (/ 1 x)))) B)))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* 1/3 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (+ (* 2/3 (/ 1 (+ 1 (/ 1 x)))) (* (pow B 2) (- (+ (* 1/15 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (* (pow B 2) (- (* 2/189 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (+ (* 2/189 (/ 1 (+ 1 (/ 1 x)))) (+ (/ (* (- (* 31/15120 (/ 1 x)) 2/945) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)) (+ (/ (* (- (* 7/360 (/ 1 x)) 1/45) (- (+ (* 1/3 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (* 2/3 (/ 1 (+ 1 (/ 1 x))))) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)))) (+ 1 (/ 1 x))) (/ (* (- (* 1/15 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (+ (* 1/15 (/ 1 (+ 1 (/ 1 x)))) (+ (/ (* (- (* 7/360 (/ 1 x)) 1/45) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (+ (* 1/3 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (* 2/3 (/ 1 (+ 1 (/ 1 x))))) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)))) (+ 1 (/ 1 x)))))) (- (* 1/6 (/ 1 x)) 1/3)) (+ 1 (/ 1 x))))))))) (+ (* 1/15 (/ 1 (+ 1 (/ 1 x)))) (+ (/ (* (- (* 7/360 (/ 1 x)) 1/45) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (+ (* 1/3 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (* 2/3 (/ 1 (+ 1 (/ 1 x))))) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)))) (+ 1 (/ 1 x))))))))) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)))) (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (/ 1 (+ 1 (/ 1 x)))) B)))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (/ 1 (pow x 2)) 1) (pow B 2))))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 2/3 (* 1/3 (/ 1 (pow x 2))))) (/ 1 (pow x 2))) 1) (pow B 2))))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 2/3 (+ (* 1/3 (/ 1 (pow x 2))) (* (pow B 2) (- (* 1/15 (/ 1 (pow x 2))) 1/15))))) (/ 1 (pow x 2))) 1) (pow B 2))))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 2/3 (+ (* 1/3 (/ 1 (pow x 2))) (* (pow B 2) (- (+ (* 1/15 (/ 1 (pow x 2))) (* (pow B 2) (- (* 2/189 (/ 1 (pow x 2))) 2/189))) 1/15))))) (/ 1 (pow x 2))) 1) (pow B 2))))
#s(approx (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) #s(hole binary64 (/ 1 (* (pow B 2) (pow x 2)))))
#s(approx (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) #s(hole binary64 (/ (+ (* 1/3 (/ (pow B 2) (pow x 2))) (/ 1 (pow x 2))) (pow B 2))))
#s(approx (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* 1/15 (/ (pow B 2) (pow x 2))) (* 1/3 (/ 1 (pow x 2))))) (/ 1 (pow x 2))) (pow B 2))))
#s(approx (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* (pow B 2) (+ (* 2/189 (/ (pow B 2) (pow x 2))) (* 1/15 (/ 1 (pow x 2))))) (* 1/3 (/ 1 (pow x 2))))) (/ 1 (pow x 2))) (pow B 2))))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ 1 (* B x))))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ (+ (* 1/6 (/ (pow B 2) x)) (/ 1 x)) B)))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* 7/360 (/ (pow B 2) x)) (* 1/6 (/ 1 x)))) (/ 1 x)) B)))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* (pow B 2) (+ (* 31/15120 (/ (pow B 2) x)) (* 7/360 (/ 1 x)))) (* 1/6 (/ 1 x)))) (/ 1 x)) B)))
#s(approx (* (sin B) x) #s(hole binary64 (* B x)))
#s(approx (* (sin B) x) #s(hole binary64 (* B (+ x (* -1/6 (* (pow B 2) x))))))
#s(approx (* (sin B) x) #s(hole binary64 (* B (+ x (* (pow B 2) (+ (* -1/6 x) (* 1/120 (* (pow B 2) x))))))))
#s(approx (* (sin B) x) #s(hole binary64 (* B (+ x (* (pow B 2) (+ (* -1/6 x) (* (pow B 2) (+ (* -1/5040 (* (pow B 2) x)) (* 1/120 x)))))))))
#s(approx (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) #s(hole binary64 (/ 1 (pow B 2))))
#s(approx (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ 1 (* -2/3 (pow B 2))) (pow B 2))))
#s(approx (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* 1/15 (pow B 2)) 2/3))) (pow B 2))))
#s(approx (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/15 (* 2/189 (pow B 2)))) 2/3))) (pow B 2))))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (cos B) #s(hole binary64 1))
#s(approx (cos B) #s(hole binary64 (+ 1 (* -1/2 (pow B 2)))))
#s(approx (cos B) #s(hole binary64 (+ 1 (* (pow B 2) (- (* 1/24 (pow B 2)) 1/2)))))
#s(approx (cos B) #s(hole binary64 (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/24 (* -1/720 (pow B 2)))) 1/2)))))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ 1 (/ 1 x)) B)))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ 1 (+ (* (pow B 2) (- (* 1/6 (/ 1 x)) 1/3)) (/ 1 x))) B)))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ 1 (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 x)) (* (pow B 2) (- (* 7/360 (/ 1 x)) 1/45))) 1/3)) (/ 1 x))) B)))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ 1 (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 x)) (* (pow B 2) (- (+ (* 7/360 (/ 1 x)) (* (pow B 2) (- (* 31/15120 (/ 1 x)) 2/945))) 1/45))) 1/3)) (/ 1 x))) B)))
#s(approx (pow (* (sin B) x) -1/2) #s(hole binary64 (sqrt (/ 1 (* B x)))))
#s(approx (pow (* (sin B) x) -1/2) #s(hole binary64 (/ (+ (sqrt (/ B x)) (* 1/12 (sqrt (/ (pow B 5) x)))) B)))
#s(approx (pow (* (sin B) x) -1/2) #s(hole binary64 (/ (+ (sqrt (/ B x)) (* (pow B 3) (+ (* 7/720 (sqrt (/ (pow B 3) x))) (* 1/12 (sqrt (/ 1 (* B x))))))) B)))
#s(approx (pow (* (sin B) x) -1/2) #s(hole binary64 (/ (+ (sqrt (/ B x)) (* (pow B 3) (+ (* 1/12 (sqrt (/ 1 (* B x)))) (* (pow B 2) (+ (* -1/288 (sqrt (/ 1 (* B x)))) (* 7/720 (sqrt (/ 1 (* B x))))))))) B)))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ 31/15120 (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) #s(hole binary64 (/ x B)))
#s(approx (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) #s(hole binary64 (/ 1 B)))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (pow (tan B) -1/2) #s(hole binary64 (sqrt (/ 1 B))))
#s(approx (pow (tan B) -1/2) #s(hole binary64 (/ (+ (sqrt B) (* -1/6 (sqrt (pow B 5)))) B)))
#s(approx (pow (tan B) -1/2) #s(hole binary64 (/ (+ (sqrt B) (* (pow B 3) (+ (* -1/6 (sqrt (/ 1 B))) (* -1/90 (sqrt (pow B 3)))))) B)))
#s(approx (pow (tan B) -1/2) #s(hole binary64 (/ (+ (sqrt B) (* (pow B 3) (+ (* -1/6 (sqrt (/ 1 B))) (* (pow B 2) (+ (* -1/72 (sqrt (/ 1 B))) (* -1/90 (sqrt (/ 1 B)))))))) B)))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ 1 B)))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (* -1 (log B))))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (+ (* -1 (log B)) (* 1/6 (pow B 2)))))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (+ (* -1 (log B)) (* (pow B 2) (+ 1/6 (* 1/180 (pow B 2)))))))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (+ (* -1 (log B)) (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 1/180 (* 1/2835 (pow B 2)))))))))
#s(approx (log (sin B)) #s(hole binary64 (log B)))
#s(approx (log (sin B)) #s(hole binary64 (+ (log B) (* -1/6 (pow B 2)))))
#s(approx (log (sin B)) #s(hole binary64 (+ (log B) (* (pow B 2) (- (* -1/180 (pow B 2)) 1/6)))))
#s(approx (log (sin B)) #s(hole binary64 (+ (log B) (* (pow B 2) (- (* (pow B 2) (- (* -1/2835 (pow B 2)) 1/180)) 1/6)))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ 1 B)))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ (+ 1 (* -1 (/ (* B (* x (sin (* 1/2 (PI))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) B)))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ (+ 1 (* B (- (* B (- (+ 1/6 (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))))) B)))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ (+ 1 (* B (- (* B (- (+ 1/6 (+ (* B (+ (* -1 (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (/ (* (sin (* 1/2 (PI))) (* (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))) (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))))) B)))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) #s(hole binary64 (* -1 (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) #s(hole binary64 (- (* B (- (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))) (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) #s(hole binary64 (- (* B (- (+ (* B (+ (* -1 (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (/ (* (sin (* 1/2 (PI))) (* (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) #s(hole binary64 (- (* B (- (+ (* B (+ (* -1 (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (+ (* B (- (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (+ (* -1 (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (/ (* (sin (* 1/2 (PI))) (* (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1/3 (+ (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) (+ (* -1 (/ (pow (sin (PI)) 4) (pow (cos (PI)) 4))) (* -1/3 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))) (* -1/3 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) (/ (* (sin (* 1/2 (PI))) (* (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) #s(hole binary64 (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) #s(hole binary64 (+ (* B (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))) (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) #s(hole binary64 (+ (* B (- (+ (* -1 (* B (+ (* -1 (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (/ (* (sin (* 1/2 (PI))) (* (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))))) (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))) (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) #s(hole binary64 (+ (* B (- (+ (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (* B (- (* B (- (* -1/3 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (+ (* -1 (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (/ (* (sin (* 1/2 (PI))) (* (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1/3 (+ (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) (+ (* -1 (/ (pow (sin (PI)) 4) (pow (cos (PI)) 4))) (* -1/3 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))))) (+ (* -1 (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (/ (* (sin (* 1/2 (PI))) (* (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))) (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) #s(hole binary64 (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (* B (+ (/ 1 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) #s(hole binary64 (+ (* B (- (* -1 (* B (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (+ (/ 1 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))))) (+ (/ 1 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) #s(hole binary64 (+ (* B (- (* B (- (* -1 (* B (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (+ (/ 1 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (+ (* 1/3 (/ 1 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (+ (/ (* (sin (* 1/2 (PI))) (* (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))) (+ (/ 1 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- 1/3 (+ (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) (+ (* -1 (/ (pow (sin (PI)) 4) (pow (cos (PI)) 4))) (* -1/3 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))))) (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (+ (/ 1 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))))) (+ (/ 1 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (+ (* -1 B) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (+ (* B (- (* -1/3 (pow B 2)) 1)) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (+ (* B (- (* (pow B 2) (- (* -2/15 (pow B 2)) 1/3)) 1)) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (neg (tan B)) #s(hole binary64 (* -1 B)))
#s(approx (neg (tan B)) #s(hole binary64 (* B (- (* -1/3 (pow B 2)) 1))))
#s(approx (neg (tan B)) #s(hole binary64 (* B (- (* (pow B 2) (- (* -2/15 (pow B 2)) 1/3)) 1))))
#s(approx (neg (tan B)) #s(hole binary64 (* B (- (* (pow B 2) (- (* (pow B 2) (- (* -17/315 (pow B 2)) 2/15)) 1/3)) 1))))
#s(approx (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) #s(hole binary64 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))
#s(approx (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) #s(hole binary64 (- (+ 1 (/ (* B (* (sin (* 1/2 (PI))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (* 1/2 (PI))))) (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))
#s(approx (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) #s(hole binary64 (- (+ 1 (* B (- (* -1 (/ (* B (* (sin (* 1/2 (PI))) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (cos (* 1/2 (PI))))) (* -1 (/ (* (sin (* 1/2 (PI))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (* 1/2 (PI)))))))) (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))
#s(approx (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) #s(hole binary64 (- (+ 1 (* B (- (* B (- (/ (* B (* (sin (* 1/2 (PI))) (- 1/3 (+ (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) (+ (* -1 (/ (pow (sin (PI)) 4) (pow (cos (PI)) 4))) (* -1/3 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))))) (cos (* 1/2 (PI)))) (/ (* (sin (* 1/2 (PI))) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3))))) (cos (* 1/2 (PI)))))) (* -1 (/ (* (sin (* 1/2 (PI))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (* 1/2 (PI)))))))) (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))
#s(approx (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) #s(hole binary64 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))
#s(approx (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) #s(hole binary64 (+ (* -1 (/ (* B (* (sin (* 1/2 (PI))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (* 1/2 (PI))))) (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))
#s(approx (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) #s(hole binary64 (+ (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))) (* B (+ (* -1 (/ (* (sin (* 1/2 (PI))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (* 1/2 (PI))))) (/ (* B (* (sin (* 1/2 (PI))) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (cos (* 1/2 (PI)))))))))
#s(approx (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) #s(hole binary64 (+ (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))) (* B (+ (* -1 (/ (* (sin (* 1/2 (PI))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (* 1/2 (PI))))) (* B (+ (* -1 (/ (* B (* (sin (* 1/2 (PI))) (- 1/3 (+ (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) (+ (* -1 (/ (pow (sin (PI)) 4) (pow (cos (PI)) 4))) (* -1/3 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))))) (cos (* 1/2 (PI))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3))))) (cos (* 1/2 (PI)))))))))))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) #s(hole binary64 (* -1 (/ (sin (PI)) (cos (PI))))))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) #s(hole binary64 (- (* B (- (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) 1)) (/ (sin (PI)) (cos (PI))))))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) #s(hole binary64 (- (* B (- (+ (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) (* B (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) 1)) (/ (sin (PI)) (cos (PI))))))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) #s(hole binary64 (- (* B (- (+ (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) (* B (+ (* -1 (/ (sin (PI)) (cos (PI)))) (+ (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3))) (* B (- (+ (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) (+ (* -1 (/ (pow (sin (PI)) 4) (pow (cos (PI)) 4))) (* -1/3 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) 1/3)))))) 1)) (/ (sin (PI)) (cos (PI))))))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) #s(hole binary64 (+ (* B (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) #s(hole binary64 (+ (* B (- (+ 1 (/ (* B (* (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 B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) #s(hole binary64 (+ (* B (- (+ 1 (* B (- (* B (- 1/3 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (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 (+ (tan B) (tan (PI))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (+ (tan B) (tan (PI))) #s(hole binary64 (+ B (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan B) (tan (PI))) #s(hole binary64 (+ (* B (+ 1 (* 1/3 (pow B 2)))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan B) (tan (PI))) #s(hole binary64 (+ (* B (+ 1 (* (pow B 2) (+ 1/3 (* 2/15 (pow B 2)))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (- 1 (* (tan B) (tan (PI)))) #s(hole binary64 1))
#s(approx (- 1 (* (tan B) (tan (PI)))) #s(hole binary64 (+ 1 (* -1 (/ (* B (sin (PI))) (cos (PI)))))))
#s(approx (- 1 (* (tan B) (tan (PI)))) #s(hole binary64 (+ 1 (* B (- (* -1/3 (/ (* (pow B 2) (sin (PI))) (cos (PI)))) (/ (sin (PI)) (cos (PI))))))))
#s(approx (- 1 (* (tan B) (tan (PI)))) #s(hole binary64 (+ 1 (* B (- (* (pow B 2) (- (* -2/15 (/ (* (pow B 2) (sin (PI))) (cos (PI)))) (* 1/3 (/ (sin (PI)) (cos (PI)))))) (/ (sin (PI)) (cos (PI))))))))
#s(approx (* (tan B) (tan (PI))) #s(hole binary64 (/ (* B (sin (PI))) (cos (PI)))))
#s(approx (* (tan B) (tan (PI))) #s(hole binary64 (* B (+ (* 1/3 (/ (* (pow B 2) (sin (PI))) (cos (PI)))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (* (tan B) (tan (PI))) #s(hole binary64 (* B (+ (* (pow B 2) (+ (* 2/15 (/ (* (pow B 2) (sin (PI))) (cos (PI)))) (* 1/3 (/ (sin (PI)) (cos (PI)))))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (* (tan B) (tan (PI))) #s(hole binary64 (* B (+ (* (pow B 2) (+ (* 1/3 (/ (sin (PI)) (cos (PI)))) (* (pow B 2) (+ (* 17/315 (/ (* (pow B 2) (sin (PI))) (cos (PI)))) (* 2/15 (/ (sin (PI)) (cos (PI)))))))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ (- (/ (pow x 2) (- (* -1 x) 1)) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (* 1/3 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))))) (/ (pow x 2) (- (* -1 x) 1))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* 1/3 (/ x (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))) (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))))))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))))) (/ (pow x 2) (- (* -1 x) 1))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* 1/3 (/ x (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (+ (* (pow B 2) (- (+ (* -1/3 (/ (+ (* -1/9 x) (* 2/15 x)) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (+ (* -1/9 x) (* 2/15 x)) 7/360) (pow (- (* -1 x) 1) 2))) (+ (* -2/45 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 17/315 (/ x (pow (- (* -1 x) 1) 2))) (+ (/ (* (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))) (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1/3 (- (* 1/3 x) 1/6)) (+ (* -1/9 x) (+ (* 2/45 (- (* -1 x) 1)) (* 2/15 x)))) 7/360) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1))) (+ (* -1 (/ (* (pow x 2) (* (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6))) (pow (- (* -1 x) 1) 3))) (+ (* 31/15120 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/315 (/ 1 (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (+ (* 17/315 x) (+ (* 62/315 (- (* -1 x) 1)) (+ (* 17/45 (- (* 1/3 x) 1/6)) (* 2/3 (- (+ (* -1/9 x) (* 2/15 x)) 7/360))))))) 31/15120)) (pow (- (* -1 x) 1) 2)))))))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))) (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))))))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))))) (/ (pow x 2) (- (* -1 x) 1))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (pow x 2) (* B (- (* -1 x) 1)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow B 2) (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6))) (pow (- (* -1 x) 1) 2))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1))) (+ (* -1 (/ (* (pow x 2) (* (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6))) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (+ (* 17/315 x) (+ (* 62/315 (- (* -1 x) 1)) (+ (* 17/45 (- (* 1/3 x) 1/6)) (* 2/3 (- (+ (* -1/9 x) (* 2/15 x)) 7/360))))))) 31/15120)) (pow (- (* -1 x) 1) 2)))))) (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (pow x 2) (pow B 2))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (+ (* -2/3 (* (pow B 2) (pow x 2))) (pow x 2)) (pow B 2))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2))))) (* 2/3 (pow x 2)))) (pow x 2)) (pow B 2))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -2/3 (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2)))) (+ (* -34/135 (pow x 2)) (* 62/315 (pow x 2)))))) (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2))))) (* 2/3 (pow x 2)))) (pow x 2)) (pow B 2))))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ x B)))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ (- (* -1 x) 1) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (* 1/3 x) 1/6))) 1) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (+ (* 1/3 x) (* (pow B 2) (- (+ (* -1/9 x) (* 2/15 x)) 7/360))) 1/6))) 1) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (+ (* 1/3 x) (* (pow B 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))) 31/15120)))) 7/360))) 1/6))) 1) B)))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (* -1 (/ x B))))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* 1/3 (* (pow B 2) x))) B)))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))))) B)))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x)))))))))) B)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ 1 (* B (- (* -1 x) 1)))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (* (pow B 2) (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (* (pow B 2) (- (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (+ (* 31/15120 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/315 (/ 1 (- (* -1 x) 1)))) (+ (* -1/3 (/ (+ (* -1/9 x) (* 2/15 x)) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (+ (* -1/9 x) (* 2/15 x)) 7/360) (pow (- (* -1 x) 1) 2))) (+ (* -2/45 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 17/315 (/ x (pow (- (* -1 x) 1) 2))) (+ (/ (* (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))) (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1/3 (- (* 1/3 x) 1/6)) (+ (* -1/9 x) (+ (* 2/45 (- (* -1 x) 1)) (* 2/15 x)))) 7/360) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))))))) (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (pow (sin B) -2) #s(hole binary64 (/ 1 (pow B 2))))
#s(approx (pow (sin B) -2) #s(hole binary64 (/ (+ 1 (* 1/3 (pow B 2))) (pow B 2))))
#s(approx (pow (sin B) -2) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/3 (* 1/15 (pow B 2))))) (pow B 2))))
#s(approx (pow (sin B) -2) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 1/15 (* 2/189 (pow B 2))))))) (pow B 2))))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (tan B) #s(hole binary64 (/ (sin B) (cos B))))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ 1 (sin B))))
#s(approx (sin B) #s(hole binary64 (sin B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (/ (* x (- (/ 1 (* (pow x 2) (pow (sin B) 2))) (/ (pow (cos B) 2) (pow (sin B) 2)))) (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (/ 1 (* (pow x 2) (pow (sin B) 2))) (/ (pow (cos B) 2) (pow (sin B) 2))) (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) #s(hole binary64 (- (/ 1 (* (pow x 2) (pow (sin B) 2))) (/ (pow (cos B) 2) (pow (sin B) 2)))))
#s(approx (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) #s(hole binary64 (/ 1 (* (pow x 2) (pow (sin B) 2)))))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ 1 (* x (sin B)))))
#s(approx (* (sin B) x) #s(hole binary64 (* x (sin B))))
#s(approx (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) #s(hole binary64 (/ (pow (cos B) 2) (pow (sin B) 2))))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (cos B) #s(hole binary64 (cos B)))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B)))))
#s(approx (pow (* (sin B) x) -1/2) #s(hole binary64 (sqrt (/ 1 (* x (sin B))))))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (pow (tan B) -1/2) #s(hole binary64 (sqrt (/ (cos B) (sin B)))))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (* -1 (log (sin B)))))
#s(approx (log (sin B)) #s(hole binary64 (log (sin B))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI))))))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) #s(hole binary64 (* -1 (/ (* x (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI))))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) #s(hole binary64 (/ (* x (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI)))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) #s(hole binary64 (/ (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI)))))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))))
#s(approx (neg (tan B)) #s(hole binary64 (* -1 (/ (sin B) (cos B)))))
#s(approx (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) #s(hole binary64 (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI))))))))
#s(approx (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) #s(hole binary64 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI)))))))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) #s(hole binary64 (* -1 (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI)))))))))))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) #s(hole binary64 (/ (+ (/ (sin B) (cos B)) (/ (sin (PI)) (cos (PI)))) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))
#s(approx (+ (tan B) (tan (PI))) #s(hole binary64 (+ (/ (sin B) (cos B)) (/ (sin (PI)) (cos (PI))))))
#s(approx (- 1 (* (tan B) (tan (PI)))) #s(hole binary64 (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI)))))))
#s(approx (* (tan B) (tan (PI))) #s(hole binary64 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (- (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2))))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (pow (sin B) -2) #s(hole binary64 (/ 1 (pow (sin B) 2))))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* -1 x) #s(hole binary64 (* -1 x)))
#s(approx x #s(hole binary64 x))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (/ 1 (* x (sin B)))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) x)))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) #s(hole binary64 (/ 1 (* (pow x 2) (pow (sin B) 2)))))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2))) (/ 1 (pow (sin B) 2))) (pow x 2))))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (/ 1 (* x (sin B)))))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))) x)))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (+ (* x (- (/ (sin B) (* (cos B) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI)))))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI)))))))))) (/ 1 (sin B)))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) #s(hole binary64 (* x (- (/ (sin B) (* (cos B) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI)))))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI))))))))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (+ (* x (+ (* -1 (/ (cos B) (sin B))) (* x (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (pow (cos B) 2) (sin B)))))) (/ 1 (sin B)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (* (pow x 2) (pow (cos B) 2)) (sin B)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (* x (pow (cos B) 3)) (sin B))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* x (- (* -1 (/ (* x (pow (cos B) 4)) (sin B))) (* -1 (/ (pow (cos B) 3) (sin B)))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* x (- (* x (- (/ (* x (pow (cos B) 5)) (sin B)) (/ (pow (cos B) 4) (sin B)))) (* -1 (/ (pow (cos B) 3) (sin B)))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ -1 (sin B))))
#s(approx (neg x) #s(hole binary64 (* -1 x)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (- (/ (* x (cos B)) (sin B)) (/ 1 (sin B)))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (- (* x (- (* -1 (/ (* x (pow (cos B) 2)) (sin B))) (* -1 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (- (* x (- (* x (- (/ (* x (pow (cos B) 3)) (sin B)) (/ (pow (cos B) 2) (sin B)))) (* -1 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (* -1 (/ (cos B) (sin B)))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B))))))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) #s(hole binary64 (* -1 (/ (pow (cos B) 2) (pow (sin B) 2)))))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (* x (- (/ (sin B) (* (cos B) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI)))))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI))))))))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (* x (- (+ (/ 1 (* x (sin B))) (/ (sin B) (* (cos B) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI))))))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI))))))))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))) (/ 1 (* (pow x 2) (* (cos B) (sin B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (/ 1 (* x (sin B))) (/ 1 (* (pow x 3) (* (pow (cos B) 2) (sin B)))))) (/ 1 (* (pow x 2) (* (cos B) (sin B))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (* -1 (* x (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B)))))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ -1 (* x (* (cos B) (sin B))))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (- (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (/ 1 (* (cos B) (sin B)))) x)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (- (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (+ (/ 1 (* (cos B) (sin B))) (/ 1 (* (pow x 2) (* (pow (cos B) 3) (sin B)))))) x)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (- (+ (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (/ 1 (* (pow x 3) (* (pow (cos B) 4) (sin B))))) (+ (/ 1 (* (cos B) (sin B))) (/ 1 (* (pow x 2) (* (pow (cos B) 3) (sin B)))))) x)))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (* -1 (* x (+ (/ (cos B) (sin B)) (/ (pow (sqrt -1) 2) (* x (sin B))))))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (+ (* -1 (/ (pow (sqrt -1) 2) (sin B))) (/ 1 (* x (* (cos B) (sin B))))) (/ (pow (sqrt -1) 4) (* x (* (cos B) (sin B))))) x)) (/ (cos B) (sin B)))))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (/ 1 (* (cos B) (sin B))) (/ (pow (sqrt -1) 4) (* (cos B) (sin B))))) (* -1 (/ (* (pow (sqrt -1) 2) (- (/ 1 (* (cos B) (sin B))) (/ (pow (sqrt -1) 4) (* (cos B) (sin B))))) (* x (cos B))))) x)) (* -1 (/ (pow (sqrt -1) 2) (sin B)))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (+ (* -1 (/ (cos B) (sin B))) (* -1 (/ (pow (sqrt -1) 2) (* x (sin B)))))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (+ (* -1 (/ (cos B) (sin B))) (* -1 (/ (- (* -1 (/ (- (/ 1 (* (cos B) (sin B))) (/ (pow (sqrt -1) 4) (* (cos B) (sin B)))) x)) (* -1 (/ (pow (sqrt -1) 2) (sin B)))) x)))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (+ (* -1 (/ (cos B) (sin B))) (* -1 (/ (- (* -1 (/ (- (+ (/ 1 (* (cos B) (sin B))) (/ (* (pow (sqrt -1) 2) (- (/ 1 (* (cos B) (sin B))) (/ (pow (sqrt -1) 4) (* (cos B) (sin B))))) (* x (cos B)))) (/ (pow (sqrt -1) 4) (* (cos B) (sin B)))) x)) (* -1 (/ (pow (sqrt -1) 2) (sin B)))) x)))))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (+ (* -1 (/ (pow (sqrt -1) 2) (* x (sin B)))) (/ (cos B) (sin B)))))
#s(approx (pow (* (sin B) x) -1/2) #s(hole binary64 (* (sqrt (/ 1 (* x (sin B)))) (pow (sqrt -1) 2))))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (* -1 (/ (* x (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI))))))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (* x (+ (* -1 (/ (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI)))))))) (/ 1 (* x (sin B)))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (/ 1 (sin B)) (/ 1 (* x (* (cos B) (sin B))))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (cos B) (sin B))) (/ 1 (* x (* (pow (cos B) 2) (sin B))))) x)) (/ 1 (sin B))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (- (/ 1 (* (cos B) (sin B))) (/ 1 (* x (* (pow (cos B) 2) (sin B))))) x))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (pow (cos B) 2) (sin B))) (/ 1 (* x (* (pow (cos B) 3) (sin B))))) x)) (/ 1 (* (cos B) (sin B)))) x))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (pow (cos B) 3) (sin B))) (/ 1 (* x (* (pow (cos B) 4) (sin B))))) x)) (/ 1 (* (pow (cos B) 2) (sin B)))) x)) (/ 1 (* (cos B) (sin B)))) x))))
Calls

6 calls:

TimeVariablePointExpression
56.0ms
B
@inf
((+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) (pow (tan B) -1) (tan B) B -1 (* -1 x) x (pow (sin B) -1) (sin B) (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (pow (* (sin B) x) -1) (* (sin B) x) (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) (/ (cos B) (sin B)) (cos B) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) (pow (* (sin B) x) -1/2) -1/2 (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) (* (pow (tan B) -1/2) (pow (tan B) -1/2)) (pow (tan B) -1/2) (exp (* (log (sin B)) -1)) (* (log (sin B)) -1) (log (sin B)) (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) (+ (neg (tan B)) (tan (/ (PI) 2))) (neg (tan B)) (tan (/ (PI) 2)) (/ (PI) 2) (PI) 2 (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) (+ (tan B) (tan (PI))) (tan (PI)) (- 1 (* (tan B) (tan (PI)))) (* (tan B) (tan (PI))) (/ 1 (sin B)) (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (* (pow (tan B) -1) x) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (* (neg x) (pow (tan B) -1)) (neg x) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (pow (sin B) -2) -2)
26.0ms
B
@-inf
((+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) (pow (tan B) -1) (tan B) B -1 (* -1 x) x (pow (sin B) -1) (sin B) (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (pow (* (sin B) x) -1) (* (sin B) x) (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) (/ (cos B) (sin B)) (cos B) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) (pow (* (sin B) x) -1/2) -1/2 (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) (* (pow (tan B) -1/2) (pow (tan B) -1/2)) (pow (tan B) -1/2) (exp (* (log (sin B)) -1)) (* (log (sin B)) -1) (log (sin B)) (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) (+ (neg (tan B)) (tan (/ (PI) 2))) (neg (tan B)) (tan (/ (PI) 2)) (/ (PI) 2) (PI) 2 (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) (+ (tan B) (tan (PI))) (tan (PI)) (- 1 (* (tan B) (tan (PI)))) (* (tan B) (tan (PI))) (/ 1 (sin B)) (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (* (pow (tan B) -1) x) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (* (neg x) (pow (tan B) -1)) (neg x) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (pow (sin B) -2) -2)
23.0ms
B
@0
((+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) (pow (tan B) -1) (tan B) B -1 (* -1 x) x (pow (sin B) -1) (sin B) (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (pow (* (sin B) x) -1) (* (sin B) x) (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) (/ (cos B) (sin B)) (cos B) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) (pow (* (sin B) x) -1/2) -1/2 (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) (* (pow (tan B) -1/2) (pow (tan B) -1/2)) (pow (tan B) -1/2) (exp (* (log (sin B)) -1)) (* (log (sin B)) -1) (log (sin B)) (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) (+ (neg (tan B)) (tan (/ (PI) 2))) (neg (tan B)) (tan (/ (PI) 2)) (/ (PI) 2) (PI) 2 (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) (+ (tan B) (tan (PI))) (tan (PI)) (- 1 (* (tan B) (tan (PI)))) (* (tan B) (tan (PI))) (/ 1 (sin B)) (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (* (pow (tan B) -1) x) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (* (neg x) (pow (tan B) -1)) (neg x) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (pow (sin B) -2) -2)
16.0ms
x
@inf
((+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) (pow (tan B) -1) (tan B) B -1 (* -1 x) x (pow (sin B) -1) (sin B) (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (pow (* (sin B) x) -1) (* (sin B) x) (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) (/ (cos B) (sin B)) (cos B) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) (pow (* (sin B) x) -1/2) -1/2 (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) (* (pow (tan B) -1/2) (pow (tan B) -1/2)) (pow (tan B) -1/2) (exp (* (log (sin B)) -1)) (* (log (sin B)) -1) (log (sin B)) (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) (+ (neg (tan B)) (tan (/ (PI) 2))) (neg (tan B)) (tan (/ (PI) 2)) (/ (PI) 2) (PI) 2 (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) (+ (tan B) (tan (PI))) (tan (PI)) (- 1 (* (tan B) (tan (PI)))) (* (tan B) (tan (PI))) (/ 1 (sin B)) (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (* (pow (tan B) -1) x) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (* (neg x) (pow (tan B) -1)) (neg x) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (pow (sin B) -2) -2)
15.0ms
x
@-inf
((+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) (pow (tan B) -1) (tan B) B -1 (* -1 x) x (pow (sin B) -1) (sin B) (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (pow (* (sin B) x) -1) (* (sin B) x) (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) (/ (cos B) (sin B)) (cos B) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) (pow (* (sin B) x) -1/2) -1/2 (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) (* (pow (tan B) -1/2) (pow (tan B) -1/2)) (pow (tan B) -1/2) (exp (* (log (sin B)) -1)) (* (log (sin B)) -1) (log (sin B)) (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) (+ (neg (tan B)) (tan (/ (PI) 2))) (neg (tan B)) (tan (/ (PI) 2)) (/ (PI) 2) (PI) 2 (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) (+ (tan B) (tan (PI))) (tan (PI)) (- 1 (* (tan B) (tan (PI)))) (* (tan B) (tan (PI))) (/ 1 (sin B)) (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (* (pow (tan B) -1) x) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (* (neg x) (pow (tan B) -1)) (neg x) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (pow (sin B) -2) -2)

rewrite214.0ms (5%)

Memory
-1.8MiB live, 230.4MiB allocated; 31ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0170620186
0182814967
0848414593
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
373 → 490
Calls
Call 1
Inputs
(fma.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(pow.f64 (tan.f64 B) #s(literal -1 binary64))
(tan.f64 B)
B
#s(literal -1 binary64)
(*.f64 #s(literal -1 binary64) x)
x
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(sin.f64 B)
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))) x))
(*.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))) x)
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))))
(-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B))))
(*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)))
(pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))
(*.f64 (sin.f64 B) x)
(*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B)))
(/.f64 (cos.f64 B) (sin.f64 B))
(cos.f64 B)
(fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))
(pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(+.f64 (neg.f64 (*.f64 x (*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))))
(neg.f64 (*.f64 x (*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)))))
(*.f64 x (*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)))
(pow.f64 (tan.f64 B) #s(literal -1/2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64)))
(*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))
(log.f64 (sin.f64 B))
(+.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(neg.f64 (tan.f64 B))
(tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(literal 1 binary64)
(*.f64 (neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64))))))
(/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))
(+.f64 (tan.f64 B) (tan.f64 (PI.f64)))
(tan.f64 (PI.f64))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64))))
(*.f64 (tan.f64 B) (tan.f64 (PI.f64)))
(/.f64 #s(literal 1 binary64) (sin.f64 B))
(-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)
(-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(neg.f64 x)
(/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(pow.f64 (sin.f64 B) #s(literal -2 binary64))
#s(literal -2 binary64)
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (/ (+ 1 (* -1 x)) B)))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (/ (+ 1 (+ (* -1 x) (* (pow B 2) (+ 1/6 (* 1/3 x))))) B)))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (/ (+ 1 (+ (* -1 x) (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (* 2/15 x))))))))) B)))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (/ (+ 1 (+ (* -1 x) (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ 31/15120 (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x)))))))))))))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ 1 B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (tan B) #s(hole binary64 B))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* 1/3 (pow B 2))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* 2/15 (pow B 2))))))))
#s(approx (tan B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 2/15 (* 17/315 (pow B 2))))))))))
#s(approx B #s(hole binary64 B))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ 1 B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (sin B) #s(hole binary64 B))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* -1/6 (pow B 2))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* 1/120 (pow B 2)) 1/6))))))
#s(approx (sin B) #s(hole binary64 (* B (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/120 (* -1/5040 (pow B 2)))) 1/6))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ 31/15120 (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (/ (* x (- (/ 1 (pow x 2)) 1)) (* B (+ 1 (/ 1 x))))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (/ (+ (* (pow B 2) (- (/ (* x (+ 2/3 (* 1/3 (/ 1 (pow x 2))))) (+ 1 (/ 1 x))) (/ (* x (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)))) (/ (* x (- (/ 1 (pow x 2)) 1)) (+ 1 (/ 1 x)))) B)))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* (pow B 2) (- (/ (* x (- (* 1/15 (/ 1 (pow x 2))) 1/15)) (+ 1 (/ 1 x))) (+ (/ (* x (* (- (* 7/360 (/ 1 x)) 1/45) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ (* x (+ 2/3 (* 1/3 (/ 1 (pow x 2))))) (+ 1 (/ 1 x))) (/ (* x (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)))) (+ 1 (/ 1 x)))))) (/ (* x (+ 2/3 (* 1/3 (/ 1 (pow x 2))))) (+ 1 (/ 1 x)))) (/ (* x (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)))) (/ (* x (- (/ 1 (pow x 2)) 1)) (+ 1 (/ 1 x)))) B)))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* (pow B 2) (- (+ (* (pow B 2) (- (/ (* x (- (* 2/189 (/ 1 (pow x 2))) 2/189)) (+ 1 (/ 1 x))) (+ (/ (* x (* (- (* 31/15120 (/ 1 x)) 2/945) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)) (+ (/ (* (- (* 7/360 (/ 1 x)) 1/45) (- (/ (* x (+ 2/3 (* 1/3 (/ 1 (pow x 2))))) (+ 1 (/ 1 x))) (/ (* x (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)))) (+ 1 (/ 1 x))) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ (* x (- (* 1/15 (/ 1 (pow x 2))) 1/15)) (+ 1 (/ 1 x))) (+ (/ (* x (* (- (* 7/360 (/ 1 x)) 1/45) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ (* x (+ 2/3 (* 1/3 (/ 1 (pow x 2))))) (+ 1 (/ 1 x))) (/ (* x (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)))) (+ 1 (/ 1 x)))))) (+ 1 (/ 1 x))))))) (/ (* x (- (* 1/15 (/ 1 (pow x 2))) 1/15)) (+ 1 (/ 1 x)))) (+ (/ (* x (* (- (* 7/360 (/ 1 x)) 1/45) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ (* x (+ 2/3 (* 1/3 (/ 1 (pow x 2))))) (+ 1 (/ 1 x))) (/ (* x (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)))) (+ 1 (/ 1 x)))))) (/ (* x (+ 2/3 (* 1/3 (/ 1 (pow x 2))))) (+ 1 (/ 1 x)))) (/ (* x (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1))) (pow (+ 1 (/ 1 x)) 2)))) (/ (* x (- (/ 1 (pow x 2)) 1)) (+ 1 (/ 1 x)))) B)))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (/ 1 (pow x 2)) 1) (* B (+ 1 (/ 1 x))))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* 1/3 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (* 2/3 (/ 1 (+ 1 (/ 1 x))))) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)))) (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (/ 1 (+ 1 (/ 1 x)))) B)))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* 1/3 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (+ (* 2/3 (/ 1 (+ 1 (/ 1 x)))) (* (pow B 2) (- (* 1/15 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (+ (* 1/15 (/ 1 (+ 1 (/ 1 x)))) (+ (/ (* (- (* 7/360 (/ 1 x)) 1/45) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (+ (* 1/3 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (* 2/3 (/ 1 (+ 1 (/ 1 x))))) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)))) (+ 1 (/ 1 x))))))))) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)))) (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (/ 1 (+ 1 (/ 1 x)))) B)))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* 1/3 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (+ (* 2/3 (/ 1 (+ 1 (/ 1 x)))) (* (pow B 2) (- (+ (* 1/15 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (* (pow B 2) (- (* 2/189 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (+ (* 2/189 (/ 1 (+ 1 (/ 1 x)))) (+ (/ (* (- (* 31/15120 (/ 1 x)) 2/945) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)) (+ (/ (* (- (* 7/360 (/ 1 x)) 1/45) (- (+ (* 1/3 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (* 2/3 (/ 1 (+ 1 (/ 1 x))))) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)))) (+ 1 (/ 1 x))) (/ (* (- (* 1/15 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (+ (* 1/15 (/ 1 (+ 1 (/ 1 x)))) (+ (/ (* (- (* 7/360 (/ 1 x)) 1/45) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (+ (* 1/3 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (* 2/3 (/ 1 (+ 1 (/ 1 x))))) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)))) (+ 1 (/ 1 x)))))) (- (* 1/6 (/ 1 x)) 1/3)) (+ 1 (/ 1 x))))))))) (+ (* 1/15 (/ 1 (+ 1 (/ 1 x)))) (+ (/ (* (- (* 7/360 (/ 1 x)) 1/45) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (+ (* 1/3 (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (* 2/3 (/ 1 (+ 1 (/ 1 x))))) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)))) (+ 1 (/ 1 x))))))))) (/ (* (- (* 1/6 (/ 1 x)) 1/3) (- (/ 1 (pow x 2)) 1)) (pow (+ 1 (/ 1 x)) 2)))) (/ 1 (* (pow x 2) (+ 1 (/ 1 x))))) (/ 1 (+ 1 (/ 1 x)))) B)))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (/ 1 (pow x 2)) 1) (pow B 2))))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 2/3 (* 1/3 (/ 1 (pow x 2))))) (/ 1 (pow x 2))) 1) (pow B 2))))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 2/3 (+ (* 1/3 (/ 1 (pow x 2))) (* (pow B 2) (- (* 1/15 (/ 1 (pow x 2))) 1/15))))) (/ 1 (pow x 2))) 1) (pow B 2))))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (+ 2/3 (+ (* 1/3 (/ 1 (pow x 2))) (* (pow B 2) (- (+ (* 1/15 (/ 1 (pow x 2))) (* (pow B 2) (- (* 2/189 (/ 1 (pow x 2))) 2/189))) 1/15))))) (/ 1 (pow x 2))) 1) (pow B 2))))
#s(approx (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) #s(hole binary64 (/ 1 (* (pow B 2) (pow x 2)))))
#s(approx (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) #s(hole binary64 (/ (+ (* 1/3 (/ (pow B 2) (pow x 2))) (/ 1 (pow x 2))) (pow B 2))))
#s(approx (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* 1/15 (/ (pow B 2) (pow x 2))) (* 1/3 (/ 1 (pow x 2))))) (/ 1 (pow x 2))) (pow B 2))))
#s(approx (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* (pow B 2) (+ (* 2/189 (/ (pow B 2) (pow x 2))) (* 1/15 (/ 1 (pow x 2))))) (* 1/3 (/ 1 (pow x 2))))) (/ 1 (pow x 2))) (pow B 2))))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ 1 (* B x))))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ (+ (* 1/6 (/ (pow B 2) x)) (/ 1 x)) B)))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* 7/360 (/ (pow B 2) x)) (* 1/6 (/ 1 x)))) (/ 1 x)) B)))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ (+ (* (pow B 2) (+ (* (pow B 2) (+ (* 31/15120 (/ (pow B 2) x)) (* 7/360 (/ 1 x)))) (* 1/6 (/ 1 x)))) (/ 1 x)) B)))
#s(approx (* (sin B) x) #s(hole binary64 (* B x)))
#s(approx (* (sin B) x) #s(hole binary64 (* B (+ x (* -1/6 (* (pow B 2) x))))))
#s(approx (* (sin B) x) #s(hole binary64 (* B (+ x (* (pow B 2) (+ (* -1/6 x) (* 1/120 (* (pow B 2) x))))))))
#s(approx (* (sin B) x) #s(hole binary64 (* B (+ x (* (pow B 2) (+ (* -1/6 x) (* (pow B 2) (+ (* -1/5040 (* (pow B 2) x)) (* 1/120 x)))))))))
#s(approx (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) #s(hole binary64 (/ 1 (pow B 2))))
#s(approx (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ 1 (* -2/3 (pow B 2))) (pow B 2))))
#s(approx (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* 1/15 (pow B 2)) 2/3))) (pow B 2))))
#s(approx (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/15 (* 2/189 (pow B 2)))) 2/3))) (pow B 2))))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (cos B) #s(hole binary64 1))
#s(approx (cos B) #s(hole binary64 (+ 1 (* -1/2 (pow B 2)))))
#s(approx (cos B) #s(hole binary64 (+ 1 (* (pow B 2) (- (* 1/24 (pow B 2)) 1/2)))))
#s(approx (cos B) #s(hole binary64 (+ 1 (* (pow B 2) (- (* (pow B 2) (+ 1/24 (* -1/720 (pow B 2)))) 1/2)))))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ 1 (/ 1 x)) B)))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ 1 (+ (* (pow B 2) (- (* 1/6 (/ 1 x)) 1/3)) (/ 1 x))) B)))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ 1 (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 x)) (* (pow B 2) (- (* 7/360 (/ 1 x)) 1/45))) 1/3)) (/ 1 x))) B)))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ 1 (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 x)) (* (pow B 2) (- (+ (* 7/360 (/ 1 x)) (* (pow B 2) (- (* 31/15120 (/ 1 x)) 2/945))) 1/45))) 1/3)) (/ 1 x))) B)))
#s(approx (pow (* (sin B) x) -1/2) #s(hole binary64 (sqrt (/ 1 (* B x)))))
#s(approx (pow (* (sin B) x) -1/2) #s(hole binary64 (/ (+ (sqrt (/ B x)) (* 1/12 (sqrt (/ (pow B 5) x)))) B)))
#s(approx (pow (* (sin B) x) -1/2) #s(hole binary64 (/ (+ (sqrt (/ B x)) (* (pow B 3) (+ (* 7/720 (sqrt (/ (pow B 3) x))) (* 1/12 (sqrt (/ 1 (* B x))))))) B)))
#s(approx (pow (* (sin B) x) -1/2) #s(hole binary64 (/ (+ (sqrt (/ B x)) (* (pow B 3) (+ (* 1/12 (sqrt (/ 1 (* B x)))) (* (pow B 2) (+ (* -1/288 (sqrt (/ 1 (* B x)))) (* 7/720 (sqrt (/ 1 (* B x))))))))) B)))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ (- 1 x) B)))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (* 1/3 x)))) x) B)))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (* 2/15 x)))))))) x) B)))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ (- (+ 1 (* (pow B 2) (+ 1/6 (+ (* 1/3 x) (* (pow B 2) (+ 7/360 (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ 31/15120 (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))))))) x) B)))
#s(approx (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) #s(hole binary64 (* -1 (/ x B))))
#s(approx (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) #s(hole binary64 (/ (- (* 1/3 (* (pow B 2) x)) x) B)))
#s(approx (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x))))) x) B)))
#s(approx (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) #s(hole binary64 (/ (- (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))))))) x) B)))
#s(approx (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) #s(hole binary64 (/ x B)))
#s(approx (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) #s(hole binary64 (/ 1 B)))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) #s(hole binary64 (/ (+ 1 (* -1/3 (pow B 2))) B)))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* -1/45 (pow B 2)) 1/3))) B)))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (- (* (pow B 2) (- (* -2/945 (pow B 2)) 1/45)) 1/3))) B)))
#s(approx (pow (tan B) -1/2) #s(hole binary64 (sqrt (/ 1 B))))
#s(approx (pow (tan B) -1/2) #s(hole binary64 (/ (+ (sqrt B) (* -1/6 (sqrt (pow B 5)))) B)))
#s(approx (pow (tan B) -1/2) #s(hole binary64 (/ (+ (sqrt B) (* (pow B 3) (+ (* -1/6 (sqrt (/ 1 B))) (* -1/90 (sqrt (pow B 3)))))) B)))
#s(approx (pow (tan B) -1/2) #s(hole binary64 (/ (+ (sqrt B) (* (pow B 3) (+ (* -1/6 (sqrt (/ 1 B))) (* (pow B 2) (+ (* -1/72 (sqrt (/ 1 B))) (* -1/90 (sqrt (/ 1 B)))))))) B)))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ 1 B)))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (* -1 (log B))))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (+ (* -1 (log B)) (* 1/6 (pow B 2)))))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (+ (* -1 (log B)) (* (pow B 2) (+ 1/6 (* 1/180 (pow B 2)))))))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (+ (* -1 (log B)) (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 1/180 (* 1/2835 (pow B 2)))))))))
#s(approx (log (sin B)) #s(hole binary64 (log B)))
#s(approx (log (sin B)) #s(hole binary64 (+ (log B) (* -1/6 (pow B 2)))))
#s(approx (log (sin B)) #s(hole binary64 (+ (log B) (* (pow B 2) (- (* -1/180 (pow B 2)) 1/6)))))
#s(approx (log (sin B)) #s(hole binary64 (+ (log B) (* (pow B 2) (- (* (pow B 2) (- (* -1/2835 (pow B 2)) 1/180)) 1/6)))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ 1 B)))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ (+ 1 (* -1 (/ (* B (* x (sin (* 1/2 (PI))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) B)))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ (+ 1 (* B (- (* B (- (+ 1/6 (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))))) B)))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ (+ 1 (* B (- (* B (- (+ 1/6 (+ (* B (+ (* -1 (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (/ (* (sin (* 1/2 (PI))) (* (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))) (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))))) B)))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) #s(hole binary64 (* -1 (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) #s(hole binary64 (- (* B (- (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))) (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) #s(hole binary64 (- (* B (- (+ (* B (+ (* -1 (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (/ (* (sin (* 1/2 (PI))) (* (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) #s(hole binary64 (- (* B (- (+ (* B (+ (* -1 (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (+ (* B (- (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (+ (* -1 (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (/ (* (sin (* 1/2 (PI))) (* (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1/3 (+ (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) (+ (* -1 (/ (pow (sin (PI)) 4) (pow (cos (PI)) 4))) (* -1/3 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))) (* -1/3 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) (/ (* (sin (* 1/2 (PI))) (* (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))) (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) #s(hole binary64 (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) #s(hole binary64 (+ (* B (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))) (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) #s(hole binary64 (+ (* B (- (+ (* -1 (* B (+ (* -1 (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (/ (* (sin (* 1/2 (PI))) (* (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))))) (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))) (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) #s(hole binary64 (+ (* B (- (+ (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (* B (- (* B (- (* -1/3 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (+ (* -1 (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (/ (* (sin (* 1/2 (PI))) (* (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1/3 (+ (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) (+ (* -1 (/ (pow (sin (PI)) 4) (pow (cos (PI)) 4))) (* -1/3 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))))) (+ (* -1 (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (/ (* (sin (* 1/2 (PI))) (* (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))) (- (* -1 (/ x (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))) (/ (* x (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))) (/ (* x (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) #s(hole binary64 (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) #s(hole binary64 (+ (* -1 (* B (+ (/ 1 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) #s(hole binary64 (+ (* B (- (* -1 (* B (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (+ (/ 1 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))))) (+ (/ 1 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) #s(hole binary64 (+ (* B (- (* B (- (* -1 (* B (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (+ (/ 1 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (+ (* 1/3 (/ 1 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (+ (/ (* (sin (* 1/2 (PI))) (* (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))) (+ (/ 1 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- 1/3 (+ (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) (+ (* -1 (/ (pow (sin (PI)) 4) (pow (cos (PI)) 4))) (* -1/3 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))))) (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (+ (/ 1 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))) (* -1 (/ (* (pow (sin (* 1/2 (PI))) 2) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2))))))) (+ (/ 1 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))) (/ (* (pow (sin (* 1/2 (PI))) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (* (pow (cos (* 1/2 (PI))) 2) (pow (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))) 2)))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (+ (* -1 B) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (+ (* B (- (* -1/3 (pow B 2)) 1)) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (+ (* B (- (* (pow B 2) (- (* -2/15 (pow B 2)) 1/3)) 1)) (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))))))
#s(approx (neg (tan B)) #s(hole binary64 (* -1 B)))
#s(approx (neg (tan B)) #s(hole binary64 (* B (- (* -1/3 (pow B 2)) 1))))
#s(approx (neg (tan B)) #s(hole binary64 (* B (- (* (pow B 2) (- (* -2/15 (pow B 2)) 1/3)) 1))))
#s(approx (neg (tan B)) #s(hole binary64 (* B (- (* (pow B 2) (- (* (pow B 2) (- (* -17/315 (pow B 2)) 2/15)) 1/3)) 1))))
#s(approx (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) #s(hole binary64 (- 1 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))
#s(approx (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) #s(hole binary64 (- (+ 1 (/ (* B (* (sin (* 1/2 (PI))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (* 1/2 (PI))))) (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))
#s(approx (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) #s(hole binary64 (- (+ 1 (* B (- (* -1 (/ (* B (* (sin (* 1/2 (PI))) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (cos (* 1/2 (PI))))) (* -1 (/ (* (sin (* 1/2 (PI))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (* 1/2 (PI)))))))) (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))
#s(approx (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) #s(hole binary64 (- (+ 1 (* B (- (* B (- (/ (* B (* (sin (* 1/2 (PI))) (- 1/3 (+ (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) (+ (* -1 (/ (pow (sin (PI)) 4) (pow (cos (PI)) 4))) (* -1/3 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))))) (cos (* 1/2 (PI)))) (/ (* (sin (* 1/2 (PI))) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3))))) (cos (* 1/2 (PI)))))) (* -1 (/ (* (sin (* 1/2 (PI))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (* 1/2 (PI)))))))) (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))
#s(approx (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) #s(hole binary64 (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI))))))))
#s(approx (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) #s(hole binary64 (+ (* -1 (/ (* B (* (sin (* 1/2 (PI))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))) (cos (* 1/2 (PI))))) (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))))))
#s(approx (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) #s(hole binary64 (+ (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))) (* B (+ (* -1 (/ (* (sin (* 1/2 (PI))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (* 1/2 (PI))))) (/ (* B (* (sin (* 1/2 (PI))) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) (cos (* 1/2 (PI)))))))))
#s(approx (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) #s(hole binary64 (+ (* -1 (/ (* (sin (PI)) (sin (* 1/2 (PI)))) (* (cos (PI)) (cos (* 1/2 (PI)))))) (* B (+ (* -1 (/ (* (sin (* 1/2 (PI))) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (cos (* 1/2 (PI))))) (* B (+ (* -1 (/ (* B (* (sin (* 1/2 (PI))) (- 1/3 (+ (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) (+ (* -1 (/ (pow (sin (PI)) 4) (pow (cos (PI)) 4))) (* -1/3 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2)))))))) (cos (* 1/2 (PI))))) (/ (* (sin (* 1/2 (PI))) (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3))))) (cos (* 1/2 (PI)))))))))))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) #s(hole binary64 (* -1 (/ (sin (PI)) (cos (PI))))))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) #s(hole binary64 (- (* B (- (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) 1)) (/ (sin (PI)) (cos (PI))))))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) #s(hole binary64 (- (* B (- (+ (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) (* B (+ (* -1 (/ (sin (PI)) (cos (PI)))) (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3)))))) 1)) (/ (sin (PI)) (cos (PI))))))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) #s(hole binary64 (- (* B (- (+ (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) (* B (+ (* -1 (/ (sin (PI)) (cos (PI)))) (+ (* -1 (/ (pow (sin (PI)) 3) (pow (cos (PI)) 3))) (* B (- (+ (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))) (+ (* -1 (/ (pow (sin (PI)) 4) (pow (cos (PI)) 4))) (* -1/3 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) 1/3)))))) 1)) (/ (sin (PI)) (cos (PI))))))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) #s(hole binary64 (+ (* B (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) #s(hole binary64 (+ (* B (- (+ 1 (/ (* B (* (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 B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) #s(hole binary64 (+ (* B (- (+ 1 (* B (- (* B (- 1/3 (+ (* -1 (/ (* (pow (sin (PI)) 2) (- 1 (* -1 (/ (pow (sin (PI)) 2) (pow (cos (PI)) 2))))) (pow (cos (PI)) 2))) (* -1/3 (/ (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 (+ (tan B) (tan (PI))) #s(hole binary64 (/ (sin (PI)) (cos (PI)))))
#s(approx (+ (tan B) (tan (PI))) #s(hole binary64 (+ B (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan B) (tan (PI))) #s(hole binary64 (+ (* B (+ 1 (* 1/3 (pow B 2)))) (/ (sin (PI)) (cos (PI))))))
#s(approx (+ (tan B) (tan (PI))) #s(hole binary64 (+ (* B (+ 1 (* (pow B 2) (+ 1/3 (* 2/15 (pow B 2)))))) (/ (sin (PI)) (cos (PI))))))
#s(approx (- 1 (* (tan B) (tan (PI)))) #s(hole binary64 1))
#s(approx (- 1 (* (tan B) (tan (PI)))) #s(hole binary64 (+ 1 (* -1 (/ (* B (sin (PI))) (cos (PI)))))))
#s(approx (- 1 (* (tan B) (tan (PI)))) #s(hole binary64 (+ 1 (* B (- (* -1/3 (/ (* (pow B 2) (sin (PI))) (cos (PI)))) (/ (sin (PI)) (cos (PI))))))))
#s(approx (- 1 (* (tan B) (tan (PI)))) #s(hole binary64 (+ 1 (* B (- (* (pow B 2) (- (* -2/15 (/ (* (pow B 2) (sin (PI))) (cos (PI)))) (* 1/3 (/ (sin (PI)) (cos (PI)))))) (/ (sin (PI)) (cos (PI))))))))
#s(approx (* (tan B) (tan (PI))) #s(hole binary64 (/ (* B (sin (PI))) (cos (PI)))))
#s(approx (* (tan B) (tan (PI))) #s(hole binary64 (* B (+ (* 1/3 (/ (* (pow B 2) (sin (PI))) (cos (PI)))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (* (tan B) (tan (PI))) #s(hole binary64 (* B (+ (* (pow B 2) (+ (* 2/15 (/ (* (pow B 2) (sin (PI))) (cos (PI)))) (* 1/3 (/ (sin (PI)) (cos (PI)))))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (* (tan B) (tan (PI))) #s(hole binary64 (* B (+ (* (pow B 2) (+ (* 1/3 (/ (sin (PI)) (cos (PI)))) (* (pow B 2) (+ (* 17/315 (/ (* (pow B 2) (sin (PI))) (cos (PI)))) (* 2/15 (/ (sin (PI)) (cos (PI)))))))) (/ (sin (PI)) (cos (PI)))))))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ 1 B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* 1/6 (pow B 2))) B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* 7/360 (pow B 2))))) B)))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/6 (* (pow B 2) (+ 7/360 (* 31/15120 (pow B 2))))))) B)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ (- (/ (pow x 2) (- (* -1 x) 1)) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (* 1/3 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))))) (/ (pow x 2) (- (* -1 x) 1))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* 1/3 (/ x (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))) (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))))))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))))) (/ (pow x 2) (- (* -1 x) 1))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ (- (+ (* (pow B 2) (- (+ (* 1/3 (/ x (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (+ (* (pow B 2) (- (+ (* -1/3 (/ (+ (* -1/9 x) (* 2/15 x)) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (+ (* -1/9 x) (* 2/15 x)) 7/360) (pow (- (* -1 x) 1) 2))) (+ (* -2/45 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 17/315 (/ x (pow (- (* -1 x) 1) 2))) (+ (/ (* (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))) (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1/3 (- (* 1/3 x) 1/6)) (+ (* -1/9 x) (+ (* 2/45 (- (* -1 x) 1)) (* 2/15 x)))) 7/360) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1))) (+ (* -1 (/ (* (pow x 2) (* (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6))) (pow (- (* -1 x) 1) 3))) (+ (* 31/15120 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/315 (/ 1 (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (+ (* 17/315 x) (+ (* 62/315 (- (* -1 x) 1)) (+ (* 17/45 (- (* 1/3 x) 1/6)) (* 2/3 (- (+ (* -1/9 x) (* 2/15 x)) 7/360))))))) 31/15120)) (pow (- (* -1 x) 1) 2)))))))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))) (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))))))) (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))))) (/ (pow x 2) (- (* -1 x) 1))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (pow x 2) (* B (- (* -1 x) 1)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow B 2) (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6))) (pow (- (* -1 x) 1) 2))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1 (/ (* (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (- (* -1 x) 1))) (+ (* -1 (/ (* (pow x 2) (* (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6))) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (+ (* 17/315 x) (+ (* 62/315 (- (* -1 x) 1)) (+ (* 17/45 (- (* 1/3 x) 1/6)) (* 2/3 (- (+ (* -1/9 x) (* 2/15 x)) 7/360))))))) 31/15120)) (pow (- (* -1 x) 1) 2)))))) (+ (* -1 (/ (* (pow x 2) (pow (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6) 2)) (pow (- (* -1 x) 1) 3))) (/ (* (pow x 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (+ (* 17/45 (- (* -1 x) 1)) (* 2/3 (- (* 1/3 x) 1/6))))) 7/360)) (pow (- (* -1 x) 1) 2))))) (/ (* (pow x 2) (- (+ (* 1/3 x) (* 2/3 (- (* -1 x) 1))) 1/6)) (pow (- (* -1 x) 1) 2)))) (/ (pow x 2) (- (* -1 x) 1))) B)))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (pow x 2) (pow B 2))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (+ (* -2/3 (* (pow B 2) (pow x 2))) (pow x 2)) (pow B 2))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (+ (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2))))) (* 2/3 (pow x 2)))) (pow x 2)) (pow B 2))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (+ (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -2/3 (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2)))) (+ (* -34/135 (pow x 2)) (* 62/315 (pow x 2)))))) (+ (* -4/9 (pow x 2)) (* 17/45 (pow x 2))))) (* 2/3 (pow x 2)))) (pow x 2)) (pow B 2))))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ x B)))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ (+ x (* -1/3 (* (pow B 2) x))) B)))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ (+ x (* (pow B 2) (- (* (pow B 2) (- (* -1 (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))))) (+ (* -1/9 x) (* 2/15 x)))) (* 1/3 x)))) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ (- (* -1 x) 1) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (* 1/3 x) 1/6))) 1) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (+ (* 1/3 x) (* (pow B 2) (- (+ (* -1/9 x) (* 2/15 x)) 7/360))) 1/6))) 1) B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ (- (+ (* -1 x) (* (pow B 2) (- (+ (* 1/3 x) (* (pow B 2) (- (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (- (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x))) 31/15120)))) 7/360))) 1/6))) 1) B)))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (* -1 (/ x B))))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* 1/3 (* (pow B 2) x))) B)))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (* 2/15 x)))))) B)))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (/ (+ (* -1 x) (* (pow B 2) (+ (* 1/3 x) (* (pow B 2) (+ (* -1/9 x) (+ (* 2/15 x) (* (pow B 2) (+ (* -1/3 (+ (* -1/9 x) (* 2/15 x))) (+ (* -2/45 x) (* 17/315 x)))))))))) B)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ 1 (* B (- (* -1 x) 1)))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (* (pow B 2) (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (+ (* (pow B 2) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* 1/3 (/ 1 (- (* -1 x) 1))) (* (pow B 2) (- (+ (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (* (pow B 2) (- (+ (* 31/15120 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/315 (/ 1 (- (* -1 x) 1)))) (+ (* -1/3 (/ (+ (* -1/9 x) (* 2/15 x)) (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (+ (* -1/9 x) (* 2/15 x)) 7/360) (pow (- (* -1 x) 1) 2))) (+ (* -2/45 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* 17/315 (/ x (pow (- (* -1 x) 1) 2))) (+ (/ (* (- (* 7/360 (/ 1 (pow (- (* -1 x) 1) 2))) (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))) (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6)) (- (* -1 x) 1)) (/ (* (- (+ (* -1/3 (- (* 1/3 x) 1/6)) (+ (* -1/9 x) (+ (* 2/45 (- (* -1 x) 1)) (* 2/15 x)))) 7/360) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1))))))))))) (+ (* -1/3 (/ (- (* 1/3 x) 1/6) (pow (- (* -1 x) 1) 2))) (+ (* -1/9 (/ x (pow (- (* -1 x) 1) 2))) (+ (* 2/45 (/ 1 (- (* -1 x) 1))) (+ (* 2/15 (/ x (pow (- (* -1 x) 1) 2))) (/ (* (- (+ (* -1/3 (- (* -1 x) 1)) (* 1/3 x)) 1/6) (- (+ (* 1/6 (/ 1 (pow (- (* -1 x) 1) 2))) (* 1/3 (/ 1 (- (* -1 x) 1)))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (- (* -1 x) 1)))))))))) (* 1/3 (/ x (pow (- (* -1 x) 1) 2))))) (/ 1 (- (* -1 x) 1))) B)))
#s(approx (pow (sin B) -2) #s(hole binary64 (/ 1 (pow B 2))))
#s(approx (pow (sin B) -2) #s(hole binary64 (/ (+ 1 (* 1/3 (pow B 2))) (pow B 2))))
#s(approx (pow (sin B) -2) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/3 (* 1/15 (pow B 2))))) (pow B 2))))
#s(approx (pow (sin B) -2) #s(hole binary64 (/ (+ 1 (* (pow B 2) (+ 1/3 (* (pow B 2) (+ 1/15 (* 2/189 (pow B 2))))))) (pow B 2))))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (pow (tan B) -1) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (tan B) #s(hole binary64 (/ (sin B) (cos B))))
#s(approx (pow (sin B) -1) #s(hole binary64 (/ 1 (sin B))))
#s(approx (sin B) #s(hole binary64 (sin B)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (/ (* x (- (/ 1 (* (pow x 2) (pow (sin B) 2))) (/ (pow (cos B) 2) (pow (sin B) 2)))) (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (- (/ 1 (* (pow x 2) (pow (sin B) 2))) (/ (pow (cos B) 2) (pow (sin B) 2))) (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) #s(hole binary64 (- (/ 1 (* (pow x 2) (pow (sin B) 2))) (/ (pow (cos B) 2) (pow (sin B) 2)))))
#s(approx (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) #s(hole binary64 (/ 1 (* (pow x 2) (pow (sin B) 2)))))
#s(approx (pow (* (sin B) x) -1) #s(hole binary64 (/ 1 (* x (sin B)))))
#s(approx (* (sin B) x) #s(hole binary64 (* x (sin B))))
#s(approx (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) #s(hole binary64 (/ (pow (cos B) 2) (pow (sin B) 2))))
#s(approx (/ (cos B) (sin B)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (cos B) #s(hole binary64 (cos B)))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B)))))
#s(approx (pow (* (sin B) x) -1/2) #s(hole binary64 (sqrt (/ 1 (* x (sin B))))))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (cos B)) (sin B)))))
#s(approx (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (pow (tan B) -1/2) #s(hole binary64 (sqrt (/ (cos B) (sin B)))))
#s(approx (exp (* (log (sin B)) -1)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (log (sin B)) -1) #s(hole binary64 (* -1 (log (sin B)))))
#s(approx (log (sin B)) #s(hole binary64 (log (sin B))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (- (/ 1 (sin B)) (/ (* x (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI))))))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) #s(hole binary64 (* -1 (/ (* x (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI))))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) #s(hole binary64 (/ (* x (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI)))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) #s(hole binary64 (/ (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI)))))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) #s(hole binary64 (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))))
#s(approx (neg (tan B)) #s(hole binary64 (* -1 (/ (sin B) (cos B)))))
#s(approx (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) #s(hole binary64 (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI))))))))
#s(approx (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) #s(hole binary64 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI)))))))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) #s(hole binary64 (* -1 (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI)))))))))))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) #s(hole binary64 (/ (+ (/ (sin B) (cos B)) (/ (sin (PI)) (cos (PI)))) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))
#s(approx (+ (tan B) (tan (PI))) #s(hole binary64 (+ (/ (sin B) (cos B)) (/ (sin (PI)) (cos (PI))))))
#s(approx (- 1 (* (tan B) (tan (PI)))) #s(hole binary64 (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI)))))))
#s(approx (* (tan B) (tan (PI))) #s(hole binary64 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))
#s(approx (/ 1 (sin B)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (- (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))) (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) #s(hole binary64 (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2))))
#s(approx (* (pow (tan B) -1) x) #s(hole binary64 (/ (* x (cos B)) (sin B))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (* (neg x) (pow (tan B) -1)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ 1 (* (pow (sin B) 2) (- (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))))
#s(approx (pow (sin B) -2) #s(hole binary64 (/ 1 (pow (sin B) 2))))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* -1 x) #s(hole binary64 (* -1 x)))
#s(approx x #s(hole binary64 x))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (/ 1 (sin B))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (/ 1 (* x (sin B)))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B))) x)))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) #s(hole binary64 (/ 1 (* (pow x 2) (pow (sin B) 2)))))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) #s(hole binary64 (/ (+ (* -1 (/ (* (pow x 2) (pow (cos B) 2)) (pow (sin B) 2))) (/ 1 (pow (sin B) 2))) (pow x 2))))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (/ 1 (* x (sin B)))))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (/ (+ (/ 1 (sin B)) (/ (* x (cos B)) (sin B))) x)))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (+ (* x (- (/ (sin B) (* (cos B) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI)))))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI)))))))))) (/ 1 (sin B)))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) #s(hole binary64 (* x (- (/ (sin B) (* (cos B) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI)))))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI))))))))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (/ 1 (sin B))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (+ (* -1 (/ (* x (cos B)) (sin B))) (/ 1 (sin B)))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (+ (* x (+ (* -1 (/ (cos B) (sin B))) (* x (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (pow (cos B) 2) (sin B)))))) (/ 1 (sin B)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (* (pow x 2) (pow (cos B) 2)) (sin B)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (/ (* x (pow (cos B) 3)) (sin B))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* x (- (* -1 (/ (* x (pow (cos B) 4)) (sin B))) (* -1 (/ (pow (cos B) 3) (sin B)))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* (pow x 2) (+ (* -1 (/ (pow (cos B) 2) (sin B))) (* x (- (* x (- (/ (* x (pow (cos B) 5)) (sin B)) (/ (pow (cos B) 4) (sin B)))) (* -1 (/ (pow (cos B) 3) (sin B)))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (/ -1 (sin B))))
#s(approx (neg x) #s(hole binary64 (* -1 x)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ -1 (sin B))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (- (/ (* x (cos B)) (sin B)) (/ 1 (sin B)))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (- (* x (- (* -1 (/ (* x (pow (cos B) 2)) (sin B))) (* -1 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (- (* x (- (* x (- (/ (* x (pow (cos B) 3)) (sin B)) (/ (pow (cos B) 2) (sin B)))) (* -1 (/ (cos B) (sin B))))) (/ 1 (sin B)))))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (* -1 (/ (cos B) (sin B)))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B))))))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) #s(hole binary64 (* -1 (/ (pow (cos B) 2) (pow (sin B) 2)))))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (/ (cos B) (sin B))))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (* x (- (/ (sin B) (* (cos B) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI)))))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI))))))))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (* x (- (+ (/ 1 (* x (sin B))) (/ (sin B) (* (cos B) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI))))))))) (/ (sin (* 1/2 (PI))) (* (cos (* 1/2 (PI))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI))))))))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (* x (- (/ 1 (* x (sin B))) (/ (cos B) (sin B))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* x (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (/ 1 (* x (sin B)))) (/ 1 (* (pow x 2) (* (cos B) (sin B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* x (- (+ (* -1 (/ (cos B) (sin B))) (+ (/ 1 (* x (sin B))) (/ 1 (* (pow x 3) (* (pow (cos B) 2) (sin B)))))) (/ 1 (* (pow x 2) (* (cos B) (sin B))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (* -1 (/ (* x (cos B)) (sin B)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) #s(hole binary64 (* -1 (* x (+ (/ 1 (* x (sin B))) (/ (cos B) (sin B)))))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ -1 (* x (* (cos B) (sin B))))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (- (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (/ 1 (* (cos B) (sin B)))) x)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (- (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (+ (/ 1 (* (cos B) (sin B))) (/ 1 (* (pow x 2) (* (pow (cos B) 3) (sin B)))))) x)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (/ (- (+ (/ 1 (* x (* (pow (cos B) 2) (sin B)))) (/ 1 (* (pow x 3) (* (pow (cos B) 4) (sin B))))) (+ (/ 1 (* (cos B) (sin B))) (/ 1 (* (pow x 2) (* (pow (cos B) 3) (sin B)))))) x)))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (* -1 (* x (+ (/ (cos B) (sin B)) (/ (pow (sqrt -1) 2) (* x (sin B))))))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (+ (* -1 (/ (pow (sqrt -1) 2) (sin B))) (/ 1 (* x (* (cos B) (sin B))))) (/ (pow (sqrt -1) 4) (* x (* (cos B) (sin B))))) x)) (/ (cos B) (sin B)))))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (/ 1 (* (cos B) (sin B))) (/ (pow (sqrt -1) 4) (* (cos B) (sin B))))) (* -1 (/ (* (pow (sqrt -1) 2) (- (/ 1 (* (cos B) (sin B))) (/ (pow (sqrt -1) 4) (* (cos B) (sin B))))) (* x (cos B))))) x)) (* -1 (/ (pow (sqrt -1) 2) (sin B)))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (+ (* -1 (/ (cos B) (sin B))) (* -1 (/ (pow (sqrt -1) 2) (* x (sin B)))))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (+ (* -1 (/ (cos B) (sin B))) (* -1 (/ (- (* -1 (/ (- (/ 1 (* (cos B) (sin B))) (/ (pow (sqrt -1) 4) (* (cos B) (sin B)))) x)) (* -1 (/ (pow (sqrt -1) 2) (sin B)))) x)))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) #s(hole binary64 (+ (* -1 (/ (cos B) (sin B))) (* -1 (/ (- (* -1 (/ (- (+ (/ 1 (* (cos B) (sin B))) (/ (* (pow (sqrt -1) 2) (- (/ 1 (* (cos B) (sin B))) (/ (pow (sqrt -1) 4) (* (cos B) (sin B))))) (* x (cos B)))) (/ (pow (sqrt -1) 4) (* (cos B) (sin B)))) x)) (* -1 (/ (pow (sqrt -1) 2) (sin B)))) x)))))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) #s(hole binary64 (+ (* -1 (/ (pow (sqrt -1) 2) (* x (sin B)))) (/ (cos B) (sin B)))))
#s(approx (pow (* (sin B) x) -1/2) #s(hole binary64 (* (sqrt (/ 1 (* x (sin B)))) (pow (sqrt -1) 2))))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (* -1 (/ (* x (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B)))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI))))))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) #s(hole binary64 (* x (+ (* -1 (/ (- (/ (sin (* 1/2 (PI))) (cos (* 1/2 (PI)))) (/ (sin B) (cos B))) (- 1 (* -1 (/ (* (sin (* 1/2 (PI))) (+ (/ (sin B) (* (cos B) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))) (/ (sin (PI)) (* (cos (PI)) (- 1 (/ (* (sin B) (sin (PI))) (* (cos B) (cos (PI))))))))) (cos (* 1/2 (PI)))))))) (/ 1 (* x (sin B)))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (- (/ (cos B) (sin B)) (/ 1 (* x (sin B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (- (/ 1 (sin B)) (/ 1 (* x (* (cos B) (sin B))))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (* x (+ (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (cos B) (sin B))) (/ 1 (* x (* (pow (cos B) 2) (sin B))))) x)) (/ 1 (sin B))) x)) (/ (cos B) (sin B)))))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (- (/ 1 (* (cos B) (sin B))) (/ 1 (* x (* (pow (cos B) 2) (sin B))))) x))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (pow (cos B) 2) (sin B))) (/ 1 (* x (* (pow (cos B) 3) (sin B))))) x)) (/ 1 (* (cos B) (sin B)))) x))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (- (/ 1 (* (pow (cos B) 3) (sin B))) (/ 1 (* x (* (pow (cos B) 4) (sin B))))) x)) (/ 1 (* (pow (cos B) 2) (sin B)))) x)) (/ 1 (* (cos B) (sin B)))) x))))
Outputs
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x)) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (-.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x)) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x)) (-.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(fma.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(+.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(*.f64 (neg.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))) (neg.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))))
(*.f64 (fabs.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))) (fabs.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)))
(pow.f64 (*.f64 (tan.f64 B) (tan.f64 B)) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (tan.f64 B) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (tan.f64 B))
(/.f64 #s(literal -1 binary64) (neg.f64 (tan.f64 B)))
(tan.f64 (+.f64 (neg.f64 B) (/.f64 (PI.f64) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (tan.f64 B)) #s(literal -1 binary64)))
(/.f64 (neg.f64 (+.f64 (tan.f64 B) #s(literal 0 binary64))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (sin.f64 B)) (neg.f64 (cos.f64 B)))
(/.f64 (+.f64 (tan.f64 B) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))
(/.f64 (sin.f64 B) (cos.f64 B))
(tan.f64 (+.f64 B (PI.f64)))
(tan.f64 B)
(+.f64 (/.f64 (tan.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64)))) (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64)))))
B
#s(literal -1 binary64)
(*.f64 #s(literal -1 binary64) x)
x
(pow.f64 (exp.f64 (log.f64 (sin.f64 B))) #s(literal -1 binary64))
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (sin.f64 B))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 B)))
(exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))))
(sin.f64 B)
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (*.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))) x))
(*.f64 (/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))) x)
(/.f64 (neg.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))))
(-.f64 (/.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))) (/.f64 (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) #s(literal 2 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))))))
(-.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
(*.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (neg.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))))
(*.f64 (fabs.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (fabs.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))))
(*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)))
(pow.f64 (*.f64 (*.f64 (sin.f64 B) x) (*.f64 (sin.f64 B) x)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (sin.f64 B) x) #s(literal -2 binary64))
(*.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64))) (neg.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64))))
(*.f64 (fabs.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64))) (fabs.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 x #s(literal -1 binary64)))
(pow.f64 (*.f64 (*.f64 (sin.f64 B) x) (*.f64 (sin.f64 B) x)) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 B) x))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 B) x)) #s(literal -1 binary64)))
(*.f64 (sin.f64 B) x)
(*.f64 (neg.f64 (/.f64 (cos.f64 B) (sin.f64 B))) (neg.f64 (/.f64 (cos.f64 B) (sin.f64 B))))
(*.f64 (fabs.f64 (/.f64 (cos.f64 B) (sin.f64 B))) (fabs.f64 (/.f64 (cos.f64 B) (sin.f64 B))))
(*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B)))
(pow.f64 (/.f64 (cos.f64 B) (sin.f64 B)) #s(literal 2 binary64))
(/.f64 (neg.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (neg.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
(/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))
(/.f64 (neg.f64 (cos.f64 B)) (neg.f64 (sin.f64 B)))
(/.f64 (cos.f64 B) (sin.f64 B))
(sin.f64 (+.f64 B (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 B))
(cos.f64 B)
(/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 B) (sin.f64 B)) #s(literal 3 binary64))) (fma.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (neg.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (-.f64 (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))))
(fma.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64))) (neg.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64))) (/.f64 (cos.f64 B) (sin.f64 B)))
(fma.f64 (fabs.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64))) (fabs.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64))) (/.f64 (cos.f64 B) (sin.f64 B)))
(fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))
(fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 x #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))
(+.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))
(*.f64 (pow.f64 (sin.f64 B) #s(literal -1/2 binary64)) (pow.f64 x #s(literal -1/2 binary64)))
(pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 (sin.f64 B) x)) #s(literal -1/2 binary64)))
#s(literal -1/2 binary64)
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (-.f64 (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (-.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(+.f64 (neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(neg.f64 (*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64))))
(*.f64 x (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(*.f64 (neg.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))) (neg.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))))
(*.f64 (fabs.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))) (fabs.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)))
(pow.f64 (*.f64 (tan.f64 B) (tan.f64 B)) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (tan.f64 B) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (tan.f64 B))
(/.f64 #s(literal -1 binary64) (neg.f64 (tan.f64 B)))
(tan.f64 (+.f64 (neg.f64 B) (/.f64 (PI.f64) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (tan.f64 B)) #s(literal -1 binary64)))
(pow.f64 (tan.f64 B) #s(literal -1/2 binary64))
(exp.f64 (*.f64 (log.f64 (tan.f64 B)) #s(literal -1/2 binary64)))
(pow.f64 (exp.f64 (log.f64 (sin.f64 B))) #s(literal -1 binary64))
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (sin.f64 B))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 B)))
(exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))))
(*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))
(log.f64 (sin.f64 B))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)))))) (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64))))))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (-.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)))))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)))))) (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64))))))) (-.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(+.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64))))))
(*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)))))
(/.f64 (+.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64))))
(+.f64 (/.f64 (neg.f64 (tan.f64 B)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)))) (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (tan.f64 B)) (neg.f64 (tan.f64 B))) #s(literal 0 binary64)) (-.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)))
(/.f64 (+.f64 (pow.f64 (neg.f64 (tan.f64 B)) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 (neg.f64 (tan.f64 B)) (neg.f64 (tan.f64 B))) (-.f64 #s(literal 0 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)))))
(+.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64))
(neg.f64 (tan.f64 B))
(tan.f64 (neg.f64 B))
#s(literal 0 binary64)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64))))))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64)))
#s(literal 1 binary64)
(*.f64 (neg.f64 (tan.f64 B)) #s(literal 0 binary64))
(neg.f64 (tan.f64 B))
(tan.f64 (neg.f64 B))
(/.f64 (neg.f64 (+.f64 (tan.f64 B) #s(literal 0 binary64))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (sin.f64 B)) (neg.f64 (cos.f64 B)))
(/.f64 (+.f64 (tan.f64 B) #s(literal 0 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))
(/.f64 (sin.f64 B) (cos.f64 B))
(tan.f64 (+.f64 B (PI.f64)))
(tan.f64 B)
(+.f64 (/.f64 (tan.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64)))) (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64)))))
(/.f64 (-.f64 (*.f64 (tan.f64 B) (tan.f64 B)) #s(literal 0 binary64)) (-.f64 (tan.f64 B) #s(literal 0 binary64)))
(/.f64 (+.f64 (pow.f64 (tan.f64 B) #s(literal 3 binary64)) #s(literal 0 binary64)) (fma.f64 (tan.f64 B) (tan.f64 B) (-.f64 #s(literal 0 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64)))))
(/.f64 (fma.f64 (sin.f64 B) #s(literal -1 binary64) (*.f64 (cos.f64 B) #s(literal 0 binary64))) (*.f64 (cos.f64 B) #s(literal -1 binary64)))
(+.f64 (tan.f64 B) #s(literal 0 binary64))
#s(literal 0 binary64)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (tan.f64 B) #s(literal 0 binary64)) (*.f64 (tan.f64 B) #s(literal 0 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (tan.f64 B) #s(literal 0 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (tan.f64 B) #s(literal 0 binary64)) (*.f64 (tan.f64 B) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))
(-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64)))
(*.f64 (tan.f64 B) #s(literal 0 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 B) #s(literal 0 binary64))) (neg.f64 (*.f64 (cos.f64 B) #s(literal -1 binary64))))
(/.f64 (*.f64 (sin.f64 B) #s(literal 0 binary64)) (*.f64 (cos.f64 B) #s(literal -1 binary64)))
(pow.f64 (exp.f64 (log.f64 (sin.f64 B))) #s(literal -1 binary64))
(pow.f64 (sin.f64 B) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (sin.f64 B))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 B)))
(exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))) (*.f64 (/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))) (+.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (fma.f64 (/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (*.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (*.f64 (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))) (*.f64 (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal -2 binary64))) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(*.f64 (neg.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (neg.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)))
(*.f64 (fabs.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (fabs.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)))
(*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x))
(pow.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) #s(literal 2 binary64))
(*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))) (*.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (fma.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (fma.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)))
(neg.f64 x)
(/.f64 (neg.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64))) (neg.f64 (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
(pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 B) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -2 binary64)))
#s(literal -2 binary64)
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) x)) B))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/3 binary64) x))))) B))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 (*.f64 B B) (+.f64 #s(literal 7/360 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x))))))))) B))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (+.f64 #s(literal 7/360 binary64) (+.f64 (*.f64 #s(literal -1/9 binary64) x) (+.f64 (*.f64 #s(literal 2/15 binary64) x) (*.f64 (*.f64 B B) (+.f64 #s(literal 31/15120 binary64) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x)))))))))))))) B))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) (pow.f64 B #s(literal -1 binary64)))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 B B))) B))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)))) B))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/945 binary64) (*.f64 B B)) #s(literal 1/45 binary64))) #s(literal 1/3 binary64)))) B))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) B)
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 B B)))))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 B B)))))))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (*.f64 B B)))))))))
#s(approx B B)
#s(approx (exp (* (log (sin B)) -1)) (pow.f64 B #s(literal -1 binary64)))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 B B))) B))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 7/360 binary64) (*.f64 B B))))) B))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 31/15120 binary64) (*.f64 B B))))))) B))
#s(approx (sin B) B)
#s(approx (sin B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 B B)))))
#s(approx (sin B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 B B)) #s(literal 1/6 binary64))))))
#s(approx (sin B) (*.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 B B)))) #s(literal 1/6 binary64))))))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (/.f64 (-.f64 #s(literal 1 binary64) x) B))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/3 binary64) x)))) x) B))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 (*.f64 B B) (+.f64 #s(literal 7/360 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))))))) x) B))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (+.f64 #s(literal 7/360 binary64) (+.f64 (*.f64 #s(literal -1/9 binary64) x) (+.f64 (*.f64 #s(literal 2/15 binary64) x) (*.f64 (*.f64 B B) (+.f64 #s(literal 31/15120 binary64) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))))))))))) x) B))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (/.f64 (*.f64 x (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64))) (*.f64 B (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (/.f64 (*.f64 x (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64))))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) (/.f64 (*.f64 x (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64)))) (/.f64 (*.f64 x (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))) B))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 (*.f64 B B) (-.f64 (/.f64 (*.f64 x (-.f64 (*.f64 #s(literal 1/15 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64))) #s(literal 1/15 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) (+.f64 (/.f64 (*.f64 x (*.f64 (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/45 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (/.f64 (*.f64 x (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64))))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) (/.f64 (*.f64 x (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))))) (/.f64 (*.f64 x (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64))))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))) (/.f64 (*.f64 x (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64)))) (/.f64 (*.f64 x (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))) B))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 (*.f64 B B) (-.f64 (/.f64 (*.f64 x (-.f64 (*.f64 #s(literal 2/189 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64))) #s(literal 2/189 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) (+.f64 (/.f64 (*.f64 x (*.f64 (-.f64 (*.f64 #s(literal 31/15120 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2/945 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/45 binary64)) (-.f64 (/.f64 (*.f64 x (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64))))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) (/.f64 (*.f64 x (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (/.f64 (*.f64 x (-.f64 (*.f64 #s(literal 1/15 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64))) #s(literal 1/15 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) (+.f64 (/.f64 (*.f64 x (*.f64 (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/45 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (/.f64 (*.f64 x (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64))))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) (/.f64 (*.f64 x (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))))))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))))) (/.f64 (*.f64 x (-.f64 (*.f64 #s(literal 1/15 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64))) #s(literal 1/15 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))) (+.f64 (/.f64 (*.f64 x (*.f64 (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/45 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (/.f64 (*.f64 x (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64))))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) (/.f64 (*.f64 x (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))))) (/.f64 (*.f64 x (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64))))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))) (/.f64 (*.f64 x (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64)))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64)))) (/.f64 (*.f64 x (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))) B))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (/.f64 (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64)) (*.f64 B (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal -1 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) #s(literal -1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal -1 binary64))) B))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) #s(literal -1 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal -1 binary64)) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/15 binary64) (pow.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) #s(literal -1 binary64))) (fma.f64 #s(literal 1/15 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal -1 binary64)) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/45 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal -1 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))))))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) #s(literal -1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal -1 binary64))) B))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) #s(literal -1 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal -1 binary64)) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/15 binary64) (pow.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 2/189 binary64) (pow.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) #s(literal -1 binary64))) (fma.f64 #s(literal 2/189 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal -1 binary64)) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 31/15120 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2/945 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/45 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal -1 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 1/15 binary64) (pow.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) #s(literal -1 binary64))) (fma.f64 #s(literal 1/15 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal -1 binary64)) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/45 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal -1 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/15 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal -1 binary64)) (+.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/45 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) #s(literal -1 binary64)) (*.f64 #s(literal 2/3 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal -1 binary64)))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))))))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (*.f64 x x) (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64)))) #s(literal -1 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal -1 binary64))) B))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (/.f64 (-.f64 (pow.f64 (*.f64 x x) #s(literal -1 binary64)) #s(literal 1 binary64)) (*.f64 B B)))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (-.f64 (/.f64 (fma.f64 (*.f64 B B) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64)))) (pow.f64 (*.f64 x x) #s(literal -1 binary64))) (*.f64 B B)) (pow.f64 (*.f64 B B) #s(literal -1 binary64))))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (+.f64 #s(literal 2/3 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64)) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/15 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64))) #s(literal 1/15 binary64))))) (pow.f64 (*.f64 x x) #s(literal -1 binary64))) #s(literal 1 binary64)) (*.f64 B B)))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (+.f64 #s(literal 2/3 binary64) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64)) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/15 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64)) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 2/189 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64))) #s(literal 2/189 binary64)))) #s(literal 1/15 binary64))))) (pow.f64 (*.f64 x x) #s(literal -1 binary64))) #s(literal 1 binary64)) (*.f64 B B)))
#s(approx (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (pow.f64 (*.f64 (*.f64 B B) (*.f64 x x)) #s(literal -1 binary64)))
#s(approx (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 B B) (*.f64 x x)) (pow.f64 (*.f64 x x) #s(literal -1 binary64))) (*.f64 B B)))
#s(approx (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (/.f64 (fma.f64 (*.f64 B B) (fma.f64 #s(literal 1/15 binary64) (/.f64 (*.f64 B B) (*.f64 x x)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64)))) (pow.f64 (*.f64 x x) #s(literal -1 binary64))) (*.f64 B B)))
#s(approx (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (/.f64 (fma.f64 (*.f64 B B) (fma.f64 (*.f64 B B) (fma.f64 #s(literal 2/189 binary64) (/.f64 (*.f64 B B) (*.f64 x x)) (*.f64 #s(literal 1/15 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 x x) #s(literal -1 binary64)))) (pow.f64 (*.f64 x x) #s(literal -1 binary64))) (*.f64 B B)))
#s(approx (pow (* (sin B) x) -1) (pow.f64 (*.f64 B x) #s(literal -1 binary64)))
#s(approx (pow (* (sin B) x) -1) (/.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 B B) x) (pow.f64 x #s(literal -1 binary64))) B))
#s(approx (pow (* (sin B) x) -1) (/.f64 (fma.f64 (*.f64 B B) (fma.f64 #s(literal 7/360 binary64) (/.f64 (*.f64 B B) x) (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64)))) (pow.f64 x #s(literal -1 binary64))) B))
#s(approx (pow (* (sin B) x) -1) (/.f64 (fma.f64 (*.f64 B B) (fma.f64 (*.f64 B B) (fma.f64 #s(literal 31/15120 binary64) (/.f64 (*.f64 B B) x) (*.f64 #s(literal 7/360 binary64) (pow.f64 x #s(literal -1 binary64)))) (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64)))) (pow.f64 x #s(literal -1 binary64))) B))
#s(approx (* (sin B) x) (*.f64 B x))
#s(approx (* (sin B) x) (*.f64 B (+.f64 x (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 B B) x)))))
#s(approx (* (sin B) x) (*.f64 B (+.f64 x (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/6 binary64) x (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 B B) x)))))))
#s(approx (* (sin B) x) (*.f64 B (+.f64 x (*.f64 (*.f64 B B) (+.f64 (*.f64 #s(literal -1/6 binary64) x) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 B B) x) (*.f64 #s(literal 1/120 binary64) x))))))))
#s(approx (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) (pow.f64 (*.f64 B B) #s(literal -1 binary64)))
#s(approx (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2/3 binary64) (*.f64 B B))) (*.f64 B B)))
#s(approx (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) (+.f64 (pow.f64 (*.f64 B B) #s(literal -1 binary64)) (/.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/15 binary64) (*.f64 B B)) #s(literal 2/3 binary64))) (*.f64 B B))))
#s(approx (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (+.f64 #s(literal 1/15 binary64) (*.f64 #s(literal 2/189 binary64) (*.f64 B B)))) #s(literal 2/3 binary64)))) (*.f64 B B)))
#s(approx (/ (cos B) (sin B)) (pow.f64 B #s(literal -1 binary64)))
#s(approx (/ (cos B) (sin B)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 B B))) B))
#s(approx (/ (cos B) (sin B)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)))) B))
#s(approx (/ (cos B) (sin B)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/945 binary64) (*.f64 B B)) #s(literal 1/45 binary64))) #s(literal 1/3 binary64)))) B))
#s(approx (cos B) #s(literal 1 binary64))
#s(approx (cos B) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 B B))))
#s(approx (cos B) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 B B)) #s(literal 1/2 binary64)))))
#s(approx (cos B) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 B B)))) #s(literal 1/2 binary64)))))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 x #s(literal -1 binary64))) B))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/3 binary64)) (pow.f64 x #s(literal -1 binary64)))) B))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64)) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 1/45 binary64)))) #s(literal 1/3 binary64)) (pow.f64 x #s(literal -1 binary64)))) B))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) (/.f64 (+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 x #s(literal -1 binary64)) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 7/360 binary64) (pow.f64 x #s(literal -1 binary64)) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 31/15120 binary64) (pow.f64 x #s(literal -1 binary64))) #s(literal 2/945 binary64)))) #s(literal 1/45 binary64)))) #s(literal 1/3 binary64)) (pow.f64 x #s(literal -1 binary64)))) B))
#s(approx (pow (* (sin B) x) -1/2) (pow.f64 (pow.f64 (*.f64 B x) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
#s(approx (pow (* (sin B) x) -1/2) (+.f64 (/.f64 (pow.f64 (/.f64 B x) #s(literal 1/2 binary64)) B) (/.f64 (*.f64 #s(literal 1/12 binary64) (pow.f64 (/.f64 (pow.f64 B #s(literal 5 binary64)) x) #s(literal 1/2 binary64))) B)))
#s(approx (pow (* (sin B) x) -1/2) (/.f64 (+.f64 (pow.f64 (/.f64 B x) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 B B) B) (fma.f64 #s(literal 7/720 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 B B) B) x) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/12 binary64) (pow.f64 (pow.f64 (*.f64 B x) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))) B))
#s(approx (pow (* (sin B) x) -1/2) (/.f64 (+.f64 (pow.f64 (/.f64 B x) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 B B) B) (fma.f64 #s(literal 1/12 binary64) (pow.f64 (pow.f64 (*.f64 B x) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/288 binary64) (pow.f64 (pow.f64 (*.f64 B x) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal 7/720 binary64) (pow.f64 (pow.f64 (*.f64 B x) #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))) B))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (/.f64 (-.f64 #s(literal 1 binary64) x) B))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/3 binary64) x)))) x) B))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (+.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 (*.f64 B B) (+.f64 #s(literal 7/360 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))))))) x) B))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (+.f64 #s(literal 7/360 binary64) (+.f64 (*.f64 #s(literal -1/9 binary64) x) (+.f64 (*.f64 #s(literal 2/15 binary64) x) (*.f64 (*.f64 B B) (+.f64 #s(literal 31/15120 binary64) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))))))))))) x) B))
#s(approx (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (*.f64 #s(literal -1 binary64) (/.f64 x B)))
#s(approx (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 B B) x)) x) B))
#s(approx (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (/.f64 (-.f64 (*.f64 (*.f64 B B) (+.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x))))) x) B))
#s(approx (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (/.f64 (-.f64 (*.f64 (*.f64 B B) (+.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 (*.f64 B B) (+.f64 (*.f64 #s(literal -1/9 binary64) x) (+.f64 (*.f64 #s(literal 2/15 binary64) x) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))))))) x) B))
#s(approx (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) (/.f64 x B))
#s(approx (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) (/.f64 (+.f64 x (*.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 B B) x))) B))
#s(approx (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) (/.f64 (+.f64 x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))) (*.f64 #s(literal 1/3 binary64) x)))) B))
#s(approx (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) (/.f64 (+.f64 x (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))) (*.f64 #s(literal 1/3 binary64) x)))) B))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) (pow.f64 B #s(literal -1 binary64)))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 B B))) B))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/45 binary64) (*.f64 B B)) #s(literal 1/3 binary64)))) B))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/945 binary64) (*.f64 B B)) #s(literal 1/45 binary64))) #s(literal 1/3 binary64)))) B))
#s(approx (pow (tan B) -1/2) (pow.f64 (pow.f64 B #s(literal -1 binary64)) #s(literal 1/2 binary64)))
#s(approx (pow (tan B) -1/2) (+.f64 (/.f64 (pow.f64 B #s(literal 1/2 binary64)) B) (/.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (pow.f64 B #s(literal 5 binary64)) #s(literal 1/2 binary64))) B)))
#s(approx (pow (tan B) -1/2) (/.f64 (+.f64 (pow.f64 B #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 B B) B) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (pow.f64 B #s(literal -1 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/90 binary64) (pow.f64 (*.f64 (*.f64 B B) B) #s(literal 1/2 binary64)))))) B))
#s(approx (pow (tan B) -1/2) (/.f64 (+.f64 (pow.f64 B #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 B B) B) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (pow.f64 B #s(literal -1 binary64)) #s(literal 1/2 binary64)) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/72 binary64) (pow.f64 (pow.f64 B #s(literal -1 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal -1/90 binary64) (pow.f64 (pow.f64 B #s(literal -1 binary64)) #s(literal 1/2 binary64)))))))) B))
#s(approx (exp (* (log (sin B)) -1)) (pow.f64 B #s(literal -1 binary64)))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 B B))) B))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 7/360 binary64) (*.f64 B B))))) B))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 31/15120 binary64) (*.f64 B B))))))) B))
#s(approx (* (log (sin B)) -1) (*.f64 #s(literal -1 binary64) (log.f64 B)))
#s(approx (* (log (sin B)) -1) (fma.f64 #s(literal -1 binary64) (log.f64 B) (*.f64 #s(literal 1/6 binary64) (*.f64 B B))))
#s(approx (* (log (sin B)) -1) (fma.f64 #s(literal -1 binary64) (log.f64 B) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 1/180 binary64) (*.f64 B B))))))
#s(approx (* (log (sin B)) -1) (fma.f64 #s(literal -1 binary64) (log.f64 B) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/180 binary64) (*.f64 #s(literal 1/2835 binary64) (*.f64 B B))))))))
#s(approx (log (sin B)) (log.f64 B))
#s(approx (log (sin B)) (+.f64 (log.f64 B) (*.f64 #s(literal -1/6 binary64) (*.f64 B B))))
#s(approx (log (sin B)) (+.f64 (log.f64 B) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/180 binary64) (*.f64 B B)) #s(literal 1/6 binary64)))))
#s(approx (log (sin B)) (+.f64 (log.f64 B) (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1/2835 binary64) (*.f64 B B)) #s(literal 1/180 binary64))) #s(literal 1/6 binary64)))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (pow.f64 B #s(literal -1 binary64)))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 B (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 x (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) B))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 B (-.f64 (*.f64 B (-.f64 (+.f64 #s(literal 1/6 binary64) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (/.f64 x (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) B))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 B (-.f64 (*.f64 B (-.f64 (+.f64 #s(literal 1/6 binary64) (fma.f64 B (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 0 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (/.f64 x (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) B))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (-.f64 (*.f64 B (-.f64 (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (/.f64 x (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (-.f64 (*.f64 B (-.f64 (fma.f64 B (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 0 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (/.f64 x (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (-.f64 (*.f64 B (-.f64 (fma.f64 B (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 0 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 B (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 0 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1/3 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 #s(literal -1/3 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (/.f64 x (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) (*.f64 (/.f64 x (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) (fma.f64 B (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (/.f64 x (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) (fma.f64 B (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 B (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 0 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (/.f64 x (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) (fma.f64 B (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 B (-.f64 (*.f64 B (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (*.f64 #s(literal 0 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 0 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1/3 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 0 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 x (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) (*.f64 (/.f64 x (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) (*.f64 (/.f64 x (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 B (/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) (fma.f64 B (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 B (fma.f64 #s(literal -1 binary64) (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (*.f64 (/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) (fma.f64 B (-.f64 (*.f64 B (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 B (fma.f64 #s(literal -1 binary64) (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (*.f64 (/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal -1 binary64)) (fma.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (*.f64 #s(literal 0 binary64) (/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 #s(literal 1/3 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (*.f64 (/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) (/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) (+.f64 (*.f64 #s(literal -1 binary64) B) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) (fma.f64 B (-.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 B B)) #s(literal 1 binary64)) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) (fma.f64 B (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/15 binary64) (*.f64 B B)) #s(literal 1/3 binary64))) #s(literal 1 binary64)) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (*.f64 #s(literal -1 binary64) B))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (*.f64 B (-.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 B B)) #s(literal 1 binary64))))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (*.f64 B (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/15 binary64) (*.f64 B B)) #s(literal 1/3 binary64))) #s(literal 1 binary64))))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (*.f64 B (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -17/315 binary64) (*.f64 B B)) #s(literal 2/15 binary64))) #s(literal 1/3 binary64))) #s(literal 1 binary64))))
#s(approx (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 B (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 1 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 B (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 B (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 0 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 1 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 B (-.f64 (*.f64 B (/.f64 (-.f64 (*.f64 B (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 1/3 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 0 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 1 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 B (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 1 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 B (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 1 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (*.f64 B (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 0 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
#s(approx (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 0 binary64) (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 B (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 1 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 B (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 B (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 1/3 binary64))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 0 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) #s(literal 0 binary64))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (-.f64 (*.f64 B #s(literal -1 binary64)) #s(literal 0 binary64)))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (-.f64 (*.f64 B (-.f64 (+.f64 #s(literal 0 binary64) (*.f64 B #s(literal 0 binary64))) #s(literal 1 binary64))) #s(literal 0 binary64)))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (-.f64 (*.f64 B (-.f64 (+.f64 #s(literal 0 binary64) (*.f64 B (+.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) (*.f64 B #s(literal -1/3 binary64)))))) #s(literal 1 binary64))) #s(literal 0 binary64)))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) #s(literal 0 binary64))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) (fma.f64 B #s(literal 1 binary64) #s(literal 0 binary64)))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) (fma.f64 B (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 B #s(literal 0 binary64)) #s(literal -1 binary64))) #s(literal 0 binary64)) #s(literal 0 binary64)))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) (fma.f64 B (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 B (-.f64 (*.f64 B #s(literal 1/3 binary64)) #s(literal 0 binary64)))) #s(literal 0 binary64)) #s(literal 0 binary64)))
#s(approx (+ (tan B) (tan (PI))) #s(literal 0 binary64))
#s(approx (+ (tan B) (tan (PI))) (+.f64 B #s(literal 0 binary64)))
#s(approx (+ (tan B) (tan (PI))) (fma.f64 B (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 B B))) #s(literal 0 binary64)))
#s(approx (+ (tan B) (tan (PI))) (fma.f64 B (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 B B))))) #s(literal 0 binary64)))
#s(approx (- 1 (* (tan B) (tan (PI)))) #s(literal 1 binary64))
#s(approx (- 1 (* (tan B) (tan (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 B #s(literal 0 binary64)) #s(literal -1 binary64)))))
#s(approx (- 1 (* (tan B) (tan (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 B (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (*.f64 B B) #s(literal 0 binary64)) #s(literal -1 binary64))) #s(literal 0 binary64)))))
#s(approx (- 1 (* (tan B) (tan (PI)))) (+.f64 #s(literal 1 binary64) (*.f64 B (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -2/15 binary64) (/.f64 (*.f64 (*.f64 B B) #s(literal 0 binary64)) #s(literal -1 binary64))) #s(literal 0 binary64))) #s(literal 0 binary64)))))
#s(approx (* (tan B) (tan (PI))) (/.f64 (*.f64 B #s(literal 0 binary64)) #s(literal -1 binary64)))
#s(approx (* (tan B) (tan (PI))) (*.f64 B (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 (*.f64 B B) #s(literal 0 binary64)) #s(literal -1 binary64)) #s(literal 0 binary64))))
#s(approx (* (tan B) (tan (PI))) (*.f64 B (fma.f64 (*.f64 B B) (fma.f64 #s(literal 2/15 binary64) (/.f64 (*.f64 (*.f64 B B) #s(literal 0 binary64)) #s(literal -1 binary64)) #s(literal 0 binary64)) #s(literal 0 binary64))))
#s(approx (* (tan B) (tan (PI))) (*.f64 B (fma.f64 (*.f64 B B) (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal 17/315 binary64) (/.f64 (*.f64 (*.f64 B B) #s(literal 0 binary64)) #s(literal -1 binary64)) #s(literal 0 binary64)))) #s(literal 0 binary64))))
#s(approx (exp (* (log (sin B)) -1)) (pow.f64 B #s(literal -1 binary64)))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 B B))) B))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 7/360 binary64) (*.f64 B B))))) B))
#s(approx (exp (* (log (sin B)) -1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 31/15120 binary64) (*.f64 B B))))))) B))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/.f64 (/.f64 (-.f64 (*.f64 x x) #s(literal 1 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) B))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64))) B))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/9 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 2/15 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (pow.f64 (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 7/360 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64))) B))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/.f64 (-.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/9 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 2/15 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) #s(literal 7/360 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -2/45 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 17/315 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/9 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 2/15 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))))) (-.f64 (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (*.f64 (-.f64 (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/15 binary64) x)))) #s(literal 7/360 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (pow.f64 (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (*.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))))) #s(literal 7/360 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 31/15120 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/315 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (fma.f64 #s(literal 17/315 binary64) x (fma.f64 #s(literal 62/315 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/3 binary64) (-.f64 (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) #s(literal 7/360 binary64)))))))) #s(literal 31/15120 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (pow.f64 (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 7/360 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64))) B))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (*.f64 x x) (*.f64 B (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 B B) (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) B))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (pow.f64 (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) B))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (pow.f64 (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (*.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))))) #s(literal 7/360 binary64)) (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (fma.f64 #s(literal 17/315 binary64) x (fma.f64 #s(literal 62/315 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (*.f64 #s(literal 2/3 binary64) (-.f64 (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) #s(literal 7/360 binary64)))))))) #s(literal 31/15120 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x x) (pow.f64 (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/15 binary64) x (fma.f64 #s(literal 17/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))))) #s(literal 7/360 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (/.f64 (*.f64 (*.f64 x x) (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 #s(literal 2/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) #s(literal 1/6 binary64))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 x x) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))) B))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (/.f64 (*.f64 x x) (*.f64 B B)))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (/.f64 (fma.f64 #s(literal -2/3 binary64) (*.f64 (*.f64 B B) (*.f64 x x)) (*.f64 x x)) (*.f64 B B)))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -4/9 binary64) (*.f64 x x) (*.f64 #s(literal 17/45 binary64) (*.f64 x x))))) (*.f64 #s(literal 2/3 binary64) (*.f64 x x))) (*.f64 x x)) (*.f64 B B)))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -2/3 binary64) (fma.f64 #s(literal -4/9 binary64) (*.f64 x x) (*.f64 #s(literal 17/45 binary64) (*.f64 x x))) (fma.f64 #s(literal -34/135 binary64) (*.f64 x x) (*.f64 #s(literal 62/315 binary64) (*.f64 x x)))))) (fma.f64 #s(literal -4/9 binary64) (*.f64 x x) (*.f64 #s(literal 17/45 binary64) (*.f64 x x))))) (*.f64 #s(literal 2/3 binary64) (*.f64 x x))) (*.f64 x x)) (*.f64 B B)))
#s(approx (* (pow (tan B) -1) x) (/.f64 x B))
#s(approx (* (pow (tan B) -1) x) (/.f64 (+.f64 x (*.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 B B) x))) B))
#s(approx (* (pow (tan B) -1) x) (/.f64 (+.f64 x (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))) (*.f64 #s(literal 1/3 binary64) x)))) B))
#s(approx (* (pow (tan B) -1) x) (/.f64 (+.f64 x (*.f64 (*.f64 B B) (-.f64 (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))))) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))) (*.f64 #s(literal 1/3 binary64) x)))) B))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) B))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)))) #s(literal 1 binary64)) B))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (-.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) #s(literal 7/360 binary64)))) #s(literal 1/6 binary64)))) #s(literal 1 binary64)) B))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/3 binary64) x (*.f64 (*.f64 B B) (-.f64 (+.f64 (*.f64 #s(literal -1/9 binary64) x) (+.f64 (*.f64 #s(literal 2/15 binary64) x) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x))) #s(literal 31/15120 binary64))))) #s(literal 7/360 binary64)))) #s(literal 1/6 binary64)))) #s(literal 1 binary64)) B))
#s(approx (* (neg x) (pow (tan B) -1)) (*.f64 #s(literal -1 binary64) (/.f64 x B)))
#s(approx (* (neg x) (pow (tan B) -1)) (/.f64 (fma.f64 #s(literal -1 binary64) x (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 B B) x))) B))
#s(approx (* (neg x) (pow (tan B) -1)) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 (*.f64 B B) (+.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)))))) B))
#s(approx (* (neg x) (pow (tan B) -1)) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 (*.f64 B B) (+.f64 (*.f64 #s(literal 1/3 binary64) x) (*.f64 (*.f64 B B) (+.f64 (*.f64 #s(literal -1/9 binary64) x) (+.f64 (*.f64 #s(literal 2/15 binary64) x) (*.f64 (*.f64 B B) (fma.f64 #s(literal -1/3 binary64) (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (fma.f64 #s(literal -2/45 binary64) x (*.f64 #s(literal 17/315 binary64) x)))))))))) B))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (pow.f64 (*.f64 B (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))) #s(literal -1 binary64)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64))) B))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 B B) (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/9 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 2/15 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))))))) (*.f64 #s(literal 1/3 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64))) B))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (fma.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 7/360 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 B B) (-.f64 (fma.f64 #s(literal 31/15120 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/315 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/9 binary64) x (*.f64 #s(literal 2/15 binary64) x)) #s(literal 7/360 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -2/45 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 17/315 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 7/360 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/9 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 2/15 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)))))))) (-.f64 (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (*.f64 (-.f64 (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (fma.f64 #s(literal -1/9 binary64) x (fma.f64 #s(literal 2/45 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 2/15 binary64) x)))) #s(literal 7/360 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))))))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) x) #s(literal 1/6 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/9 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 2/15 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (fma.f64 #s(literal -1/3 binary64) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) (*.f64 #s(literal 1/3 binary64) x)) #s(literal 1/6 binary64)) (-.f64 (fma.f64 #s(literal 1/6 binary64) (pow.f64 (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64)))))) (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64))))))))))) (*.f64 #s(literal 1/3 binary64) (/.f64 x (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (*.f64 #s(literal -1 binary64) x) #s(literal 1 binary64)) #s(literal -1 binary64))) B))
#s(approx (pow (sin B) -2) (pow.f64 (*.f64 B B) #s(literal -1 binary64)))
#s(approx (pow (sin B) -2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 B B))) (*.f64 B B)))
#s(approx (pow (sin B) -2) (+.f64 (pow.f64 (*.f64 B B) #s(literal -1 binary64)) (/.f64 (*.f64 (*.f64 B B) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/15 binary64) (*.f64 B B)))) (*.f64 B B))))
#s(approx (pow (sin B) -2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 B B) (+.f64 #s(literal 1/15 binary64) (*.f64 #s(literal 2/189 binary64) (*.f64 B B))))))) (*.f64 B B)))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) (/.f64 (cos.f64 B) (sin.f64 B)))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) (tan.f64 B))
#s(approx (exp (* (log (sin B)) -1)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (sin B) (sin.f64 B))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (/.f64 (*.f64 x (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x x) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (cos.f64 B) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 x x) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))) (+.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (/.f64 (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x x) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (cos.f64 B) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 x x) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))) (+.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x x) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (cos.f64 B) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 x x) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))))
#s(approx (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (pow.f64 (*.f64 (*.f64 x x) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) #s(literal -1 binary64)))
#s(approx (pow (* (sin B) x) -1) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))
#s(approx (* (sin B) x) (*.f64 x (sin.f64 B)))
#s(approx (* (/ (cos B) (sin B)) (/ (cos B) (sin B))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
#s(approx (/ (cos B) (sin B)) (/.f64 (cos.f64 B) (sin.f64 B)))
#s(approx (cos B) (cos.f64 B))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) (+.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))))
#s(approx (pow (* (sin B) x) -1/2) (pow.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)))
#s(approx (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2))) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)))
#s(approx (* (pow (tan B) -1/2) (pow (tan B) -1/2)) (/.f64 (cos.f64 B) (sin.f64 B)))
#s(approx (pow (tan B) -1/2) (pow.f64 (/.f64 (cos.f64 B) (sin.f64 B)) #s(literal 1/2 binary64)))
#s(approx (exp (* (log (sin B)) -1)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (* (log (sin B)) -1) (log.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (log (sin B)) (log.f64 (sin.f64 B)))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (-.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (/.f64 (*.f64 x (-.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (tan.f64 B))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (-.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (tan.f64 B))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))
#s(approx (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))))) (/.f64 (*.f64 x (-.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (tan.f64 B))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
#s(approx (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))) (/.f64 (-.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (tan.f64 B)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
#s(approx (+ (neg (tan B)) (tan (/ (PI) 2))) (-.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (tan.f64 B)))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (*.f64 #s(literal -1 binary64) (tan.f64 B)))
#s(approx (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(approx (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
#s(approx (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (*.f64 #s(literal -1 binary64) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))))
#s(approx (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI))))) (tan.f64 B))
#s(approx (+ (tan B) (tan (PI))) (+.f64 (tan.f64 B) #s(literal 0 binary64)))
#s(approx (- 1 (* (tan B) (tan (PI)))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))
#s(approx (* (tan B) (tan (PI))) (*.f64 (tan.f64 B) #s(literal 0 binary64)))
#s(approx (exp (* (log (sin B)) -1)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (/.f64 (-.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 (/.f64 (*.f64 x x) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
#s(approx (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))))
#s(approx (* (pow (tan B) -1) x) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (neg x) (pow (tan B) -1)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (pow.f64 (*.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) #s(literal -1 binary64)))
#s(approx (pow (sin B) -2) (pow.f64 (sin.f64 B) #s(literal -2 binary64)))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (* -1 x) (*.f64 #s(literal -1 binary64) x))
#s(approx x x)
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) x))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (pow.f64 (*.f64 (*.f64 x x) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) #s(literal -1 binary64)))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64))) (pow.f64 (sin.f64 B) #s(literal -2 binary64))) (*.f64 x x)))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 x (cos.f64 B))) (sin.f64 B)) x))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (fma.f64 x (-.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (*.f64 x (-.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B)) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (fma.f64 x (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 x (cos.f64 B)) #s(literal 2 binary64)) (sin.f64 B))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 (*.f64 x x) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (/.f64 (*.f64 x (pow.f64 (cos.f64 B) #s(literal 3 binary64))) (sin.f64 B)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 (*.f64 x x) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (pow.f64 (cos.f64 B) #s(literal 4 binary64))) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 (*.f64 x x) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) (*.f64 x (-.f64 (*.f64 x (/.f64 (-.f64 (*.f64 x (pow.f64 (cos.f64 B) #s(literal 5 binary64))) (pow.f64 (cos.f64 B) #s(literal 4 binary64))) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))))))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (neg x) (*.f64 #s(literal -1 binary64) x))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 #s(literal -1 binary64) (sin.f64 B)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (-.f64 (*.f64 x (cos.f64 B)) #s(literal 1 binary64)) (sin.f64 B)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (-.f64 (*.f64 x (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (-.f64 (*.f64 x (-.f64 (*.f64 x (/.f64 (-.f64 (*.f64 x (pow.f64 (cos.f64 B) #s(literal 3 binary64))) (pow.f64 (cos.f64 B) #s(literal 2 binary64))) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) (*.f64 x (-.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (*.f64 x (-.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))
#s(approx (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (pow.f64 (sin.f64 B) #s(literal 2 binary64)))))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) (/.f64 (cos.f64 B) (sin.f64 B)))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (*.f64 x (-.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (*.f64 x (-.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (*.f64 x (-.f64 (/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x (sin.f64 B)) (sin.f64 B))) (*.f64 (*.f64 x (sin.f64 B)) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (*.f64 x (-.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))) (pow.f64 (*.f64 (*.f64 x x) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 x (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 x x) x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) (*.f64 (*.f64 x (sin.f64 B)) #s(literal 1 binary64))) (*.f64 (*.f64 x (sin.f64 B)) (*.f64 (*.f64 (*.f64 x x) x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)))))) (pow.f64 (*.f64 (*.f64 x x) (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64)))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (cos.f64 B)) (sin.f64 B))))
#s(approx (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)) (*.f64 #s(literal -1 binary64) (*.f64 x (+.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 #s(literal -1 binary64) (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B)))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (-.f64 (pow.f64 (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)) (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64))) x))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (-.f64 (pow.f64 (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)) (/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) (*.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 B) (sin.f64 B)) (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)))))) x))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/.f64 (-.f64 (+.f64 (pow.f64 (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 x x) x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 4 binary64)) (sin.f64 B))) #s(literal -1 binary64))) (/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) (*.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 B) (sin.f64 B)) (*.f64 (*.f64 x x) (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)))))) x))
#s(approx (+ (* (pow (tan B) -1) (* -1 x)) (pow (sin B) -1)) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (*.f64 #s(literal -1 binary64) (*.f64 x (+.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 #s(literal -1 binary64) (*.f64 x (sin.f64 B)))))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sin.f64 B)) (pow.f64 (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64))) (pow.f64 (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (* (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) x) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 #s(literal 0 binary64) (*.f64 (cos.f64 B) (sin.f64 B))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) x) (/.f64 (/.f64 #s(literal 0 binary64) (*.f64 (cos.f64 B) (sin.f64 B))) (cos.f64 B))))) x) (*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sin.f64 B)))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (*.f64 x (sin.f64 B))))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 #s(literal 0 binary64) (*.f64 (cos.f64 B) (sin.f64 B))) x)) (*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sin.f64 B)))) x))))
#s(approx (/ (- (* (pow (* (sin B) x) -1) (pow (* (sin B) x) -1)) (* (/ (cos B) (sin B)) (/ (cos B) (sin B)))) (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B)))) (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 B) (sin.f64 B)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64)) (*.f64 (/.f64 #s(literal -1 binary64) x) (/.f64 (/.f64 #s(literal 0 binary64) (*.f64 (cos.f64 B) (sin.f64 B))) (cos.f64 B)))) (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64))) x)) (*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sin.f64 B)))) x))))
#s(approx (+ (* (pow (* (sin B) x) -1/2) (pow (* (sin B) x) -1/2)) (/ (cos B) (sin B))) (fma.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (*.f64 x (sin.f64 B))) (/.f64 (cos.f64 B) (sin.f64 B))))
#s(approx (pow (* (sin B) x) -1/2) (*.f64 (pow.f64 (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
#s(approx (+ (neg (* x (* (pow (tan B) -1/2) (pow (tan B) -1/2)))) (exp (* (log (sin B)) -1))) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 x (-.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (tan.f64 B))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))))))
#s(approx (+ (neg (* x (/ (+ (neg (tan B)) (tan (/ (PI) 2))) (- 1 (* (neg (/ (+ (tan B) (tan (PI))) (- 1 (* (tan B) (tan (PI)))))) (tan (/ (PI) 2))))))) (/ 1 (sin B))) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (tan.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (tan.f64 B)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (sin.f64 B) (*.f64 (cos.f64 B) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))) (/.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) #s(literal 0 binary64))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64)))))
#s(approx (- (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1)))) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 #s(literal -1 binary64) (*.f64 x (-.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (pow.f64 (*.f64 x (sin.f64 B)) #s(literal -1 binary64))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) (pow.f64 (*.f64 x (*.f64 (cos.f64 B) (sin.f64 B))) #s(literal -1 binary64))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (/ (* (* (pow (tan B) -1) x) (* (pow (tan B) -1) x)) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 #s(literal -1 binary64) (*.f64 x (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64))) x) (/.f64 (cos.f64 B) (sin.f64 B))))))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B))) #s(literal -1 binary64))) x)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B))) #s(literal -1 binary64))) x) (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64))) x)))
#s(approx (/ (pow (sin B) -2) (- (* (neg x) (pow (tan B) -1)) (pow (sin B) -1))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (cos.f64 B) #s(literal 3 binary64)) (sin.f64 B)) #s(literal -1 binary64)) (pow.f64 (*.f64 x (*.f64 (pow.f64 (cos.f64 B) #s(literal 4 binary64)) (sin.f64 B))) #s(literal -1 binary64))) x) (pow.f64 (*.f64 (pow.f64 (cos.f64 B) #s(literal 2 binary64)) (sin.f64 B)) #s(literal -1 binary64))) x) (pow.f64 (*.f64 (cos.f64 B) (sin.f64 B)) #s(literal -1 binary64))) x)))

eval117.0ms (2.7%)

Memory
39.0MiB live, 173.2MiB allocated; 17ms collecting garbage
Compiler

Compiled 54 644 to 4 390 computations (92% saved)

prune206.0ms (4.8%)

Memory
-15.5MiB live, 265.0MiB allocated; 72ms collecting garbage
Pruning

9 alts after pruning (0 fresh and 9 done)

PrunedKeptTotal
New8920892
Fresh000
Picked055
Done044
Total8929901
Accuracy
100.0%
Counts
901 → 9
Alt Table
Click to see full alt table
StatusAccuracyProgram
✓99.8%
(fma.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
✓57.2%
(-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
✓57.2%
(-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
✓99.8%
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
✓78.3%
(+.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
✓68.0%
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))))
✓56.6%
(+.f64 (neg.f64 (*.f64 x (*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))))
✓33.5%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))) x))
✓86.0%
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
Compiler

Compiled 642 to 249 computations (61.2% saved)

regimes12.0ms (0.3%)

Memory
21.2MiB live, 21.2MiB allocated; 0ms collecting garbage
Counts
13 → 1
Calls
Call 1
Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))) x))
(+.f64 (neg.f64 (*.f64 x (*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))))
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))))
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(+.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(+.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (sin.f64 B) #s(literal -2 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))) (/.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))))
(/.f64 (fma.f64 (pow.f64 (neg.f64 x) #s(literal 3 binary64)) (pow.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sin.f64 B) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) x) (-.f64 (pow.f64 (pow.f64 (sin.f64 B) #s(literal 2 binary64)) #s(literal -1 binary64)) (*.f64 (*.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64))) (pow.f64 (sin.f64 B) #s(literal -1 binary64))))))
(fma.f64 (neg.f64 x) (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
(fma.f64 (pow.f64 (tan.f64 B) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) x) (pow.f64 (sin.f64 B) #s(literal -1 binary64)))
Outputs
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
Calls

3 calls:

4.0ms
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
4.0ms
x
4.0ms
B
Results
AccuracySegmentsBranch
99.8%1(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
99.8%1B
99.8%1x
Compiler

Compiled 14 to 14 computations (0% saved)

regimes13.0ms (0.3%)

Memory
-25.6MiB live, 16.5MiB allocated; 6ms collecting garbage
Counts
7 → 1
Calls
Call 1
Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))) x))
(+.f64 (neg.f64 (*.f64 x (*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))))
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64))))
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(+.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(+.f64 (neg.f64 (*.f64 x (/.f64 (+.f64 (neg.f64 (tan.f64 B)) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (/.f64 (+.f64 (tan.f64 B) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 B) (tan.f64 (PI.f64)))))) (tan.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
Outputs
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
Calls

3 calls:

7.0ms
x
3.0ms
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
3.0ms
B
Results
AccuracySegmentsBranch
99.8%1(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
99.8%1B
99.8%1x
Compiler

Compiled 14 to 14 computations (0% saved)

regimes6.0ms (0.1%)

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

3 calls:

2.0ms
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
2.0ms
B
2.0ms
x
Results
AccuracySegmentsBranch
94.3%2(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
97.6%2B
89.6%3x
Compiler

Compiled 14 to 14 computations (0% saved)

regimes2.0ms (0%)

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

1 calls:

1.0ms
B
Results
AccuracySegmentsBranch
97.5%2B
Compiler

Compiled 1 to 2 computations (-100% saved)

regimes4.0ms (0.1%)

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

Total -33.6b remaining (-374.3%)

Threshold costs -33.6b (-374.3%)

Counts
2 → 1
Calls
Call 1
Inputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64))) (*.f64 (/.f64 (cos.f64 B) (sin.f64 B)) (/.f64 (cos.f64 B) (sin.f64 B)))) (fma.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1/2 binary64)) (/.f64 (cos.f64 B) (sin.f64 B)))) x))
Outputs
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
Calls

3 calls:

1.0ms
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
1.0ms
x
1.0ms
B
Results
AccuracySegmentsBranch
86.0%1x
86.0%1(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
86.0%1B
Compiler

Compiled 14 to 14 computations (0% saved)

bsearch15.0ms (0.3%)

Memory
-27.4MiB live, 20.0MiB allocated; 2ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
13.0ms
5.224465895038104e-35
1.4956553481778848e-33
Samples
8.0ms112×0valid
Compiler

Compiled 302 to 253 computations (16.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 6.0ms
ival-tan: 2.0ms (34.7% of total)
ival-div: 1.0ms (17.4% of total)
ival-mult: 1.0ms (17.4% of total)
ival-sin: 1.0ms (17.4% of total)
ival-add: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-neg: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
1.5MiB live, 1.5MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
5.224465895038104e-35
1.4956553481778848e-33
Compiler

Compiled 337 to 260 computations (22.8% saved)

simplify43.0ms (1%)

Memory
-1.6MiB live, 51.6MiB allocated; 9ms collecting garbage
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
043144
181135
2140135
3232133
4795133
55209131
Stop Event
1×node limit
Calls
Call 1
Inputs
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(if (<=.f64 B #s(literal 3390683798607695/11692013098647223345629478661730264157247460343808 binary64)) (+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64)))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x)))
(if (<=.f64 B #s(literal 3390683798607695/11692013098647223345629478661730264157247460343808 binary64)) (+.f64 (neg.f64 (*.f64 x (*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64)))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))
Outputs
(+.f64 (neg.f64 (/.f64 (*.f64 x #s(literal 1 binary64)) (tan.f64 B))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 x (tan.f64 B))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (/.f64 #s(literal 1 binary64) (sin.f64 B)))
(if (<=.f64 B #s(literal 3390683798607695/11692013098647223345629478661730264157247460343808 binary64)) (+.f64 (neg.f64 (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64)))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x)))
(if (<=.f64 B #s(literal 3390683798607695/11692013098647223345629478661730264157247460343808 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 x (/.f64 #s(literal 1 binary64) (tan.f64 B)))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64)))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x)))
(if (<=.f64 B #s(literal 3390683798607695/11692013098647223345629478661730264157247460343808 binary64)) (+.f64 (neg.f64 (*.f64 x (*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64))))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64)))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x)))
(if (<=.f64 B #s(literal 3390683798607695/11692013098647223345629478661730264157247460343808 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) x) (*.f64 (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)) (pow.f64 (tan.f64 B) #s(literal -1/2 binary64)))) (exp.f64 (*.f64 (log.f64 (sin.f64 B)) #s(literal -1 binary64)))) #s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x)))
#s(approx (+ (neg (* x (/ 1 (tan B)))) (/ 1 (sin B))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 B) x) #s(literal -1 binary64)) (/.f64 (cos.f64 B) (sin.f64 B))) x))

derivations78.0ms (1.8%)

Memory
25.3MiB live, 71.4MiB allocated; 3ms collecting garbage
Stop Event
1×done
Compiler

Compiled 148 to 43 computations (70.9% saved)

preprocess63.0ms (1.5%)

Memory
-22.5MiB live, 116.7MiB allocated; 17ms collecting garbage
Remove

(negabs B)

Compiler

Compiled 386 to 166 computations (57% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...