VandenBroeck and Keller, Equation (6)

Time bar (total: 4.8s)

start0.0ms (0%)

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

analyze583.0ms (12.2%)

Memory
1.8MiB live, 282.7MiB allocated; 935ms 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
0%0%99.9%0.1%0%0%0%4
0%0%99.9%0.1%0%0%0%5
0%0%99.9%0.1%0%0%0%6
21.9%21.9%78%0.1%0%0%0%7
23.4%23.4%76.5%0.1%0%0%0%8
35.2%35.1%64.8%0.1%0%0%0%9
36.3%36.3%63.6%0.1%0%0%0%10
42.4%42.3%57.6%0.1%0%0%0%11
43.1%43%56.9%0.1%0%0%0%12
Compiler

Compiled 16 to 12 computations (25% saved)

sample1.1s (22.5%)

Memory
57.3MiB live, 1 260.1MiB allocated; 163ms collecting garbage
Samples
773.0ms8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 576.0ms
ival-mult: 205.0ms (35.6% of total)
ival-tanu: 175.0ms (30.4% of total)
ival-pi: 82.0ms (14.2% of total)
ival-div: 63.0ms (10.9% of total)
ival-sub: 40.0ms (6.9% of total)
exact: 6.0ms (1% of total)
ival-assert: 3.0ms (0.5% of total)
adjust: 2.0ms (0.3% of total)
Bogosity

explain266.0ms (5.6%)

Memory
-37.8MiB live, 229.3MiB allocated; 48ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1430-0-(tan.f64 (*.f64 (PI.f64) l))
480-0-(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l)))
30-0-(/.f64 #s(literal 1 binary64) (*.f64 F F))
00-0-(*.f64 (PI.f64) l)
00-0-#s(literal 1 binary64)
00-0-(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
00-0-(*.f64 F F)
00-0-l
00-0-F
00-0-(PI.f64)
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
tan.f64(tan.f64 (*.f64 (PI.f64) l))sensitivity1430
*.f64(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l)))n*o130
Confusion
Predicted +Predicted -
+750
-81100
Precision
0.4807692307692308
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+7500
-810100
Precision?
0.4807692307692308
Recall?
1.0
Freqs
test
numberfreq
0100
1156
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
96.0ms512×0valid
Compiler

Compiled 104 to 34 computations (67.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 79.0ms
ival-div: 49.0ms (62.4% of total)
ival-mult: 12.0ms (15.3% of total)
ival-tanu: 12.0ms (15.3% of total)
ival-pi: 2.0ms (2.5% of total)
ival-sub: 2.0ms (2.5% 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)

preprocess205.0ms (4.3%)

Memory
37.3MiB live, 124.4MiB allocated; 14ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
02888
18076
225672
372272
4256372
01014
01714
13412
29312
329412
4112512
5420412
0819412
Stop Event
1×iter limit
1×node limit
1×iter limit
1×node limit
Calls
Call 1
Inputs
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
Outputs
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
(-.f64 (*.f64 l (PI.f64)) (/.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F)))
Symmetry

(abs F)

(negabs l)

Compiler

Compiled 14 to 10 computations (28.6% saved)

eval0.0ms (0%)

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

Compiled 0 to 2 computations (-∞% saved)

prune0.0ms (0%)

Memory
1.0MiB live, 1.0MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶71.9%
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
Compiler

Compiled 14 to 10 computations (28.6% saved)

series62.0ms (1.3%)

Memory
-17.6MiB live, 27.2MiB allocated; 6ms collecting garbage
Counts
10 → 25
Calls
Call 1
Inputs
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
(*.f64 (PI.f64) l)
(PI.f64)
l
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l)))
(/.f64 #s(literal 1 binary64) (*.f64 F F))
#s(literal 1 binary64)
(*.f64 F F)
F
(tan.f64 (*.f64 (PI.f64) l))
Outputs
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (* (/ 1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))))
#s(approx (/ 1 (* F F)) #s(hole binary64 (/ 1 (pow F 2))))
#s(approx (* F F) #s(hole binary64 (pow F 2)))
#s(approx F #s(hole binary64 F))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (PI) l) #s(hole binary64 (* l (PI))))
#s(approx l #s(hole binary64 l))
#s(approx (* (/ 1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (/ (* l (PI)) (pow F 2))))
#s(approx (* (/ 1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* 1/120 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2)))))))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (PI))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (+ (* 1/120 (pow (PI) 5)) (* (pow l 2) (- (* -1/5040 (pow (PI) 7)) (+ (* -1/2 (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (+ (* -1/720 (pow (PI) 7)) (* 1/24 (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))))))))) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (/ (sin (* l (PI))) (cos (* l (PI))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
Calls

6 calls:

TimeVariablePointExpression
51.0ms
l
@0
((- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (PI) l) (PI) l (* (/ 1 (* F F)) (tan (* (PI) l))) (/ 1 (* F F)) 1 (* F F) F (tan (* (PI) l)))
3.0ms
F
@0
((- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (PI) l) (PI) l (* (/ 1 (* F F)) (tan (* (PI) l))) (/ 1 (* F F)) 1 (* F F) F (tan (* (PI) l)))
2.0ms
l
@inf
((- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (PI) l) (PI) l (* (/ 1 (* F F)) (tan (* (PI) l))) (/ 1 (* F F)) 1 (* F F) F (tan (* (PI) l)))
2.0ms
F
@inf
((- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (PI) l) (PI) l (* (/ 1 (* F F)) (tan (* (PI) l))) (/ 1 (* F F)) 1 (* F F) F (tan (* (PI) l)))
2.0ms
l
@-inf
((- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (PI) l) (PI) l (* (/ 1 (* F F)) (tan (* (PI) l))) (/ 1 (* F F)) 1 (* F F) F (tan (* (PI) l)))

rewrite207.0ms (4.4%)

Memory
-8.5MiB live, 233.2MiB allocated; 44ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01871190
01981037
11165992
08284962
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
35 → 100
Calls
Call 1
Inputs
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
(*.f64 (PI.f64) l)
(PI.f64)
l
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l)))
(/.f64 #s(literal 1 binary64) (*.f64 F F))
#s(literal 1 binary64)
(*.f64 F F)
F
(tan.f64 (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (* (/ 1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))))
#s(approx (/ 1 (* F F)) #s(hole binary64 (/ 1 (pow F 2))))
#s(approx (* F F) #s(hole binary64 (pow F 2)))
#s(approx F #s(hole binary64 F))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (PI) l) #s(hole binary64 (* l (PI))))
#s(approx l #s(hole binary64 l))
#s(approx (* (/ 1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (/ (* l (PI)) (pow F 2))))
#s(approx (* (/ 1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* 1/120 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2)))))))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (PI))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (+ (* 1/120 (pow (PI) 5)) (* (pow l 2) (- (* -1/5040 (pow (PI) 7)) (+ (* -1/2 (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (+ (* -1/720 (pow (PI) 7)) (* 1/24 (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))))))))) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (/ (sin (* l (PI))) (cos (* l (PI))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
Outputs
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (pow.f64 F #s(literal -2 binary64))) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 (neg.f64 (pow.f64 F #s(literal -2 binary64))) (tan.f64 (*.f64 (PI.f64) l))))) (+.f64 (*.f64 (PI.f64) l) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (pow.f64 F #s(literal -2 binary64))) (tan.f64 (*.f64 (PI.f64) l))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (pow.f64 F #s(literal -2 binary64))) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 (neg.f64 (pow.f64 F #s(literal -2 binary64))) (tan.f64 (*.f64 (PI.f64) l)))) (*.f64 (*.f64 (PI.f64) l) (*.f64 (neg.f64 (pow.f64 F #s(literal -2 binary64))) (tan.f64 (*.f64 (PI.f64) l)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (*.f64 (PI.f64) l) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) l) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 2 binary64))) (+.f64 (*.f64 (PI.f64) l) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) l) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64)))))))
(-.f64 (ratio-square-sum.f64 (*.f64 (PI.f64) l) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64)))) (/.f64 (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 2 binary64)) (+.f64 (*.f64 (PI.f64) l) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) l) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))))))) (/.f64 (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) l) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))))))))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (neg.f64 (neg.f64 (pow.f64 F #s(literal -2 binary64)))) (tan.f64 (*.f64 (PI.f64) l))))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))))
(+.f64 (*.f64 (PI.f64) l) (*.f64 (neg.f64 (pow.f64 F #s(literal -2 binary64))) (tan.f64 (*.f64 (PI.f64) l))))
(*.f64 (PI.f64) l)
(*.f64 l (PI.f64))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) l))
(PI.f64)
l
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (neg.f64 F)))
(*.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 F)) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (fabs.f64 F)))
(*.f64 (pow.f64 F #s(literal -1 binary64)) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) F))
(*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64)))
(*.f64 (pow.f64 F #s(literal -2 binary64)) (tan.f64 (*.f64 (PI.f64) l)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (tan.f64 (*.f64 (PI.f64) l)))) (neg.f64 (*.f64 F F)))
(/.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) l))) (pow.f64 F #s(literal -1 binary64))) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) l))) F))
(/.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) l))) #s(literal -1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) l))) (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) l))) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -1 binary64))) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) F))
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
(/.f64 (*.f64 (pow.f64 F #s(literal -1 binary64)) (neg.f64 (sin.f64 (*.f64 (PI.f64) l)))) (*.f64 F (neg.f64 (cos.f64 (*.f64 (PI.f64) l)))))
(/.f64 (*.f64 (pow.f64 F #s(literal -1 binary64)) (sin.f64 (*.f64 (PI.f64) l))) (*.f64 F (cos.f64 (*.f64 (PI.f64) l))))
(/.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 (*.f64 (PI.f64) l)))) (*.f64 (neg.f64 (*.f64 F F)) (neg.f64 (cos.f64 (*.f64 (PI.f64) l)))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 (*.f64 (PI.f64) l)))) (*.f64 (*.f64 F F) (neg.f64 (cos.f64 (*.f64 (PI.f64) l)))))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (*.f64 (PI.f64) l))) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
(/.f64 (*.f64 #s(literal 1 binary64) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F))
(/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 (PI.f64) l))) (*.f64 (neg.f64 (*.f64 F F)) (cos.f64 (*.f64 (PI.f64) l))))
(*.f64 (pow.f64 (*.f64 F F) #s(literal -1/2 binary64)) (pow.f64 (*.f64 F F) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 F) #s(literal -1 binary64)) (pow.f64 (neg.f64 F) #s(literal -1 binary64)))
(*.f64 (pow.f64 (fabs.f64 F) #s(literal -1 binary64)) (pow.f64 (fabs.f64 F) #s(literal -1 binary64)))
(*.f64 (pow.f64 F #s(literal -1 binary64)) (pow.f64 F #s(literal -1 binary64)))
(pow.f64 (*.f64 F F) #s(literal -1 binary64))
(pow.f64 F #s(literal -2 binary64))
(/.f64 (neg.f64 (pow.f64 F #s(literal -1 binary64))) (neg.f64 F))
(/.f64 (pow.f64 F #s(literal -1 binary64)) F)
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 F F)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 F F))))
(/.f64 #s(literal 1 binary64) (*.f64 F F))
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 F) #s(literal 2 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 F) #s(literal 2 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 F) #s(literal 2 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 F F)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 F) #s(literal -2 binary64)))
#s(literal 1 binary64)
(*.f64 (neg.f64 (neg.f64 F)) (neg.f64 (neg.f64 F)))
(*.f64 (neg.f64 (fabs.f64 F)) (neg.f64 (fabs.f64 F)))
(*.f64 (fabs.f64 (fabs.f64 F)) (fabs.f64 (fabs.f64 F)))
(*.f64 (exp.f64 (log.f64 F)) (exp.f64 (log.f64 F)))
(*.f64 (neg.f64 F) (neg.f64 F))
(*.f64 (fabs.f64 F) (fabs.f64 F))
(*.f64 F F)
(pow.f64 (exp.f64 (log.f64 F)) #s(literal 2 binary64))
(pow.f64 (neg.f64 F) #s(literal 2 binary64))
(pow.f64 (fabs.f64 F) #s(literal 2 binary64))
(pow.f64 (*.f64 F F) #s(literal 1 binary64))
(pow.f64 F #s(literal 2 binary64))
(fabs.f64 (*.f64 F F))
(exp.f64 (*.f64 (log.f64 F) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 F) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 F) #s(literal 2 binary64))))
F
(/.f64 (neg.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) l)))) (neg.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) l)))))
(/.f64 (+.f64 (tan.f64 (*.f64 (PI.f64) l)) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (tan.f64 (PI.f64)))))
(/.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) l))) (neg.f64 (cos.f64 (*.f64 (PI.f64) l))))
(/.f64 (sin.f64 (*.f64 (PI.f64) l)) (cos.f64 (*.f64 (PI.f64) l)))
(tan.f64 (+.f64 (+.f64 (*.f64 (PI.f64) l) (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (*.f64 (PI.f64) l) (PI.f64)))
(tan.f64 (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
#s(approx (* (/ 1 (* F F)) (tan (* (PI) l))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (cos.f64 (*.f64 (PI.f64) l))))
#s(approx (/ 1 (* F F)) (pow.f64 F #s(literal -2 binary64)))
#s(approx (* F F) (*.f64 F F))
#s(approx F F)
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (+.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 (PI.f64) l)))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/3 binary64)) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (-.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F)) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 l l)) (*.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (-.f64 (*.f64 (-.f64 (+.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F)) (*.f64 (-.f64 (-.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (*.f64 #s(literal 1/720 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 F F)) (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64))))) (*.f64 #s(literal -1/5040 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F))) (*.f64 l l))) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 l l)) (*.f64 #s(literal 1/2 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* (PI) l) (*.f64 (PI.f64) l))
#s(approx l l)
#s(approx (* (/ 1 (* F F)) (tan (* (PI) l))) (*.f64 l (/.f64 (PI.f64) (*.f64 F F))))
#s(approx (* (/ 1 (* F F)) (tan (* (PI) l))) (*.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* (/ 1 (* F F)) (tan (* (PI) l))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 F F)) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 l l)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* (/ 1 (* F F)) (tan (* (PI) l))) (*.f64 (+.f64 (*.f64 (-.f64 (-.f64 (*.f64 (-.f64 (-.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) (*.f64 F F)) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal 1/720 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 F F))) (*.f64 l l)) (*.f64 #s(literal -1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F))) (*.f64 l l)) (*.f64 #s(literal 1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 l l)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (tan (* (PI) l)) (*.f64 (PI.f64) l))
#s(approx (tan (* (PI) l)) (*.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64)) (*.f64 l l)) (PI.f64)) l))
#s(approx (tan (* (PI) l)) (*.f64 (+.f64 (*.f64 (-.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 l l)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/2 binary64))) (*.f64 l l)) (PI.f64)) l))
#s(approx (tan (* (PI) l)) (*.f64 (+.f64 (*.f64 (-.f64 (-.f64 (*.f64 (-.f64 (-.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) (-.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal 1/720 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))))) (*.f64 l l)) (*.f64 #s(literal -1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 l l)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/2 binary64))) (*.f64 l l)) (PI.f64)) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (+.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 F F) l)) (tan.f64 (*.f64 (PI.f64) l))) (PI.f64)) l))
#s(approx (tan (* (PI) l)) (tan.f64 (*.f64 (PI.f64) l)))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (neg.f64 (-.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 F F) l)) (tan.f64 (*.f64 (PI.f64) l))) l))))

eval78.0ms (1.6%)

Memory
4.4MiB live, 136.8MiB allocated; 26ms collecting garbage
Samples
43.0ms957×0valid
3.0ms67×0invalid
Compiler

Compiled 2 699 to 504 computations (81.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 21.0ms
ival-mult: 12.0ms (58.4% of total)
ival-div: 6.0ms (29.2% of total)
ival-add: 1.0ms (4.9% of total)
ival-true: 1.0ms (4.9% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

prune10.0ms (0.2%)

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

13 alts after pruning (13 fresh and 0 done)

PrunedKeptTotal
New9613109
Fresh000
Picked101
Done000
Total9713110
Accuracy
99.5%
Counts
110 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
24.5%
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) l) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64)))))))
37.4%
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 2 binary64))) (+.f64 (*.f64 (PI.f64) l) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64)))))
76.6%
(-.f64 (*.f64 (PI.f64) l) (/.f64 (*.f64 (pow.f64 F #s(literal -1 binary64)) (sin.f64 (*.f64 (PI.f64) l))) (*.f64 F (cos.f64 (*.f64 (PI.f64) l)))))
72.5%
(-.f64 (*.f64 (PI.f64) l) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
▶72.5%
(-.f64 (*.f64 (PI.f64) l) (/.f64 (*.f64 #s(literal 1 binary64) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
▶24.3%
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (log.f64 (pow.f64 (exp.f64 (PI.f64)) l)))))
63.6%
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) #s(approx (tan (* (PI) l)) (*.f64 (PI.f64) l))))
▶76.6%
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (neg.f64 F))))
45.2%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
20.5%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
▶63.6%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
66.7%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (+.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 F F) l)) (tan.f64 (*.f64 (PI.f64) l))) (PI.f64)) l))
▶77.0%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
Compiler

Compiled 612 to 382 computations (37.6% saved)

series204.0ms (4.3%)

Memory
-17.9MiB live, 228.4MiB allocated; 51ms collecting garbage
Counts
27 → 101
Calls
Call 1
Inputs
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
(*.f64 (PI.f64) l)
(PI.f64)
l
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
(*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l)
(-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F)))
(/.f64 (PI.f64) (*.f64 F F))
(*.f64 F F)
F
(-.f64 (*.f64 (PI.f64) l) (/.f64 (*.f64 #s(literal 1 binary64) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
(/.f64 (*.f64 #s(literal 1 binary64) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F))
(*.f64 #s(literal 1 binary64) (tan.f64 (*.f64 (PI.f64) l)))
#s(literal 1 binary64)
(tan.f64 (*.f64 (PI.f64) l))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (neg.f64 F))))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (neg.f64 F)))
(/.f64 #s(literal 1 binary64) (neg.f64 F))
(neg.f64 F)
(/.f64 (tan.f64 (*.f64 (PI.f64) l)) (neg.f64 F))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (log.f64 (pow.f64 (exp.f64 (PI.f64)) l)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (log.f64 (pow.f64 (exp.f64 (PI.f64)) l))))
(/.f64 #s(literal 1 binary64) (*.f64 F F))
(tan.f64 (log.f64 (pow.f64 (exp.f64 (PI.f64)) l)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) l))
(pow.f64 (exp.f64 (PI.f64)) l)
(exp.f64 (PI.f64))
Outputs
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (/ (+ (* -1 (* l (PI))) (* (pow F 2) (* l (PI)))) (pow F 2))))
#s(approx (- (PI) (/ (PI) (* F F))) #s(hole binary64 (* -1 (/ (PI) (pow F 2)))))
#s(approx (- (PI) (/ (PI) (* F F))) #s(hole binary64 (/ (- (* (pow F 2) (PI)) (PI)) (pow F 2))))
#s(approx (/ (PI) (* F F)) #s(hole binary64 (/ (PI) (pow F 2))))
#s(approx (* F F) #s(hole binary64 (pow F 2)))
#s(approx F #s(hole binary64 F))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (/ (* 1 (tan (* (PI) l))) (* F F)) #s(hole binary64 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))))
#s(approx (/ 1 (neg F)) #s(hole binary64 (/ -1 F)))
#s(approx (neg F) #s(hole binary64 (* -1 F)))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* F (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) #s(hole binary64 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))))
#s(approx (/ 1 (* F F)) #s(hole binary64 (/ 1 (pow F 2))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* l (PI))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (+ (* -1 (/ (* l (PI)) (pow F 2))) (* l (PI)))))
#s(approx (- (PI) (/ (PI) (* F F))) #s(hole binary64 (PI)))
#s(approx (- (PI) (/ (PI) (* F F))) #s(hole binary64 (+ (PI) (* -1 (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (PI) l) #s(hole binary64 (* l (PI))))
#s(approx l #s(hole binary64 l))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (/ (* 1 (tan (* (PI) l))) (* F F)) #s(hole binary64 (/ (* l (PI)) (pow F 2))))
#s(approx (/ (* 1 (tan (* (PI) l))) (* F F)) #s(hole binary64 (* l (+ (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (* 1 (tan (* (PI) l))) (* F F)) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (* 1 (tan (* (PI) l))) (* F F)) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* 1/120 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2)))))))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (* 1 (tan (* (PI) l))) #s(hole binary64 (* l (PI))))
#s(approx (* 1 (tan (* (PI) l))) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))))))
#s(approx (* 1 (tan (* (PI) l))) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (* 1 (tan (* (PI) l))) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (+ (* 1/120 (pow (PI) 5)) (* (pow l 2) (- (* -1/5040 (pow (PI) 7)) (+ (* -1/2 (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (+ (* -1/720 (pow (PI) 7)) (* 1/24 (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))))))))) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (PI))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (+ (* 1/120 (pow (PI) 5)) (* (pow l 2) (- (* -1/5040 (pow (PI) 7)) (+ (* -1/2 (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (+ (* -1/720 (pow (PI) 7)) (* 1/24 (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))))))))) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (/ (* l (PI)) (pow F 2))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (* l (+ (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* 1/120 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2)))))))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* -1 (/ (* l (PI)) F))))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* l (+ (* -1 (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) F)) (* -1/2 (/ (pow (PI) 3) F))))) (* -1 (/ (PI) F))))))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* l (+ (* -1 (/ (PI) F)) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F)) (* 1/24 (/ (pow (PI) 5) F)))))) (* -1 (- (* -1/6 (/ (pow (PI) 3) F)) (* -1/2 (/ (pow (PI) 3) F))))))))))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* l (+ (* -1 (/ (PI) F)) (* (pow l 2) (+ (* -1 (- (* -1/6 (/ (pow (PI) 3) F)) (* -1/2 (/ (pow (PI) 3) F)))) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) F)) (+ (* -1/720 (/ (pow (PI) 7) F)) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F))))))) (* -1 (- (* 1/120 (/ (pow (PI) 5) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F)) (* 1/24 (/ (pow (PI) 5) F)))))))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (* l (- (+ (PI) (* -1/2 (/ (* l (+ (* -1 (pow (PI) 2)) (pow (PI) 2))) (pow F 2)))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (* l (- (+ (PI) (* l (- (* l (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* 1/6 (/ (+ (* -3 (pow (PI) 3)) (+ (* 2 (pow (PI) 3)) (pow (PI) 3))) (pow F 2)))))) (* 1/2 (/ (+ (* -1 (pow (PI) 2)) (pow (PI) 2)) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (* l (- (+ (PI) (* l (- (* l (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* l (- (* -1/2 (/ (* (pow (PI) 2) (+ (* -1 (pow (PI) 2)) (pow (PI) 2))) (pow F 2))) (* 1/24 (/ (+ (* -6 (pow (PI) 4)) (+ (* -4 (pow (PI) 4)) (+ (* -3 (pow (PI) 4)) (+ (* 12 (pow (PI) 4)) (pow (PI) 4))))) (pow F 2)))))) (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* 1/6 (/ (+ (* -3 (pow (PI) 3)) (+ (* 2 (pow (PI) 3)) (pow (PI) 3))) (pow F 2)))))) (* 1/2 (/ (+ (* -1 (pow (PI) 2)) (pow (PI) 2)) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) #s(hole binary64 (/ (* l (PI)) (pow F 2))))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) #s(hole binary64 (* l (+ (* 1/2 (/ (* l (+ (* -1 (pow (PI) 2)) (pow (PI) 2))) (pow F 2))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) #s(hole binary64 (* l (+ (* l (+ (* 1/2 (/ (+ (* -1 (pow (PI) 2)) (pow (PI) 2)) (pow F 2))) (* l (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* 1/6 (/ (+ (* -3 (pow (PI) 3)) (+ (* 2 (pow (PI) 3)) (pow (PI) 3))) (pow F 2)))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) #s(hole binary64 (* l (+ (* l (+ (* 1/2 (/ (+ (* -1 (pow (PI) 2)) (pow (PI) 2)) (pow F 2))) (* l (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (+ (* 1/6 (/ (+ (* -3 (pow (PI) 3)) (+ (* 2 (pow (PI) 3)) (pow (PI) 3))) (pow F 2))) (* l (- (* 1/24 (/ (+ (* -6 (pow (PI) 4)) (+ (* -4 (pow (PI) 4)) (+ (* -3 (pow (PI) 4)) (+ (* 12 (pow (PI) 4)) (pow (PI) 4))))) (pow F 2))) (* -1/2 (/ (* (pow (PI) 2) (+ (* -1 (pow (PI) 2)) (pow (PI) 2))) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))))) (/ (PI) (pow F 2))))))
#s(approx (tan (log (pow (exp (PI)) l))) #s(hole binary64 (* l (PI))))
#s(approx (tan (log (pow (exp (PI)) l))) #s(hole binary64 (* l (+ (PI) (* 1/2 (* l (+ (* -1 (pow (PI) 2)) (pow (PI) 2))))))))
#s(approx (tan (log (pow (exp (PI)) l))) #s(hole binary64 (* l (+ (PI) (* l (+ (* 1/2 (+ (* -1 (pow (PI) 2)) (pow (PI) 2))) (* l (- (+ (* -1/6 (pow (PI) 3)) (* 1/6 (+ (* -3 (pow (PI) 3)) (+ (* 2 (pow (PI) 3)) (pow (PI) 3))))) (* -1/2 (pow (PI) 3))))))))))
#s(approx (tan (log (pow (exp (PI)) l))) #s(hole binary64 (* l (+ (PI) (* l (+ (* 1/2 (+ (* -1 (pow (PI) 2)) (pow (PI) 2))) (* l (- (+ (* -1/6 (pow (PI) 3)) (+ (* 1/6 (+ (* -3 (pow (PI) 3)) (+ (* 2 (pow (PI) 3)) (pow (PI) 3)))) (* l (- (* 1/24 (+ (* -6 (pow (PI) 4)) (+ (* -4 (pow (PI) 4)) (+ (* -3 (pow (PI) 4)) (+ (* 12 (pow (PI) 4)) (pow (PI) 4)))))) (* -1/2 (* (pow (PI) 2) (+ (* -1 (pow (PI) 2)) (pow (PI) 2)))))))) (* -1/2 (pow (PI) 3))))))))))
#s(approx (log (pow (exp (PI)) l)) #s(hole binary64 (* l (PI))))
#s(approx (log (pow (exp (PI)) l)) #s(hole binary64 (* l (+ (PI) (* 1/2 (* l (+ (* -1 (pow (PI) 2)) (pow (PI) 2))))))))
#s(approx (log (pow (exp (PI)) l)) #s(hole binary64 (* l (+ (PI) (* l (+ (* 1/6 (* l (+ (* -3 (pow (PI) 3)) (+ (* 2 (pow (PI) 3)) (pow (PI) 3))))) (* 1/2 (+ (* -1 (pow (PI) 2)) (pow (PI) 2)))))))))
#s(approx (log (pow (exp (PI)) l)) #s(hole binary64 (* l (+ (PI) (* l (+ (* 1/2 (+ (* -1 (pow (PI) 2)) (pow (PI) 2))) (* l (+ (* 1/24 (* l (+ (* -6 (pow (PI) 4)) (+ (* -4 (pow (PI) 4)) (+ (* -3 (pow (PI) 4)) (+ (* 12 (pow (PI) 4)) (pow (PI) 4))))))) (* 1/6 (+ (* -3 (pow (PI) 3)) (+ (* 2 (pow (PI) 3)) (pow (PI) 3))))))))))))
#s(approx (pow (exp (PI)) l) #s(hole binary64 1))
#s(approx (pow (exp (PI)) l) #s(hole binary64 (+ 1 (* l (PI)))))
#s(approx (pow (exp (PI)) l) #s(hole binary64 (+ 1 (* l (+ (PI) (* 1/2 (* l (pow (PI) 2))))))))
#s(approx (pow (exp (PI)) l) #s(hole binary64 (+ 1 (* l (+ (PI) (* l (+ (* 1/6 (* l (pow (PI) 3))) (* 1/2 (pow (PI) 2)))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (* 1 (tan (* (PI) l))) #s(hole binary64 (/ (sin (* l (PI))) (cos (* l (PI))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (/ (sin (* l (PI))) (cos (* l (PI))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (tan (log (pow (exp (PI)) l))) #s(hole binary64 (/ (sin (* l (PI))) (cos (* l (PI))))))
#s(approx (pow (exp (PI)) l) #s(hole binary64 (exp (* l (PI)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
Calls

6 calls:

TimeVariablePointExpression
62.0ms
F
@0
((- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (PI) l) (PI) l (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (- (PI) (/ (PI) (* F F))) (/ (PI) (* F F)) (* F F) F (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) (/ (* 1 (tan (* (PI) l))) (* F F)) (* 1 (tan (* (PI) l))) 1 (tan (* (PI) l)) (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) (/ 1 (neg F)) (neg F) (/ (tan (* (PI) l)) (neg F)) (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))) (log (pow (exp (PI)) l)) (pow (exp (PI)) l) (exp (PI)))
49.0ms
l
@-inf
((- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (PI) l) (PI) l (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (- (PI) (/ (PI) (* F F))) (/ (PI) (* F F)) (* F F) F (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) (/ (* 1 (tan (* (PI) l))) (* F F)) (* 1 (tan (* (PI) l))) 1 (tan (* (PI) l)) (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) (/ 1 (neg F)) (neg F) (/ (tan (* (PI) l)) (neg F)) (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))) (log (pow (exp (PI)) l)) (pow (exp (PI)) l) (exp (PI)))
38.0ms
F
@inf
((- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (PI) l) (PI) l (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (- (PI) (/ (PI) (* F F))) (/ (PI) (* F F)) (* F F) F (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) (/ (* 1 (tan (* (PI) l))) (* F F)) (* 1 (tan (* (PI) l))) 1 (tan (* (PI) l)) (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) (/ 1 (neg F)) (neg F) (/ (tan (* (PI) l)) (neg F)) (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))) (log (pow (exp (PI)) l)) (pow (exp (PI)) l) (exp (PI)))
26.0ms
l
@inf
((- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (PI) l) (PI) l (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (- (PI) (/ (PI) (* F F))) (/ (PI) (* F F)) (* F F) F (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) (/ (* 1 (tan (* (PI) l))) (* F F)) (* 1 (tan (* (PI) l))) 1 (tan (* (PI) l)) (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) (/ 1 (neg F)) (neg F) (/ (tan (* (PI) l)) (neg F)) (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))) (log (pow (exp (PI)) l)) (pow (exp (PI)) l) (exp (PI)))
18.0ms
F
@-inf
((- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (PI) l) (PI) l (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (- (PI) (/ (PI) (* F F))) (/ (PI) (* F F)) (* F F) F (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) (/ (* 1 (tan (* (PI) l))) (* F F)) (* 1 (tan (* (PI) l))) 1 (tan (* (PI) l)) (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) (/ 1 (neg F)) (neg F) (/ (tan (* (PI) l)) (neg F)) (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))) (log (pow (exp (PI)) l)) (pow (exp (PI)) l) (exp (PI)))

rewrite186.0ms (3.9%)

Memory
11.2MiB live, 246.7MiB allocated; 38ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04824775
05264068
128904014
085433886
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
128 → 380
Calls
Call 1
Inputs
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
(*.f64 (PI.f64) l)
(PI.f64)
l
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
(*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l)
(-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F)))
(/.f64 (PI.f64) (*.f64 F F))
(*.f64 F F)
F
(-.f64 (*.f64 (PI.f64) l) (/.f64 (*.f64 #s(literal 1 binary64) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
(/.f64 (*.f64 #s(literal 1 binary64) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F))
(*.f64 #s(literal 1 binary64) (tan.f64 (*.f64 (PI.f64) l)))
#s(literal 1 binary64)
(tan.f64 (*.f64 (PI.f64) l))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (neg.f64 F))))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (neg.f64 F)))
(/.f64 #s(literal 1 binary64) (neg.f64 F))
(neg.f64 F)
(/.f64 (tan.f64 (*.f64 (PI.f64) l)) (neg.f64 F))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (log.f64 (pow.f64 (exp.f64 (PI.f64)) l)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (log.f64 (pow.f64 (exp.f64 (PI.f64)) l))))
(/.f64 #s(literal 1 binary64) (*.f64 F F))
(tan.f64 (log.f64 (pow.f64 (exp.f64 (PI.f64)) l)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) l))
(pow.f64 (exp.f64 (PI.f64)) l)
(exp.f64 (PI.f64))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (/ (+ (* -1 (* l (PI))) (* (pow F 2) (* l (PI)))) (pow F 2))))
#s(approx (- (PI) (/ (PI) (* F F))) #s(hole binary64 (* -1 (/ (PI) (pow F 2)))))
#s(approx (- (PI) (/ (PI) (* F F))) #s(hole binary64 (/ (- (* (pow F 2) (PI)) (PI)) (pow F 2))))
#s(approx (/ (PI) (* F F)) #s(hole binary64 (/ (PI) (pow F 2))))
#s(approx (* F F) #s(hole binary64 (pow F 2)))
#s(approx F #s(hole binary64 F))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (/ (* 1 (tan (* (PI) l))) (* F F)) #s(hole binary64 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))))
#s(approx (/ 1 (neg F)) #s(hole binary64 (/ -1 F)))
#s(approx (neg F) #s(hole binary64 (* -1 F)))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* F (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) #s(hole binary64 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))))
#s(approx (/ 1 (* F F)) #s(hole binary64 (/ 1 (pow F 2))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* l (PI))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (+ (* -1 (/ (* l (PI)) (pow F 2))) (* l (PI)))))
#s(approx (- (PI) (/ (PI) (* F F))) #s(hole binary64 (PI)))
#s(approx (- (PI) (/ (PI) (* F F))) #s(hole binary64 (+ (PI) (* -1 (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (PI) l) #s(hole binary64 (* l (PI))))
#s(approx l #s(hole binary64 l))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (/ (* 1 (tan (* (PI) l))) (* F F)) #s(hole binary64 (/ (* l (PI)) (pow F 2))))
#s(approx (/ (* 1 (tan (* (PI) l))) (* F F)) #s(hole binary64 (* l (+ (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (* 1 (tan (* (PI) l))) (* F F)) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (* 1 (tan (* (PI) l))) (* F F)) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* 1/120 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2)))))))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (* 1 (tan (* (PI) l))) #s(hole binary64 (* l (PI))))
#s(approx (* 1 (tan (* (PI) l))) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))))))
#s(approx (* 1 (tan (* (PI) l))) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (* 1 (tan (* (PI) l))) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (+ (* 1/120 (pow (PI) 5)) (* (pow l 2) (- (* -1/5040 (pow (PI) 7)) (+ (* -1/2 (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (+ (* -1/720 (pow (PI) 7)) (* 1/24 (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))))))))) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (PI))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (+ (* 1/120 (pow (PI) 5)) (* (pow l 2) (- (* -1/5040 (pow (PI) 7)) (+ (* -1/2 (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (+ (* -1/720 (pow (PI) 7)) (* 1/24 (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))))))))) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (/ (* l (PI)) (pow F 2))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (* l (+ (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* 1/120 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2)))))))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* -1 (/ (* l (PI)) F))))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* l (+ (* -1 (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) F)) (* -1/2 (/ (pow (PI) 3) F))))) (* -1 (/ (PI) F))))))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* l (+ (* -1 (/ (PI) F)) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F)) (* 1/24 (/ (pow (PI) 5) F)))))) (* -1 (- (* -1/6 (/ (pow (PI) 3) F)) (* -1/2 (/ (pow (PI) 3) F))))))))))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* l (+ (* -1 (/ (PI) F)) (* (pow l 2) (+ (* -1 (- (* -1/6 (/ (pow (PI) 3) F)) (* -1/2 (/ (pow (PI) 3) F)))) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) F)) (+ (* -1/720 (/ (pow (PI) 7) F)) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F))))))) (* -1 (- (* 1/120 (/ (pow (PI) 5) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F)) (* 1/24 (/ (pow (PI) 5) F)))))))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (* l (- (+ (PI) (* -1/2 (/ (* l (+ (* -1 (pow (PI) 2)) (pow (PI) 2))) (pow F 2)))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (* l (- (+ (PI) (* l (- (* l (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* 1/6 (/ (+ (* -3 (pow (PI) 3)) (+ (* 2 (pow (PI) 3)) (pow (PI) 3))) (pow F 2)))))) (* 1/2 (/ (+ (* -1 (pow (PI) 2)) (pow (PI) 2)) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (* l (- (+ (PI) (* l (- (* l (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* l (- (* -1/2 (/ (* (pow (PI) 2) (+ (* -1 (pow (PI) 2)) (pow (PI) 2))) (pow F 2))) (* 1/24 (/ (+ (* -6 (pow (PI) 4)) (+ (* -4 (pow (PI) 4)) (+ (* -3 (pow (PI) 4)) (+ (* 12 (pow (PI) 4)) (pow (PI) 4))))) (pow F 2)))))) (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* 1/6 (/ (+ (* -3 (pow (PI) 3)) (+ (* 2 (pow (PI) 3)) (pow (PI) 3))) (pow F 2)))))) (* 1/2 (/ (+ (* -1 (pow (PI) 2)) (pow (PI) 2)) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) #s(hole binary64 (/ (* l (PI)) (pow F 2))))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) #s(hole binary64 (* l (+ (* 1/2 (/ (* l (+ (* -1 (pow (PI) 2)) (pow (PI) 2))) (pow F 2))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) #s(hole binary64 (* l (+ (* l (+ (* 1/2 (/ (+ (* -1 (pow (PI) 2)) (pow (PI) 2)) (pow F 2))) (* l (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* 1/6 (/ (+ (* -3 (pow (PI) 3)) (+ (* 2 (pow (PI) 3)) (pow (PI) 3))) (pow F 2)))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) #s(hole binary64 (* l (+ (* l (+ (* 1/2 (/ (+ (* -1 (pow (PI) 2)) (pow (PI) 2)) (pow F 2))) (* l (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (+ (* 1/6 (/ (+ (* -3 (pow (PI) 3)) (+ (* 2 (pow (PI) 3)) (pow (PI) 3))) (pow F 2))) (* l (- (* 1/24 (/ (+ (* -6 (pow (PI) 4)) (+ (* -4 (pow (PI) 4)) (+ (* -3 (pow (PI) 4)) (+ (* 12 (pow (PI) 4)) (pow (PI) 4))))) (pow F 2))) (* -1/2 (/ (* (pow (PI) 2) (+ (* -1 (pow (PI) 2)) (pow (PI) 2))) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))))) (/ (PI) (pow F 2))))))
#s(approx (tan (log (pow (exp (PI)) l))) #s(hole binary64 (* l (PI))))
#s(approx (tan (log (pow (exp (PI)) l))) #s(hole binary64 (* l (+ (PI) (* 1/2 (* l (+ (* -1 (pow (PI) 2)) (pow (PI) 2))))))))
#s(approx (tan (log (pow (exp (PI)) l))) #s(hole binary64 (* l (+ (PI) (* l (+ (* 1/2 (+ (* -1 (pow (PI) 2)) (pow (PI) 2))) (* l (- (+ (* -1/6 (pow (PI) 3)) (* 1/6 (+ (* -3 (pow (PI) 3)) (+ (* 2 (pow (PI) 3)) (pow (PI) 3))))) (* -1/2 (pow (PI) 3))))))))))
#s(approx (tan (log (pow (exp (PI)) l))) #s(hole binary64 (* l (+ (PI) (* l (+ (* 1/2 (+ (* -1 (pow (PI) 2)) (pow (PI) 2))) (* l (- (+ (* -1/6 (pow (PI) 3)) (+ (* 1/6 (+ (* -3 (pow (PI) 3)) (+ (* 2 (pow (PI) 3)) (pow (PI) 3)))) (* l (- (* 1/24 (+ (* -6 (pow (PI) 4)) (+ (* -4 (pow (PI) 4)) (+ (* -3 (pow (PI) 4)) (+ (* 12 (pow (PI) 4)) (pow (PI) 4)))))) (* -1/2 (* (pow (PI) 2) (+ (* -1 (pow (PI) 2)) (pow (PI) 2)))))))) (* -1/2 (pow (PI) 3))))))))))
#s(approx (log (pow (exp (PI)) l)) #s(hole binary64 (* l (PI))))
#s(approx (log (pow (exp (PI)) l)) #s(hole binary64 (* l (+ (PI) (* 1/2 (* l (+ (* -1 (pow (PI) 2)) (pow (PI) 2))))))))
#s(approx (log (pow (exp (PI)) l)) #s(hole binary64 (* l (+ (PI) (* l (+ (* 1/6 (* l (+ (* -3 (pow (PI) 3)) (+ (* 2 (pow (PI) 3)) (pow (PI) 3))))) (* 1/2 (+ (* -1 (pow (PI) 2)) (pow (PI) 2)))))))))
#s(approx (log (pow (exp (PI)) l)) #s(hole binary64 (* l (+ (PI) (* l (+ (* 1/2 (+ (* -1 (pow (PI) 2)) (pow (PI) 2))) (* l (+ (* 1/24 (* l (+ (* -6 (pow (PI) 4)) (+ (* -4 (pow (PI) 4)) (+ (* -3 (pow (PI) 4)) (+ (* 12 (pow (PI) 4)) (pow (PI) 4))))))) (* 1/6 (+ (* -3 (pow (PI) 3)) (+ (* 2 (pow (PI) 3)) (pow (PI) 3))))))))))))
#s(approx (pow (exp (PI)) l) #s(hole binary64 1))
#s(approx (pow (exp (PI)) l) #s(hole binary64 (+ 1 (* l (PI)))))
#s(approx (pow (exp (PI)) l) #s(hole binary64 (+ 1 (* l (+ (PI) (* 1/2 (* l (pow (PI) 2))))))))
#s(approx (pow (exp (PI)) l) #s(hole binary64 (+ 1 (* l (+ (PI) (* l (+ (* 1/6 (* l (pow (PI) 3))) (* 1/2 (pow (PI) 2)))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (* 1 (tan (* (PI) l))) #s(hole binary64 (/ (sin (* l (PI))) (cos (* l (PI))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (/ (sin (* l (PI))) (cos (* l (PI))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (tan (log (pow (exp (PI)) l))) #s(hole binary64 (/ (sin (* l (PI))) (cos (* l (PI))))))
#s(approx (pow (exp (PI)) l) #s(hole binary64 (exp (* l (PI)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (/ (* 1 (tan (* (PI) l))) (* F F))) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l))))) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
Outputs
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 l (PI.f64)))
(*.f64 l (PI.f64))
(*.f64 (PI.f64) (log.f64 (exp.f64 l)))
(*.f64 (PI.f64) l)
(+.f64 (log.f64 (pow.f64 (exp.f64 (PI.f64)) (/.f64 l #s(literal 2 binary64)))) (log.f64 (pow.f64 (exp.f64 (PI.f64)) (/.f64 l #s(literal 2 binary64)))))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) l))
(PI.f64)
l
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
(*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l)
(*.f64 l (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))))
(/.f64 (neg.f64 (-.f64 (*.f64 (PI.f64) (PI.f64)) (ratio-of-squares.f64 (/.f64 (PI.f64) F) F))) (neg.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) (*.f64 F F)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (ratio-of-squares.f64 (/.f64 (PI.f64) F) F) (*.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F)))))))
(/.f64 (-.f64 (*.f64 (PI.f64) (PI.f64)) (ratio-of-squares.f64 (/.f64 (PI.f64) F) F)) (+.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))))
(/.f64 (-.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) (*.f64 F F)) #s(literal 3 binary64))) (+.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (ratio-of-squares.f64 (/.f64 (PI.f64) F) F) (*.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))))))
(-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F)))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) (neg.f64 (neg.f64 (*.f64 F F))))
(/.f64 (neg.f64 (PI.f64)) (neg.f64 (*.f64 F F)))
(/.f64 (/.f64 (neg.f64 (PI.f64)) F) (neg.f64 F))
(/.f64 (/.f64 (PI.f64) F) F)
(/.f64 (PI.f64) (*.f64 F F))
(exp.f64 (-.f64 (log.f64 (PI.f64)) (*.f64 (log.f64 F) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 F)) (neg.f64 (fabs.f64 F)))
(*.f64 (fabs.f64 (fabs.f64 F)) (fabs.f64 (fabs.f64 F)))
(*.f64 (exp.f64 (log.f64 F)) (exp.f64 (log.f64 F)))
(*.f64 (neg.f64 (neg.f64 F)) (neg.f64 (neg.f64 F)))
(*.f64 (fabs.f64 F) (fabs.f64 F))
(*.f64 (neg.f64 F) (neg.f64 F))
(*.f64 F F)
(pow.f64 (exp.f64 (log.f64 F)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 F) #s(literal 2 binary64))
(pow.f64 (neg.f64 F) #s(literal 2 binary64))
(pow.f64 (*.f64 F F) #s(literal 1 binary64))
(pow.f64 F #s(literal 2 binary64))
(fabs.f64 (*.f64 F F))
(exp.f64 (*.f64 (log.f64 F) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 F) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 F) #s(literal 2 binary64))))
F
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 2 binary64)) (ratio-of-squares.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F)))) (neg.f64 (+.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (*.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 2 binary64)) (ratio-of-squares.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F))) (+.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (*.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64)))))))
(-.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))))
(+.f64 (*.f64 l (PI.f64)) (*.f64 (neg.f64 (/.f64 #s(literal -1 binary64) F)) (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F))))
(+.f64 (*.f64 l (PI.f64)) (*.f64 (neg.f64 (pow.f64 F #s(literal -2 binary64))) (tan.f64 (*.f64 l (PI.f64)))))
(*.f64 (pow.f64 F #s(literal -1 binary64)) (/.f64 (tan.f64 (*.f64 l (PI.f64))) F))
(*.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F)) (/.f64 #s(literal -1 binary64) F))
(*.f64 (/.f64 #s(literal -1 binary64) F) (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F)))
(*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64)))
(*.f64 (pow.f64 F #s(literal -2 binary64)) (tan.f64 (*.f64 l (PI.f64))))
(*.f64 #s(literal 1 binary64) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F)))) (neg.f64 (neg.f64 F)))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) (tan.f64 (*.f64 l (PI.f64))))) (neg.f64 (neg.f64 F)))
(/.f64 (neg.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64))))) (neg.f64 (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal -1 binary64)) (*.f64 (neg.f64 (neg.f64 F)) F))
(/.f64 (*.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal -1 binary64)) (*.f64 F F))
(/.f64 (*.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 F)) (neg.f64 F)))
(/.f64 (*.f64 (tan.f64 (*.f64 l (PI.f64))) #s(literal -1 binary64)) (*.f64 (neg.f64 F) F))
(/.f64 (*.f64 (tan.f64 (*.f64 l (PI.f64))) #s(literal -1 binary64)) (*.f64 (neg.f64 F) (neg.f64 (neg.f64 F))))
(/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 F (neg.f64 (neg.f64 F))))
(/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 F F))
(/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 (*.f64 l (PI.f64)))) (*.f64 (neg.f64 (neg.f64 F)) (neg.f64 F)))
(/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 (*.f64 l (PI.f64)))) (*.f64 F (neg.f64 F)))
(/.f64 (*.f64 #s(literal 1 binary64) (tan.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 (neg.f64 F) (neg.f64 (neg.f64 F))))
(/.f64 (*.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64)))) (pow.f64 F #s(literal -1 binary64))) (*.f64 (neg.f64 (cos.f64 (*.f64 l (PI.f64)))) F))
(/.f64 (*.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal -1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 l (PI.f64)))) (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 l (PI.f64)))) (*.f64 F F)))
(/.f64 (*.f64 (sin.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -1 binary64))) (*.f64 (cos.f64 (*.f64 l (PI.f64))) F))
(/.f64 (*.f64 (sin.f64 (*.f64 l (PI.f64))) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 (sin.f64 (*.f64 l (PI.f64))) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) (*.f64 F F)))
(/.f64 (*.f64 (pow.f64 F #s(literal -1 binary64)) (sin.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 F (neg.f64 (cos.f64 (*.f64 l (PI.f64))))))
(/.f64 (*.f64 (pow.f64 F #s(literal -1 binary64)) (sin.f64 (*.f64 l (PI.f64)))) (*.f64 (cos.f64 (*.f64 l (PI.f64))) F))
(/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 (neg.f64 (*.f64 F F)) (neg.f64 (cos.f64 (*.f64 l (PI.f64))))))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 (*.f64 F F) (neg.f64 (cos.f64 (*.f64 l (PI.f64))))))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (*.f64 l (PI.f64)))) (*.f64 (cos.f64 (*.f64 l (PI.f64))) (*.f64 F F)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F)))) (*.f64 #s(literal 2 binary64) (neg.f64 F)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal -1 binary64) F) (tan.f64 (*.f64 l (PI.f64))))) (*.f64 #s(literal 2 binary64) (neg.f64 F)))
(/.f64 (*.f64 #s(literal 2 binary64) (/.f64 (tan.f64 (*.f64 l (PI.f64))) F)) (*.f64 #s(literal 2 binary64) F))
(/.f64 (*.f64 #s(literal 2 binary64) (tan.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 #s(literal 2 binary64) (tan.f64 (*.f64 l (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 F F)))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F))) (neg.f64 F))
(/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 l (PI.f64)))) (*.f64 (neg.f64 (*.f64 F F)) (cos.f64 (*.f64 l (PI.f64)))))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) (tan.f64 (*.f64 l (PI.f64)))) (neg.f64 F))
(/.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) F) F)
(/.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64)))) (neg.f64 (*.f64 F F)))
(/.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F)) (neg.f64 F))
(/.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F))
(*.f64 (tan.f64 (*.f64 l (PI.f64))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (tan.f64 (*.f64 l (PI.f64))))
(/.f64 (neg.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64))))) (neg.f64 (neg.f64 (cos.f64 (*.f64 l (PI.f64))))))
(/.f64 (*.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 l (PI.f64)))) #s(literal 2 binary64)))
(/.f64 (*.f64 (sin.f64 (*.f64 l (PI.f64))) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 (*.f64 l (PI.f64))))))
(/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 l (PI.f64)))) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 l (PI.f64)))))
(/.f64 (+.f64 (tan.f64 (*.f64 l (PI.f64))) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (tan.f64 (PI.f64)))))
(/.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64)))) (neg.f64 (cos.f64 (*.f64 l (PI.f64)))))
(/.f64 (sin.f64 (*.f64 l (PI.f64))) (cos.f64 (*.f64 l (PI.f64))))
(tan.f64 (+.f64 (+.f64 (*.f64 l (PI.f64)) (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (*.f64 l (PI.f64)) (PI.f64)))
(tan.f64 (*.f64 l (PI.f64)))
#s(literal 1 binary64)
(*.f64 (tan.f64 (*.f64 l (PI.f64))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (tan.f64 (*.f64 l (PI.f64))))
(/.f64 (neg.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64))))) (neg.f64 (neg.f64 (cos.f64 (*.f64 l (PI.f64))))))
(/.f64 (*.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 l (PI.f64)))) #s(literal 2 binary64)))
(/.f64 (*.f64 (sin.f64 (*.f64 l (PI.f64))) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 (*.f64 l (PI.f64))))))
(/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 l (PI.f64)))) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 l (PI.f64)))))
(/.f64 (+.f64 (tan.f64 (*.f64 l (PI.f64))) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (tan.f64 (PI.f64)))))
(/.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64)))) (neg.f64 (cos.f64 (*.f64 l (PI.f64)))))
(/.f64 (sin.f64 (*.f64 l (PI.f64))) (cos.f64 (*.f64 l (PI.f64))))
(tan.f64 (+.f64 (+.f64 (*.f64 l (PI.f64)) (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (*.f64 l (PI.f64)) (PI.f64)))
(tan.f64 (*.f64 l (PI.f64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 2 binary64)) (ratio-of-squares.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F)))) (neg.f64 (+.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (*.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 2 binary64)) (ratio-of-squares.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F))) (+.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (*.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64)))))))
(-.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))))
(+.f64 (*.f64 l (PI.f64)) (*.f64 (neg.f64 (/.f64 #s(literal -1 binary64) F)) (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F))))
(+.f64 (*.f64 l (PI.f64)) (*.f64 (neg.f64 (pow.f64 F #s(literal -2 binary64))) (tan.f64 (*.f64 l (PI.f64)))))
(*.f64 (pow.f64 F #s(literal -1 binary64)) (/.f64 (tan.f64 (*.f64 l (PI.f64))) F))
(*.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F)) (/.f64 #s(literal -1 binary64) F))
(*.f64 (/.f64 #s(literal -1 binary64) F) (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F)))
(*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64)))
(*.f64 (pow.f64 F #s(literal -2 binary64)) (tan.f64 (*.f64 l (PI.f64))))
(*.f64 #s(literal 1 binary64) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F)))) (neg.f64 (neg.f64 F)))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) (tan.f64 (*.f64 l (PI.f64))))) (neg.f64 (neg.f64 F)))
(/.f64 (neg.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64))))) (neg.f64 (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal -1 binary64)) (*.f64 (neg.f64 (neg.f64 F)) F))
(/.f64 (*.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal -1 binary64)) (*.f64 F F))
(/.f64 (*.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 F)) (neg.f64 F)))
(/.f64 (*.f64 (tan.f64 (*.f64 l (PI.f64))) #s(literal -1 binary64)) (*.f64 (neg.f64 F) F))
(/.f64 (*.f64 (tan.f64 (*.f64 l (PI.f64))) #s(literal -1 binary64)) (*.f64 (neg.f64 F) (neg.f64 (neg.f64 F))))
(/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 F (neg.f64 (neg.f64 F))))
(/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 F F))
(/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 (*.f64 l (PI.f64)))) (*.f64 (neg.f64 (neg.f64 F)) (neg.f64 F)))
(/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 (*.f64 l (PI.f64)))) (*.f64 F (neg.f64 F)))
(/.f64 (*.f64 #s(literal 1 binary64) (tan.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 (neg.f64 F) (neg.f64 (neg.f64 F))))
(/.f64 (*.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64)))) (pow.f64 F #s(literal -1 binary64))) (*.f64 (neg.f64 (cos.f64 (*.f64 l (PI.f64)))) F))
(/.f64 (*.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal -1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 l (PI.f64)))) (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 l (PI.f64)))) (*.f64 F F)))
(/.f64 (*.f64 (sin.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -1 binary64))) (*.f64 (cos.f64 (*.f64 l (PI.f64))) F))
(/.f64 (*.f64 (sin.f64 (*.f64 l (PI.f64))) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 (sin.f64 (*.f64 l (PI.f64))) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) (*.f64 F F)))
(/.f64 (*.f64 (pow.f64 F #s(literal -1 binary64)) (sin.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 F (neg.f64 (cos.f64 (*.f64 l (PI.f64))))))
(/.f64 (*.f64 (pow.f64 F #s(literal -1 binary64)) (sin.f64 (*.f64 l (PI.f64)))) (*.f64 (cos.f64 (*.f64 l (PI.f64))) F))
(/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 (neg.f64 (*.f64 F F)) (neg.f64 (cos.f64 (*.f64 l (PI.f64))))))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 (*.f64 F F) (neg.f64 (cos.f64 (*.f64 l (PI.f64))))))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (*.f64 l (PI.f64)))) (*.f64 (cos.f64 (*.f64 l (PI.f64))) (*.f64 F F)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F)))) (*.f64 #s(literal 2 binary64) (neg.f64 F)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal -1 binary64) F) (tan.f64 (*.f64 l (PI.f64))))) (*.f64 #s(literal 2 binary64) (neg.f64 F)))
(/.f64 (*.f64 #s(literal 2 binary64) (/.f64 (tan.f64 (*.f64 l (PI.f64))) F)) (*.f64 #s(literal 2 binary64) F))
(/.f64 (*.f64 #s(literal 2 binary64) (tan.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 #s(literal 2 binary64) (tan.f64 (*.f64 l (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 F F)))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F))) (neg.f64 F))
(/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 l (PI.f64)))) (*.f64 (neg.f64 (*.f64 F F)) (cos.f64 (*.f64 l (PI.f64)))))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) (tan.f64 (*.f64 l (PI.f64)))) (neg.f64 F))
(/.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) F) F)
(/.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64)))) (neg.f64 (*.f64 F F)))
(/.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F)) (neg.f64 F))
(/.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F))
(*.f64 (pow.f64 F #s(literal -1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (pow.f64 F #s(literal -1 binary64)))
(pow.f64 (neg.f64 F) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 F)))
(/.f64 #s(literal -1 binary64) F)
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (neg.f64 F))))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 F) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 F))
(neg.f64 (pow.f64 F #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 F)) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) F)
(*.f64 F #s(literal -1 binary64))
(neg.f64 F)
(/.f64 (neg.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64))))) (neg.f64 (neg.f64 (neg.f64 F))))
(/.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64)))) (neg.f64 (neg.f64 F)))
(/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F))
(neg.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) F))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 2 binary64)) (ratio-of-squares.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F)))) (neg.f64 (+.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (*.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 2 binary64)) (ratio-of-squares.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F))) (+.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (*.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64)))))))
(-.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))))
(+.f64 (*.f64 l (PI.f64)) (*.f64 (neg.f64 (/.f64 #s(literal -1 binary64) F)) (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F))))
(+.f64 (*.f64 l (PI.f64)) (*.f64 (neg.f64 (pow.f64 F #s(literal -2 binary64))) (tan.f64 (*.f64 l (PI.f64)))))
(*.f64 (pow.f64 F #s(literal -1 binary64)) (/.f64 (tan.f64 (*.f64 l (PI.f64))) F))
(*.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F)) (/.f64 #s(literal -1 binary64) F))
(*.f64 (/.f64 #s(literal -1 binary64) F) (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F)))
(*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64)))
(*.f64 (pow.f64 F #s(literal -2 binary64)) (tan.f64 (*.f64 l (PI.f64))))
(*.f64 #s(literal 1 binary64) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F)))) (neg.f64 (neg.f64 F)))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) (tan.f64 (*.f64 l (PI.f64))))) (neg.f64 (neg.f64 F)))
(/.f64 (neg.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64))))) (neg.f64 (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal -1 binary64)) (*.f64 (neg.f64 (neg.f64 F)) F))
(/.f64 (*.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal -1 binary64)) (*.f64 F F))
(/.f64 (*.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 F)) (neg.f64 F)))
(/.f64 (*.f64 (tan.f64 (*.f64 l (PI.f64))) #s(literal -1 binary64)) (*.f64 (neg.f64 F) F))
(/.f64 (*.f64 (tan.f64 (*.f64 l (PI.f64))) #s(literal -1 binary64)) (*.f64 (neg.f64 F) (neg.f64 (neg.f64 F))))
(/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 F (neg.f64 (neg.f64 F))))
(/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 F F))
(/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 (*.f64 l (PI.f64)))) (*.f64 (neg.f64 (neg.f64 F)) (neg.f64 F)))
(/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 (*.f64 l (PI.f64)))) (*.f64 F (neg.f64 F)))
(/.f64 (*.f64 #s(literal 1 binary64) (tan.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 (neg.f64 F) (neg.f64 (neg.f64 F))))
(/.f64 (*.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64)))) (pow.f64 F #s(literal -1 binary64))) (*.f64 (neg.f64 (cos.f64 (*.f64 l (PI.f64)))) F))
(/.f64 (*.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal -1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 l (PI.f64)))) (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 l (PI.f64)))) (*.f64 F F)))
(/.f64 (*.f64 (sin.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -1 binary64))) (*.f64 (cos.f64 (*.f64 l (PI.f64))) F))
(/.f64 (*.f64 (sin.f64 (*.f64 l (PI.f64))) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 (sin.f64 (*.f64 l (PI.f64))) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) (*.f64 F F)))
(/.f64 (*.f64 (pow.f64 F #s(literal -1 binary64)) (sin.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 F (neg.f64 (cos.f64 (*.f64 l (PI.f64))))))
(/.f64 (*.f64 (pow.f64 F #s(literal -1 binary64)) (sin.f64 (*.f64 l (PI.f64)))) (*.f64 (cos.f64 (*.f64 l (PI.f64))) F))
(/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 (neg.f64 (*.f64 F F)) (neg.f64 (cos.f64 (*.f64 l (PI.f64))))))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 (*.f64 F F) (neg.f64 (cos.f64 (*.f64 l (PI.f64))))))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (*.f64 l (PI.f64)))) (*.f64 (cos.f64 (*.f64 l (PI.f64))) (*.f64 F F)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F)))) (*.f64 #s(literal 2 binary64) (neg.f64 F)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal -1 binary64) F) (tan.f64 (*.f64 l (PI.f64))))) (*.f64 #s(literal 2 binary64) (neg.f64 F)))
(/.f64 (*.f64 #s(literal 2 binary64) (/.f64 (tan.f64 (*.f64 l (PI.f64))) F)) (*.f64 #s(literal 2 binary64) F))
(/.f64 (*.f64 #s(literal 2 binary64) (tan.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 #s(literal 2 binary64) (tan.f64 (*.f64 l (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 F F)))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F))) (neg.f64 F))
(/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 l (PI.f64)))) (*.f64 (neg.f64 (*.f64 F F)) (cos.f64 (*.f64 l (PI.f64)))))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) (tan.f64 (*.f64 l (PI.f64)))) (neg.f64 F))
(/.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) F) F)
(/.f64 (tan.f64 (neg.f64 (*.f64 l (PI.f64)))) (neg.f64 (*.f64 F F)))
(/.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) (neg.f64 F)) (neg.f64 F))
(/.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F))
(*.f64 (pow.f64 (fabs.f64 F) #s(literal -1 binary64)) (pow.f64 (fabs.f64 F) #s(literal -1 binary64)))
(*.f64 (pow.f64 F #s(literal -1 binary64)) (pow.f64 F #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) F) (/.f64 #s(literal -1 binary64) F))
(pow.f64 (*.f64 F F) #s(literal -1 binary64))
(pow.f64 F #s(literal -2 binary64))
(/.f64 (pow.f64 F #s(literal -1 binary64)) F)
(/.f64 (/.f64 #s(literal -1 binary64) F) (neg.f64 F))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 F F)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 F F))))
(/.f64 #s(literal 1 binary64) (*.f64 F F))
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 F) #s(literal 2 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 F) #s(literal 2 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 F) #s(literal 2 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 F F)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 F) #s(literal -2 binary64)))
(*.f64 (tan.f64 (*.f64 l (PI.f64))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (tan.f64 (*.f64 l (PI.f64))))
(/.f64 (neg.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64))))) (neg.f64 (neg.f64 (cos.f64 (*.f64 l (PI.f64))))))
(/.f64 (*.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 l (PI.f64)))) #s(literal 2 binary64)))
(/.f64 (*.f64 (sin.f64 (*.f64 l (PI.f64))) #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (neg.f64 (*.f64 l (PI.f64))))) (*.f64 #s(literal 2 binary64) (neg.f64 (cos.f64 (*.f64 l (PI.f64))))))
(/.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 l (PI.f64)))) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 l (PI.f64)))))
(/.f64 (+.f64 (tan.f64 (*.f64 l (PI.f64))) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (tan.f64 (PI.f64)))))
(/.f64 (sin.f64 (neg.f64 (*.f64 l (PI.f64)))) (neg.f64 (cos.f64 (*.f64 l (PI.f64)))))
(/.f64 (sin.f64 (*.f64 l (PI.f64))) (cos.f64 (*.f64 l (PI.f64))))
(tan.f64 (+.f64 (+.f64 (*.f64 l (PI.f64)) (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (*.f64 l (PI.f64)) (PI.f64)))
(tan.f64 (*.f64 l (PI.f64)))
(*.f64 l (PI.f64))
(*.f64 (PI.f64) (log.f64 (exp.f64 l)))
(*.f64 (PI.f64) l)
(+.f64 (log.f64 (pow.f64 (exp.f64 (PI.f64)) (/.f64 l #s(literal 2 binary64)))) (log.f64 (pow.f64 (exp.f64 (PI.f64)) (/.f64 l #s(literal 2 binary64)))))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) l))
(*.f64 (neg.f64 (pow.f64 (exp.f64 (PI.f64)) (/.f64 l #s(literal 2 binary64)))) (neg.f64 (pow.f64 (exp.f64 (PI.f64)) (/.f64 l #s(literal 2 binary64)))))
(*.f64 (fabs.f64 (pow.f64 (exp.f64 (PI.f64)) (/.f64 l #s(literal 2 binary64)))) (fabs.f64 (pow.f64 (exp.f64 (PI.f64)) (/.f64 l #s(literal 2 binary64)))))
(*.f64 (pow.f64 (exp.f64 (PI.f64)) (/.f64 l #s(literal 2 binary64))) (pow.f64 (exp.f64 (PI.f64)) (/.f64 l #s(literal 2 binary64))))
(pow.f64 (*.f64 (exp.f64 (PI.f64)) (exp.f64 (PI.f64))) (/.f64 l #s(literal 2 binary64)))
(pow.f64 (pow.f64 (exp.f64 l) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(pow.f64 (pow.f64 (exp.f64 l) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64))) (cbrt.f64 (PI.f64)))
(pow.f64 (pow.f64 (exp.f64 (PI.f64)) (/.f64 l #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (exp.f64 l) (PI.f64))
(pow.f64 (exp.f64 (PI.f64)) (+.f64 (/.f64 l #s(literal 2 binary64)) (/.f64 l #s(literal 2 binary64))))
(pow.f64 (exp.f64 (PI.f64)) l)
(exp.f64 (*.f64 (log.f64 (exp.f64 l)) (PI.f64)))
(exp.f64 (*.f64 l (PI.f64)))
(+.f64 (cosh.f64 (*.f64 l (PI.f64))) (sinh.f64 (*.f64 l (PI.f64))))
(pow.f64 (exp.f64 (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64))) (cbrt.f64 (PI.f64)))
(exp.f64 (PI.f64))
(+.f64 (cosh.f64 (PI.f64)) (sinh.f64 (PI.f64)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (cos.f64 (*.f64 l (PI.f64))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) (tan.f64 (*.f64 l (PI.f64)))) (*.f64 F F)))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (neg.f64 (*.f64 l (/.f64 (PI.f64) (*.f64 F F)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 (*.f64 l (PI.f64)) (+.f64 #s(literal -1 binary64) (*.f64 F F))) (*.f64 F F)))
#s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F)))
#s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (-.f64 (*.f64 (*.f64 F F) (PI.f64)) (PI.f64)) (*.f64 F F)))
#s(approx (/ (PI) (* F F)) (/.f64 (PI.f64) (*.f64 F F)))
#s(approx (* F F) (*.f64 F F))
#s(approx F F)
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (cos.f64 (*.f64 l (PI.f64))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) (tan.f64 (*.f64 l (PI.f64)))) (*.f64 F F)))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (cos.f64 (*.f64 l (PI.f64)))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (cos.f64 (*.f64 l (PI.f64))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) (tan.f64 (*.f64 l (PI.f64)))) (*.f64 F F)))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (cos.f64 (*.f64 l (PI.f64)))))
#s(approx (/ 1 (neg F)) (/.f64 #s(literal -1 binary64) F))
#s(approx (neg F) (neg.f64 F))
#s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (/.f64 #s(literal -1 binary64) F) (tan.f64 (*.f64 l (PI.f64)))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (cos.f64 (*.f64 l (PI.f64))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) (tan.f64 (*.f64 l (PI.f64)))) (*.f64 F F)))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (cos.f64 (*.f64 l (PI.f64)))))
#s(approx (/ 1 (* F F)) (pow.f64 F #s(literal -2 binary64)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 l (PI.f64)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (+.f64 (neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (cos.f64 (*.f64 l (PI.f64))))) (*.f64 l (PI.f64))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 l (PI.f64)))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (+.f64 (neg.f64 (*.f64 l (/.f64 (PI.f64) (*.f64 F F)))) (*.f64 l (PI.f64))))
#s(approx (- (PI) (/ (PI) (* F F))) (PI.f64))
#s(approx (- (PI) (/ (PI) (* F F))) (+.f64 (/.f64 (neg.f64 (PI.f64)) (*.f64 F F)) (PI.f64)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 l (PI.f64)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (+.f64 (neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (cos.f64 (*.f64 l (PI.f64))))) (*.f64 l (PI.f64))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 l (PI.f64)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (+.f64 (neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (cos.f64 (*.f64 l (PI.f64))))) (*.f64 l (PI.f64))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 l (PI.f64)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (+.f64 (neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (cos.f64 (*.f64 l (PI.f64))))) (*.f64 l (PI.f64))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/3 binary64)) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64))) #s(literal -1/2 binary64)) (/.f64 (-.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/24 binary64)) (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F))) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 (-.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 (PI.f64) (PI.f64))) (*.f64 F F)) #s(literal -1/2 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F) #s(literal -1/720 binary64))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64))) #s(literal 1/24 binary64))) (*.f64 #s(literal -1/5040 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F))) (*.f64 l l))) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (log (pow (exp (PI)) l)) (*.f64 l (PI.f64)))
#s(approx l l)
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/3 binary64)) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64))) #s(literal -1/2 binary64)) (/.f64 (-.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/24 binary64)) (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F))) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 (-.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 (PI.f64) (PI.f64))) (*.f64 F F)) #s(literal -1/2 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F) #s(literal -1/720 binary64))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64))) #s(literal 1/24 binary64))) (*.f64 #s(literal -1/5040 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F))) (*.f64 l l))) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (*.f64 l (/.f64 (PI.f64) (*.f64 F F))))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (*.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64)))) (*.f64 F F)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F) #s(literal 1/24 binary64))) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 l l)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) (*.f64 F F)) (-.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F) #s(literal -1/720 binary64)) (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)))))) (*.f64 l l)) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F)))) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 l l)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (tan (log (pow (exp (PI)) l))) (*.f64 l (PI.f64)))
#s(approx (tan (log (pow (exp (PI)) l))) (*.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64)) (*.f64 l l)) (PI.f64)) l))
#s(approx (tan (log (pow (exp (PI)) l))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/2 binary64))) (*.f64 l l)) (PI.f64)) l))
#s(approx (tan (log (pow (exp (PI)) l))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) (+.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal -1/720 binary64)))) (*.f64 l l)) (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/2 binary64))) (*.f64 l l)) (PI.f64)) l))
#s(approx (tan (log (pow (exp (PI)) l))) (*.f64 l (PI.f64)))
#s(approx (tan (log (pow (exp (PI)) l))) (*.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64)) (*.f64 l l)) (PI.f64)) l))
#s(approx (tan (log (pow (exp (PI)) l))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/2 binary64))) (*.f64 l l)) (PI.f64)) l))
#s(approx (tan (log (pow (exp (PI)) l))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) (+.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal -1/720 binary64)))) (*.f64 l l)) (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/2 binary64))) (*.f64 l l)) (PI.f64)) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/3 binary64)) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64))) #s(literal -1/2 binary64)) (/.f64 (-.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/24 binary64)) (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F))) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 (-.f64 (+.f64 (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 (PI.f64) (PI.f64))) (*.f64 F F)) #s(literal -1/2 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F) #s(literal -1/720 binary64))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64))) #s(literal 1/24 binary64))) (*.f64 #s(literal -1/5040 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F))) (*.f64 l l))) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (*.f64 l (/.f64 (PI.f64) (*.f64 F F))))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (*.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64)))) (*.f64 F F)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F) #s(literal 1/24 binary64))) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 l l)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) (*.f64 F F)) (-.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F) #s(literal -1/720 binary64)) (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)))))) (*.f64 l l)) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F)))) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 l l)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (/ (tan (* (PI) l)) (neg F)) (/.f64 (neg.f64 (*.f64 l (PI.f64))) F))
#s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))) l))
#s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (neg.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64)))) F) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) F) #s(literal 1/24 binary64))) (*.f64 l l)))) (*.f64 l l)) (/.f64 (neg.f64 (PI.f64)) F)) l))
#s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) F) (-.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) F) #s(literal -1/720 binary64)) (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))))) (*.f64 l l)) (-.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64)))) F) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) F) #s(literal 1/24 binary64))))) (*.f64 l l)) (neg.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))) (*.f64 l l)) (/.f64 (neg.f64 (PI.f64)) F)) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (+.f64 (PI.f64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 (PI.f64) (PI.f64))) l)) (PI.f64)) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/3 binary64)) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 F F)) #s(literal 1/6 binary64))) l) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 0 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 F F)))) l) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 (-.f64 (+.f64 (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 0 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 13 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -4 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -6 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 1/24 binary64))) (*.f64 F F)) l) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 F F)) #s(literal 1/6 binary64)) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F)))) l) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 F F))) l) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (*.f64 l (/.f64 (PI.f64) (*.f64 F F))))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 (PI.f64) (PI.f64))) l)) (*.f64 F F)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F)) (/.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) #s(literal 1/6 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/2 binary64))) (*.f64 F F))) l) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 F F))) l) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* (/ 1 (* F F)) (tan (log (pow (exp (PI)) l)))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 F F)) #s(literal 1/6 binary64)) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 (/.f64 (-.f64 (*.f64 (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 13 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -4 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -6 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 1/24 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 0 binary64) (*.f64 (PI.f64) (PI.f64))))) (*.f64 F F)) l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) l) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 F F))) l) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (tan (log (pow (exp (PI)) l))) (*.f64 l (PI.f64)))
#s(approx (tan (log (pow (exp (PI)) l))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 (PI.f64) (PI.f64))) l)) (PI.f64)) l))
#s(approx (tan (log (pow (exp (PI)) l))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) #s(literal 1/6 binary64)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/2 binary64))) l) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (PI.f64) (PI.f64))))) l) (PI.f64)) l))
#s(approx (tan (log (pow (exp (PI)) l))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) #s(literal 1/6 binary64)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 (-.f64 (*.f64 (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 13 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -4 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -6 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal 1/24 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 #s(literal 0 binary64) (*.f64 (PI.f64) (PI.f64))))) l)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/2 binary64))) l) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (PI.f64) (PI.f64))))) l) (PI.f64)) l))
#s(approx (log (pow (exp (PI)) l)) (*.f64 l (PI.f64)))
#s(approx (log (pow (exp (PI)) l)) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 (PI.f64) (PI.f64))) l)) (PI.f64)) l))
#s(approx (log (pow (exp (PI)) l)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) l) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (PI.f64) (PI.f64))))) l) (PI.f64)) l))
#s(approx (log (pow (exp (PI)) l)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) l) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 13 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -4 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 #s(literal -6 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) #s(literal 1/6 binary64))) l) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (PI.f64) (PI.f64))))) l) (PI.f64)) l))
#s(approx (pow (exp (PI)) l) #s(literal 1 binary64))
#s(approx (pow (exp (PI)) l) (+.f64 (*.f64 l (PI.f64)) #s(literal 1 binary64)))
#s(approx (pow (exp (PI)) l) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) l) #s(literal 1/2 binary64)) (PI.f64)) l) #s(literal 1 binary64)))
#s(approx (pow (exp (PI)) l) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) l) #s(literal 1/6 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64)))) l) (PI.f64)) l) #s(literal 1 binary64)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (+.f64 (neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) l))) (PI.f64)) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (+.f64 (neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) l))) (PI.f64)) l))
#s(approx (tan (log (pow (exp (PI)) l))) (tan.f64 (*.f64 l (PI.f64))))
#s(approx (tan (log (pow (exp (PI)) l))) (tan.f64 (*.f64 l (PI.f64))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (+.f64 (neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) l))) (PI.f64)) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (+.f64 (neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) l))) (PI.f64)) l))
#s(approx (tan (log (pow (exp (PI)) l))) (tan.f64 (*.f64 l (PI.f64))))
#s(approx (pow (exp (PI)) l) (pow.f64 (exp.f64 (PI.f64)) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (PI.f64)) (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) l))) l)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (PI.f64)) (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) l))) l)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (PI.f64)) (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) l))) l)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (neg.f64 (*.f64 (+.f64 (neg.f64 (PI.f64)) (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (*.f64 (cos.f64 (*.f64 l (PI.f64))) l))) l)))

eval144.0ms (3%)

Memory
-4.2MiB live, 229.6MiB allocated; 31ms collecting garbage
Samples
60.0ms1 164×0valid
6.0ms116×0invalid
Compiler

Compiled 7 594 to 1 242 computations (83.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 33.0ms
ival-mult: 22.0ms (66.6% of total)
ival-div: 9.0ms (27.2% of total)
ival-true: 1.0ms (3% of total)
ival-assert: 1.0ms (3% of total)
adjust: 0.0ms (0% of total)

prune62.0ms (1.3%)

Memory
21.0MiB live, 66.8MiB allocated; 4ms collecting garbage
Pruning

17 alts after pruning (14 fresh and 3 done)

PrunedKeptTotal
New30011311
Fresh538
Picked235
Done000
Total30717324
Accuracy
99.5%
Counts
324 → 17
Alt Table
Click to see full alt table
StatusAccuracyProgram
24.5%
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) l) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64)))))))
23.4%
(/.f64 (-.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 2 binary64)) (ratio-of-squares.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F))) (+.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64)))))
▶76.7%
(-.f64 (*.f64 (PI.f64) l) (/.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) F) F))
76.6%
(-.f64 (*.f64 (PI.f64) l) (/.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) (tan.f64 (*.f64 l (PI.f64)))) (neg.f64 F)))
64.1%
(-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (tan (log (pow (exp (PI)) l))) (*.f64 l (PI.f64))) (*.f64 F F)))
✓24.3%
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (log.f64 (pow.f64 (exp.f64 (PI.f64)) l)))))
68.3%
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) #s(approx (/ (tan (* (PI) l)) (neg F)) (/.f64 (neg.f64 (*.f64 l (PI.f64))) F))))
▶54.8%
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))) l))))
45.2%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
▶20.5%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
63.6%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (/.f64 (PI.f64) F) F)) l))
✓63.6%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
✓77.0%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
42.5%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (-.f64 (*.f64 (*.f64 F F) (PI.f64)) (PI.f64)) (*.f64 F F))) l))
▶18.8%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l))
▶36.9%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 (*.f64 l (PI.f64)) (+.f64 #s(literal -1 binary64) (*.f64 F F))) (*.f64 F F))))
21.0%
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (cos.f64 (*.f64 l (PI.f64))))))
Samples
28.0ms232×0invalid
11.0ms280×0valid
Compiler

Compiled 844 to 538 computations (36.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 9.0ms
ival-mult: 6.0ms (65% of total)
ival-div: 2.0ms (21.7% of total)
ival-true: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series54.0ms (1.1%)

Memory
-15.0MiB live, 78.6MiB allocated; 15ms collecting garbage
Counts
42 → 121
Calls
Call 1
Inputs
(-.f64 (*.f64 (PI.f64) l) (/.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) F) F))
(*.f64 (PI.f64) l)
(PI.f64)
l
(/.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) F) F)
(/.f64 (tan.f64 (*.f64 l (PI.f64))) F)
(tan.f64 (*.f64 l (PI.f64)))
(*.f64 l (PI.f64))
F
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l))
(*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l)
#s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F)))
(/.f64 (neg.f64 (PI.f64)) (*.f64 F F))
(neg.f64 (PI.f64))
(*.f64 F F)
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 (*.f64 l (PI.f64)) (+.f64 #s(literal -1 binary64) (*.f64 F F))) (*.f64 F F))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 (*.f64 l (PI.f64)) (+.f64 #s(literal -1 binary64) (*.f64 F F))) (*.f64 F F)))
(/.f64 (*.f64 (*.f64 l (PI.f64)) (+.f64 #s(literal -1 binary64) (*.f64 F F))) (*.f64 F F))
(*.f64 (*.f64 l (PI.f64)) (+.f64 #s(literal -1 binary64) (*.f64 F F)))
(+.f64 #s(literal -1 binary64) (*.f64 F F))
#s(literal -1 binary64)
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l)))
(/.f64 #s(literal -1 binary64) (*.f64 F F))
(tan.f64 (*.f64 (PI.f64) l))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))) l))))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))) l)))
(/.f64 #s(literal 1 binary64) (neg.f64 F))
#s(literal 1 binary64)
(neg.f64 F)
#s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))) l))
(*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))) l)
(*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F)))
(+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))
(*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l))
(*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))
(/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)
(pow.f64 (PI.f64) #s(literal 3 binary64))
#s(literal 3 binary64)
#s(literal 1/3 binary64)
(*.f64 l l)
(/.f64 (PI.f64) F)
Outputs
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (/ (sin (* l (PI))) (* F (cos (* l (PI)))))))
#s(approx F #s(hole binary64 F))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (/ (+ (* -1 (* l (PI))) (* (pow F 2) (* l (PI)))) (pow F 2))))
#s(approx (- (PI) (/ (PI) (* F F))) #s(hole binary64 (* -1 (/ (PI) (pow F 2)))))
#s(approx (- (PI) (/ (PI) (* F F))) #s(hole binary64 (/ (- (* (pow F 2) (PI)) (PI)) (pow F 2))))
#s(approx (/ (neg (PI)) (* F F)) #s(hole binary64 (* -1 (/ (PI) (pow F 2)))))
#s(approx (* F F) #s(hole binary64 (pow F 2)))
#s(approx (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) #s(hole binary64 (/ (+ (* -1 (* l (PI))) (* (pow F 2) (* l (PI)))) (pow F 2))))
#s(approx (* (* l (PI)) (+ -1 (* F F))) #s(hole binary64 (* -1 (* l (PI)))))
#s(approx (* (* l (PI)) (+ -1 (* F F))) #s(hole binary64 (+ (* -1 (* l (PI))) (* (pow F 2) (* l (PI))))))
#s(approx (+ -1 (* F F)) #s(hole binary64 -1))
#s(approx (+ -1 (* F F)) #s(hole binary64 (- (pow F 2) 1)))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (/ -1 (* F F)) #s(hole binary64 (/ -1 (pow F 2))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))))
#s(approx (/ 1 (neg F)) #s(hole binary64 (/ -1 F)))
#s(approx (neg F) #s(hole binary64 (* -1 F)))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* F (cos (* l (PI))))))))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) #s(hole binary64 (* -1 (/ (* l (+ (PI) (* 1/3 (* (pow l 2) (pow (PI) 3))))) F))))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) #s(hole binary64 (* -1 (/ (+ (PI) (* 1/3 (* (pow l 2) (pow (PI) 3)))) F))))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) #s(hole binary64 (/ (+ (PI) (* 1/3 (* (pow l 2) (pow (PI) 3)))) F)))
#s(approx (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) #s(hole binary64 (* 1/3 (/ (* (pow l 2) (pow (PI) 3)) F))))
#s(approx (* (/ (pow (PI) 3) F) 1/3) #s(hole binary64 (* 1/3 (/ (pow (PI) 3) F))))
#s(approx (/ (pow (PI) 3) F) #s(hole binary64 (/ (pow (PI) 3) F)))
#s(approx (/ (PI) F) #s(hole binary64 (/ (PI) F)))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* l (PI))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (+ (* -1 (/ (* l (PI)) (pow F 2))) (* l (PI)))))
#s(approx (- (PI) (/ (PI) (* F F))) #s(hole binary64 (PI)))
#s(approx (- (PI) (/ (PI) (* F F))) #s(hole binary64 (+ (PI) (* -1 (/ (PI) (pow F 2))))))
#s(approx (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) #s(hole binary64 (* l (PI))))
#s(approx (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) #s(hole binary64 (+ (* -1 (/ (* l (PI)) (pow F 2))) (* l (PI)))))
#s(approx (* (* l (PI)) (+ -1 (* F F))) #s(hole binary64 (* (pow F 2) (* l (PI)))))
#s(approx (* (* l (PI)) (+ -1 (* F F))) #s(hole binary64 (* (pow F 2) (+ (* -1 (/ (* l (PI)) (pow F 2))) (* l (PI))))))
#s(approx (+ -1 (* F F)) #s(hole binary64 (pow F 2)))
#s(approx (+ -1 (* F F)) #s(hole binary64 (* (pow F 2) (- 1 (/ 1 (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) #s(hole binary64 (/ (* l (+ (* -1 (PI)) (* -1/3 (* (pow l 2) (pow (PI) 3))))) F)))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) #s(hole binary64 (/ (+ (* -1 (PI)) (* -1/3 (* (pow l 2) (pow (PI) 3)))) F)))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) #s(hole binary64 (* -1 (/ (+ (* -1 (PI)) (* -1/3 (* (pow l 2) (pow (PI) 3)))) F))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (PI) l) #s(hole binary64 (* l (PI))))
#s(approx l #s(hole binary64 l))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (/ (* l (PI)) (pow F 2))))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* 1/120 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2)))))))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (/ (* l (PI)) F)))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) F)) (* -1/2 (/ (pow (PI) 3) F)))) (/ (PI) F)))))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) F)) (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F)) (* 1/24 (/ (pow (PI) 5) F)))))) (* -1/2 (/ (pow (PI) 3) F)))) (/ (PI) F)))))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) F)) (* (pow l 2) (- (+ (* 1/120 (/ (pow (PI) 5) F)) (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) F)) (+ (* -1/720 (/ (pow (PI) 7) F)) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F))))))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F)) (* 1/24 (/ (pow (PI) 5) F)))))) (* -1/2 (/ (pow (PI) 3) F)))) (/ (PI) F)))))
#s(approx (tan (* l (PI))) #s(hole binary64 (* l (PI))))
#s(approx (tan (* l (PI))) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* l (PI))) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* l (PI))) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (+ (* 1/120 (pow (PI) 5)) (* (pow l 2) (- (* -1/5040 (pow (PI) 7)) (+ (* -1/2 (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (+ (* -1/720 (pow (PI) 7)) (* 1/24 (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))))))))) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (* l (PI)) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) #s(hole binary64 (/ (* l (* (PI) (- (pow F 2) 1))) (pow F 2))))
#s(approx (* (* l (PI)) (+ -1 (* F F))) #s(hole binary64 (* l (* (PI) (- (pow F 2) 1)))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* -1 (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))) (* -1 (/ (PI) (pow F 2)))))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* -1 (/ (PI) (pow F 2))) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1 (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))))))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* -1 (/ (PI) (pow F 2))) (* (pow l 2) (+ (* -1 (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2)))))))) (* -1 (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (PI))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (+ (* 1/120 (pow (PI) 5)) (* (pow l 2) (- (* -1/5040 (pow (PI) 7)) (+ (* -1/2 (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (+ (* -1/720 (pow (PI) 7)) (* 1/24 (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))))))))) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (/ (* l (PI)) (pow F 2))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (* l (+ (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* 1/120 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2)))))))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* -1 (/ (* l (PI)) F))))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* l (+ (* -1 (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) F)) (* -1/2 (/ (pow (PI) 3) F))))) (* -1 (/ (PI) F))))))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* l (+ (* -1 (/ (PI) F)) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F)) (* 1/24 (/ (pow (PI) 5) F)))))) (* -1 (- (* -1/6 (/ (pow (PI) 3) F)) (* -1/2 (/ (pow (PI) 3) F))))))))))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* l (+ (* -1 (/ (PI) F)) (* (pow l 2) (+ (* -1 (- (* -1/6 (/ (pow (PI) 3) F)) (* -1/2 (/ (pow (PI) 3) F)))) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) F)) (+ (* -1/720 (/ (pow (PI) 7) F)) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F))))))) (* -1 (- (* 1/120 (/ (pow (PI) 5) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F)) (* 1/24 (/ (pow (PI) 5) F)))))))))))))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) #s(hole binary64 (* -1 (/ (* l (PI)) F))))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) #s(hole binary64 (* l (+ (* -1 (/ (PI) F)) (* -1/3 (/ (* (pow l 2) (pow (PI) 3)) F))))))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) #s(hole binary64 (* -1 (/ (PI) F))))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) #s(hole binary64 (+ (* -1 (/ (PI) F)) (* -1/3 (/ (* (pow l 2) (pow (PI) 3)) F)))))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) #s(hole binary64 (/ (PI) F)))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) #s(hole binary64 (+ (* 1/3 (/ (* (pow l 2) (pow (PI) 3)) F)) (/ (PI) F))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (tan (* l (PI))) #s(hole binary64 (/ (sin (* l (PI))) (cos (* l (PI))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (/ (sin (* l (PI))) (cos (* l (PI))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) #s(hole binary64 (* -1/3 (/ (* (pow l 3) (pow (PI) 3)) F))))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) #s(hole binary64 (* (pow l 3) (+ (* -1 (/ (PI) (* F (pow l 2)))) (* -1/3 (/ (pow (PI) 3) F))))))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) #s(hole binary64 (* -1/3 (/ (* (pow l 2) (pow (PI) 3)) F))))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) #s(hole binary64 (* (pow l 2) (+ (* -1 (/ (PI) (* F (pow l 2)))) (* -1/3 (/ (pow (PI) 3) F))))))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) #s(hole binary64 (* 1/3 (/ (* (pow l 2) (pow (PI) 3)) F))))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) #s(hole binary64 (* (pow l 2) (+ (* 1/3 (/ (pow (PI) 3) F)) (/ (PI) (* F (pow l 2)))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) #s(hole binary64 (* -1 (* (pow l 3) (+ (* 1/3 (/ (pow (PI) 3) F)) (/ (PI) (* F (pow l 2))))))))
Calls

6 calls:

TimeVariablePointExpression
15.0ms
F
@inf
((- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (* (PI) l) (PI) l (/ (/ (tan (* l (PI))) F) F) (/ (tan (* l (PI))) F) (tan (* l (PI))) (* l (PI)) F (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (- (PI) (/ (PI) (* F F))) (/ (neg (PI)) (* F F)) (neg (PI)) (* F F) (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) (* (* l (PI)) (+ -1 (* F F))) (+ -1 (* F F)) -1 (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (/ -1 (* F F)) (tan (* (PI) l))) (/ -1 (* F F)) (tan (* (PI) l)) (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) (/ 1 (neg F)) 1 (neg F) (/ (tan (* (PI) l)) (neg F)) (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (* (/ (pow (PI) 3) F) 1/3) (/ (pow (PI) 3) F) (pow (PI) 3) 3 1/3 (* l l) (/ (PI) F))
10.0ms
l
@inf
((- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (* (PI) l) (PI) l (/ (/ (tan (* l (PI))) F) F) (/ (tan (* l (PI))) F) (tan (* l (PI))) (* l (PI)) F (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (- (PI) (/ (PI) (* F F))) (/ (neg (PI)) (* F F)) (neg (PI)) (* F F) (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) (* (* l (PI)) (+ -1 (* F F))) (+ -1 (* F F)) -1 (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (/ -1 (* F F)) (tan (* (PI) l))) (/ -1 (* F F)) (tan (* (PI) l)) (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) (/ 1 (neg F)) 1 (neg F) (/ (tan (* (PI) l)) (neg F)) (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (* (/ (pow (PI) 3) F) 1/3) (/ (pow (PI) 3) F) (pow (PI) 3) 3 1/3 (* l l) (/ (PI) F))
7.0ms
F
@0
((- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (* (PI) l) (PI) l (/ (/ (tan (* l (PI))) F) F) (/ (tan (* l (PI))) F) (tan (* l (PI))) (* l (PI)) F (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (- (PI) (/ (PI) (* F F))) (/ (neg (PI)) (* F F)) (neg (PI)) (* F F) (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) (* (* l (PI)) (+ -1 (* F F))) (+ -1 (* F F)) -1 (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (/ -1 (* F F)) (tan (* (PI) l))) (/ -1 (* F F)) (tan (* (PI) l)) (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) (/ 1 (neg F)) 1 (neg F) (/ (tan (* (PI) l)) (neg F)) (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (* (/ (pow (PI) 3) F) 1/3) (/ (pow (PI) 3) F) (pow (PI) 3) 3 1/3 (* l l) (/ (PI) F))
6.0ms
F
@-inf
((- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (* (PI) l) (PI) l (/ (/ (tan (* l (PI))) F) F) (/ (tan (* l (PI))) F) (tan (* l (PI))) (* l (PI)) F (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (- (PI) (/ (PI) (* F F))) (/ (neg (PI)) (* F F)) (neg (PI)) (* F F) (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) (* (* l (PI)) (+ -1 (* F F))) (+ -1 (* F F)) -1 (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (/ -1 (* F F)) (tan (* (PI) l))) (/ -1 (* F F)) (tan (* (PI) l)) (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) (/ 1 (neg F)) 1 (neg F) (/ (tan (* (PI) l)) (neg F)) (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (* (/ (pow (PI) 3) F) 1/3) (/ (pow (PI) 3) F) (pow (PI) 3) 3 1/3 (* l l) (/ (PI) F))
6.0ms
l
@0
((- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (* (PI) l) (PI) l (/ (/ (tan (* l (PI))) F) F) (/ (tan (* l (PI))) F) (tan (* l (PI))) (* l (PI)) F (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (- (PI) (/ (PI) (* F F))) (/ (neg (PI)) (* F F)) (neg (PI)) (* F F) (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) (* (* l (PI)) (+ -1 (* F F))) (+ -1 (* F F)) -1 (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (/ -1 (* F F)) (tan (* (PI) l))) (/ -1 (* F F)) (tan (* (PI) l)) (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) (/ 1 (neg F)) 1 (neg F) (/ (tan (* (PI) l)) (neg F)) (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (* (/ (pow (PI) 3) F) 1/3) (/ (pow (PI) 3) F) (pow (PI) 3) 3 1/3 (* l l) (/ (PI) F))

rewrite185.0ms (3.9%)

Memory
-5.6MiB live, 246.3MiB allocated; 66ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04755343
05344755
125414597
080964513
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
163 → 392
Calls
Call 1
Inputs
(-.f64 (*.f64 (PI.f64) l) (/.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) F) F))
(*.f64 (PI.f64) l)
(PI.f64)
l
(/.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) F) F)
(/.f64 (tan.f64 (*.f64 l (PI.f64))) F)
(tan.f64 (*.f64 l (PI.f64)))
(*.f64 l (PI.f64))
F
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l))
(*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l)
#s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F)))
(/.f64 (neg.f64 (PI.f64)) (*.f64 F F))
(neg.f64 (PI.f64))
(*.f64 F F)
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 (*.f64 l (PI.f64)) (+.f64 #s(literal -1 binary64) (*.f64 F F))) (*.f64 F F))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 (*.f64 l (PI.f64)) (+.f64 #s(literal -1 binary64) (*.f64 F F))) (*.f64 F F)))
(/.f64 (*.f64 (*.f64 l (PI.f64)) (+.f64 #s(literal -1 binary64) (*.f64 F F))) (*.f64 F F))
(*.f64 (*.f64 l (PI.f64)) (+.f64 #s(literal -1 binary64) (*.f64 F F)))
(+.f64 #s(literal -1 binary64) (*.f64 F F))
#s(literal -1 binary64)
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l)))
(/.f64 #s(literal -1 binary64) (*.f64 F F))
(tan.f64 (*.f64 (PI.f64) l))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))) l))))
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))) l)))
(/.f64 #s(literal 1 binary64) (neg.f64 F))
#s(literal 1 binary64)
(neg.f64 F)
#s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))) l))
(*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))) l)
(*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F)))
(+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))
(*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l))
(*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))
(/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)
(pow.f64 (PI.f64) #s(literal 3 binary64))
#s(literal 3 binary64)
#s(literal 1/3 binary64)
(*.f64 l l)
(/.f64 (PI.f64) F)
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (/ (sin (* l (PI))) (* F (cos (* l (PI)))))))
#s(approx F #s(hole binary64 F))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (/ (+ (* -1 (* l (PI))) (* (pow F 2) (* l (PI)))) (pow F 2))))
#s(approx (- (PI) (/ (PI) (* F F))) #s(hole binary64 (* -1 (/ (PI) (pow F 2)))))
#s(approx (- (PI) (/ (PI) (* F F))) #s(hole binary64 (/ (- (* (pow F 2) (PI)) (PI)) (pow F 2))))
#s(approx (/ (neg (PI)) (* F F)) #s(hole binary64 (* -1 (/ (PI) (pow F 2)))))
#s(approx (* F F) #s(hole binary64 (pow F 2)))
#s(approx (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) #s(hole binary64 (/ (+ (* -1 (* l (PI))) (* (pow F 2) (* l (PI)))) (pow F 2))))
#s(approx (* (* l (PI)) (+ -1 (* F F))) #s(hole binary64 (* -1 (* l (PI)))))
#s(approx (* (* l (PI)) (+ -1 (* F F))) #s(hole binary64 (+ (* -1 (* l (PI))) (* (pow F 2) (* l (PI))))))
#s(approx (+ -1 (* F F)) #s(hole binary64 -1))
#s(approx (+ -1 (* F F)) #s(hole binary64 (- (pow F 2) 1)))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (/ -1 (* F F)) #s(hole binary64 (/ -1 (pow F 2))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))))
#s(approx (/ 1 (neg F)) #s(hole binary64 (/ -1 F)))
#s(approx (neg F) #s(hole binary64 (* -1 F)))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* F (cos (* l (PI))))))))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) #s(hole binary64 (* -1 (/ (* l (+ (PI) (* 1/3 (* (pow l 2) (pow (PI) 3))))) F))))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) #s(hole binary64 (* -1 (/ (+ (PI) (* 1/3 (* (pow l 2) (pow (PI) 3)))) F))))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) #s(hole binary64 (/ (+ (PI) (* 1/3 (* (pow l 2) (pow (PI) 3)))) F)))
#s(approx (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) #s(hole binary64 (* 1/3 (/ (* (pow l 2) (pow (PI) 3)) F))))
#s(approx (* (/ (pow (PI) 3) F) 1/3) #s(hole binary64 (* 1/3 (/ (pow (PI) 3) F))))
#s(approx (/ (pow (PI) 3) F) #s(hole binary64 (/ (pow (PI) 3) F)))
#s(approx (/ (PI) F) #s(hole binary64 (/ (PI) F)))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* l (PI))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (+ (* -1 (/ (* l (PI)) (pow F 2))) (* l (PI)))))
#s(approx (- (PI) (/ (PI) (* F F))) #s(hole binary64 (PI)))
#s(approx (- (PI) (/ (PI) (* F F))) #s(hole binary64 (+ (PI) (* -1 (/ (PI) (pow F 2))))))
#s(approx (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) #s(hole binary64 (* l (PI))))
#s(approx (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) #s(hole binary64 (+ (* -1 (/ (* l (PI)) (pow F 2))) (* l (PI)))))
#s(approx (* (* l (PI)) (+ -1 (* F F))) #s(hole binary64 (* (pow F 2) (* l (PI)))))
#s(approx (* (* l (PI)) (+ -1 (* F F))) #s(hole binary64 (* (pow F 2) (+ (* -1 (/ (* l (PI)) (pow F 2))) (* l (PI))))))
#s(approx (+ -1 (* F F)) #s(hole binary64 (pow F 2)))
#s(approx (+ -1 (* F F)) #s(hole binary64 (* (pow F 2) (- 1 (/ 1 (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) #s(hole binary64 (/ (* l (+ (* -1 (PI)) (* -1/3 (* (pow l 2) (pow (PI) 3))))) F)))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) #s(hole binary64 (/ (+ (* -1 (PI)) (* -1/3 (* (pow l 2) (pow (PI) 3)))) F)))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) #s(hole binary64 (* -1 (/ (+ (* -1 (PI)) (* -1/3 (* (pow l 2) (pow (PI) 3)))) F))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (PI) l) #s(hole binary64 (* l (PI))))
#s(approx l #s(hole binary64 l))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (/ (* l (PI)) (pow F 2))))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* 1/120 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2)))))))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (/ (* l (PI)) F)))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) F)) (* -1/2 (/ (pow (PI) 3) F)))) (/ (PI) F)))))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) F)) (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F)) (* 1/24 (/ (pow (PI) 5) F)))))) (* -1/2 (/ (pow (PI) 3) F)))) (/ (PI) F)))))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) F)) (* (pow l 2) (- (+ (* 1/120 (/ (pow (PI) 5) F)) (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) F)) (+ (* -1/720 (/ (pow (PI) 7) F)) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F))))))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F)) (* 1/24 (/ (pow (PI) 5) F)))))) (* -1/2 (/ (pow (PI) 3) F)))) (/ (PI) F)))))
#s(approx (tan (* l (PI))) #s(hole binary64 (* l (PI))))
#s(approx (tan (* l (PI))) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* l (PI))) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* l (PI))) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (+ (* 1/120 (pow (PI) 5)) (* (pow l 2) (- (* -1/5040 (pow (PI) 7)) (+ (* -1/2 (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (+ (* -1/720 (pow (PI) 7)) (* 1/24 (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))))))))) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (* l (PI)) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) #s(hole binary64 (/ (* l (* (PI) (- (pow F 2) 1))) (pow F 2))))
#s(approx (* (* l (PI)) (+ -1 (* F F))) #s(hole binary64 (* l (* (PI) (- (pow F 2) 1)))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* -1 (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))) (* -1 (/ (PI) (pow F 2)))))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* -1 (/ (PI) (pow F 2))) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1 (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))))))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* -1 (/ (PI) (pow F 2))) (* (pow l 2) (+ (* -1 (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2)))))))) (* -1 (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (PI))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (- (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (- (+ (* 1/120 (pow (PI) 5)) (* (pow l 2) (- (* -1/5040 (pow (PI) 7)) (+ (* -1/2 (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (+ (* -1/720 (pow (PI) 7)) (* 1/24 (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))))))))) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5)))))) (* -1/2 (pow (PI) 3))))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (/ (* l (PI)) (pow F 2))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (* l (+ (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* 1/120 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2)))))))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* -1 (/ (* l (PI)) F))))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* l (+ (* -1 (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) F)) (* -1/2 (/ (pow (PI) 3) F))))) (* -1 (/ (PI) F))))))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* l (+ (* -1 (/ (PI) F)) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F)) (* 1/24 (/ (pow (PI) 5) F)))))) (* -1 (- (* -1/6 (/ (pow (PI) 3) F)) (* -1/2 (/ (pow (PI) 3) F))))))))))
#s(approx (/ (tan (* (PI) l)) (neg F)) #s(hole binary64 (* l (+ (* -1 (/ (PI) F)) (* (pow l 2) (+ (* -1 (- (* -1/6 (/ (pow (PI) 3) F)) (* -1/2 (/ (pow (PI) 3) F)))) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) F)) (+ (* -1/720 (/ (pow (PI) 7) F)) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F))))))) (* -1 (- (* 1/120 (/ (pow (PI) 5) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F)) (* 1/24 (/ (pow (PI) 5) F)))))))))))))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) #s(hole binary64 (* -1 (/ (* l (PI)) F))))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) #s(hole binary64 (* l (+ (* -1 (/ (PI) F)) (* -1/3 (/ (* (pow l 2) (pow (PI) 3)) F))))))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) #s(hole binary64 (* -1 (/ (PI) F))))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) #s(hole binary64 (+ (* -1 (/ (PI) F)) (* -1/3 (/ (* (pow l 2) (pow (PI) 3)) F)))))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) #s(hole binary64 (/ (PI) F)))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) #s(hole binary64 (+ (* 1/3 (/ (* (pow l 2) (pow (PI) 3)) F)) (/ (PI) F))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (tan (* l (PI))) #s(hole binary64 (/ (sin (* l (PI))) (cos (* l (PI))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (tan (* (PI) l)) #s(hole binary64 (/ (sin (* l (PI))) (cos (* l (PI))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) #s(hole binary64 (* -1/3 (/ (* (pow l 3) (pow (PI) 3)) F))))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) #s(hole binary64 (* (pow l 3) (+ (* -1 (/ (PI) (* F (pow l 2)))) (* -1/3 (/ (pow (PI) 3) F))))))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) #s(hole binary64 (* -1/3 (/ (* (pow l 2) (pow (PI) 3)) F))))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) #s(hole binary64 (* (pow l 2) (+ (* -1 (/ (PI) (* F (pow l 2)))) (* -1/3 (/ (pow (PI) 3) F))))))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) #s(hole binary64 (* 1/3 (/ (* (pow l 2) (pow (PI) 3)) F))))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) #s(hole binary64 (* (pow l 2) (+ (* 1/3 (/ (pow (PI) 3) F)) (/ (PI) (* F (pow l 2)))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) #s(hole binary64 (* -1 (* (pow l 3) (+ (* 1/3 (/ (pow (PI) 3) F)) (/ (PI) (* F (pow l 2))))))))
Outputs
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (ratio-of-squares.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))) (neg.f64 (+.f64 (*.f64 (PI.f64) l) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (*.f64 (PI.f64) l) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (ratio-of-squares.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F))) (+.f64 (*.f64 (PI.f64) l) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (*.f64 (PI.f64) l) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))))
(-.f64 (ratio-square-sum.f64 (*.f64 (PI.f64) l) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F))) (/.f64 (ratio-of-squares.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (+.f64 (*.f64 (PI.f64) l) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (*.f64 (PI.f64) l) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))))) (/.f64 (pow.f64 (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (*.f64 (PI.f64) l) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))))))
(-.f64 (*.f64 (PI.f64) l) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
(*.f64 (PI.f64) l)
(*.f64 l (PI.f64))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) l))
(PI.f64)
l
(/.f64 (neg.f64 (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (neg.f64 F))) (neg.f64 (neg.f64 F)))
(/.f64 (tan.f64 (neg.f64 (*.f64 (PI.f64) l))) (neg.f64 (*.f64 F F)))
(/.f64 (/.f64 (tan.f64 (*.f64 (PI.f64) l)) F) F)
(/.f64 (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (neg.f64 F)) (neg.f64 F))
(/.f64 (tan.f64 (*.f64 (PI.f64) l)) (*.f64 F F))
(/.f64 (neg.f64 (tan.f64 (neg.f64 (*.f64 (PI.f64) l)))) (neg.f64 (neg.f64 F)))
(/.f64 (tan.f64 (neg.f64 (*.f64 (PI.f64) l))) (neg.f64 F))
(/.f64 (tan.f64 (*.f64 (PI.f64) l)) F)
(/.f64 (neg.f64 (sin.f64 (neg.f64 (*.f64 (PI.f64) l)))) (neg.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) l)))))
(/.f64 (+.f64 (tan.f64 (*.f64 (PI.f64) l)) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (tan.f64 (PI.f64)))))
(/.f64 (sin.f64 (neg.f64 (*.f64 (PI.f64) l))) (neg.f64 (cos.f64 (*.f64 (PI.f64) l))))
(/.f64 (sin.f64 (*.f64 (PI.f64) l)) (cos.f64 (*.f64 (PI.f64) l)))
(tan.f64 (+.f64 (+.f64 (*.f64 (PI.f64) l) (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (*.f64 (PI.f64) l) (PI.f64)))
(tan.f64 (*.f64 (PI.f64) l))
(*.f64 (PI.f64) l)
(*.f64 l (PI.f64))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) l))
F
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (/.f64 (neg.f64 (PI.f64)) F) F)) l))
(*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (/.f64 (neg.f64 (PI.f64)) F) F)) l)
(*.f64 l #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (/.f64 (neg.f64 (PI.f64)) F) F)))
#s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (/.f64 (neg.f64 (PI.f64)) F) F))
(*.f64 (/.f64 (PI.f64) (fabs.f64 F)) (/.f64 #s(literal -1 binary64) (fabs.f64 F)))
(*.f64 (/.f64 (PI.f64) (neg.f64 F)) (pow.f64 F #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 F)) (/.f64 (PI.f64) (fabs.f64 F)))
(*.f64 (pow.f64 F #s(literal -1 binary64)) (/.f64 (PI.f64) (neg.f64 F)))
(*.f64 (/.f64 (PI.f64) F) (/.f64 #s(literal -1 binary64) F))
(*.f64 (/.f64 #s(literal -1 binary64) F) (/.f64 (PI.f64) F))
(*.f64 (/.f64 (PI.f64) (*.f64 F F)) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (PI.f64) (*.f64 F F)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (PI.f64)))) (neg.f64 (neg.f64 (*.f64 F F))))
(/.f64 (neg.f64 (/.f64 (neg.f64 (PI.f64)) F)) (neg.f64 F))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) (neg.f64 (*.f64 F F)))
(/.f64 (/.f64 (neg.f64 (PI.f64)) F) F)
(/.f64 (neg.f64 (PI.f64)) (*.f64 F F))
(neg.f64 (/.f64 (PI.f64) (*.f64 F F)))
(*.f64 #s(literal -1 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal -1 binary64))
(neg.f64 (PI.f64))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal -1 binary64)))
(log.f64 (/.f64 #s(literal 1 binary64) (exp.f64 (PI.f64))))
(*.f64 (neg.f64 (fabs.f64 F)) (neg.f64 (fabs.f64 F)))
(*.f64 (fabs.f64 (fabs.f64 F)) (fabs.f64 (fabs.f64 F)))
(*.f64 (exp.f64 (log.f64 F)) (exp.f64 (log.f64 F)))
(*.f64 (neg.f64 (neg.f64 F)) (neg.f64 (neg.f64 F)))
(*.f64 (fabs.f64 F) (fabs.f64 F))
(*.f64 (neg.f64 F) (neg.f64 F))
(*.f64 F F)
(pow.f64 (exp.f64 (log.f64 F)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 F) #s(literal 2 binary64))
(pow.f64 (*.f64 F F) #s(literal 1 binary64))
(pow.f64 (neg.f64 F) #s(literal 2 binary64))
(pow.f64 F #s(literal 2 binary64))
(fabs.f64 (*.f64 F F))
(exp.f64 (*.f64 (log.f64 F) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 F) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 F) #s(literal 2 binary64))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 l F) (/.f64 (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64))) F))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 l F) (/.f64 (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64))) F)))
(*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (fabs.f64 F)) (/.f64 (*.f64 (PI.f64) l) (fabs.f64 F)))
(*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (neg.f64 F)) (/.f64 (*.f64 (PI.f64) l) (neg.f64 F)))
(*.f64 (/.f64 (*.f64 (PI.f64) l) (fabs.f64 F)) (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (fabs.f64 F)))
(*.f64 (/.f64 (*.f64 (PI.f64) l) (neg.f64 F)) (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (neg.f64 F)))
(*.f64 (/.f64 l (fabs.f64 F)) (/.f64 (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64))) (fabs.f64 F)))
(*.f64 (/.f64 l (neg.f64 F)) (/.f64 (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64))) (neg.f64 F)))
(*.f64 (/.f64 l F) (/.f64 (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64))) F))
(*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) (*.f64 l (/.f64 (PI.f64) F)))
(*.f64 (*.f64 l (/.f64 (PI.f64) F)) (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F))
(*.f64 (*.f64 (PI.f64) l) (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (*.f64 F F)))
(/.f64 (neg.f64 (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (*.f64 (PI.f64) l)) F)) (neg.f64 F))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (*.f64 (PI.f64) l)))) (neg.f64 (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 (neg.f64 (*.f64 (PI.f64) l)) (+.f64 (*.f64 F F) #s(literal -1 binary64))) (*.f64 (neg.f64 F) F))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (*.f64 F F) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (pow.f64 F #s(literal 4 binary64)))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (*.f64 (PI.f64) l)) F) F)
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (*.f64 (PI.f64) l))) (neg.f64 (*.f64 F F)))
(/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (*.f64 (PI.f64) l)) (*.f64 F F))
(-.f64 (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (/.f64 (*.f64 (neg.f64 (*.f64 F F)) (*.f64 (PI.f64) l)) (*.f64 F F)))
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 F F) l) F) (/.f64 (PI.f64) F)) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
(+.f64 (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (/.f64 (*.f64 (*.f64 F F) l) F) (/.f64 (PI.f64) F)))
(*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (*.f64 (PI.f64) l))
(*.f64 (*.f64 (PI.f64) l) (+.f64 (*.f64 F F) #s(literal -1 binary64)))
(*.f64 l (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (PI.f64) l)) #s(literal 3 binary64)) (*.f64 (pow.f64 F #s(literal 6 binary64)) (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64))))) (neg.f64 (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) #s(literal 2 binary64))) (-.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (PI.f64) l)) #s(literal 3 binary64)) (*.f64 (pow.f64 F #s(literal 6 binary64)) (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)))) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (-.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) #s(literal 2 binary64)) (-.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))))
(-.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 (neg.f64 (*.f64 F F)) (*.f64 (PI.f64) l)))
(+.f64 (/.f64 (pow.f64 (neg.f64 (*.f64 (PI.f64) l)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))))) (/.f64 (*.f64 (pow.f64 F #s(literal 6 binary64)) (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))))))
(+.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))
(+.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) (neg.f64 (*.f64 (PI.f64) l)))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 F #s(literal 4 binary64)))) (neg.f64 (-.f64 #s(literal -1 binary64) (*.f64 F F))))
(/.f64 (neg.f64 (+.f64 #s(literal -1 binary64) (pow.f64 F #s(literal 6 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 F #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 F F))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 F #s(literal 4 binary64))) (-.f64 #s(literal -1 binary64) (*.f64 F F)))
(/.f64 (+.f64 #s(literal -1 binary64) (pow.f64 F #s(literal 6 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 F #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 F F)))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal -1 binary64) (*.f64 F F))) (/.f64 (pow.f64 F #s(literal 4 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 F F))))
(-.f64 #s(literal -1 binary64) (*.f64 (neg.f64 F) F))
(+.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 F #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 F F))))) (/.f64 (pow.f64 F #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 F #s(literal 4 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 F F))))))
(+.f64 (*.f64 F F) #s(literal -1 binary64))
(+.f64 #s(literal -1 binary64) (*.f64 F F))
#s(literal -1 binary64)
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
(*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 F)) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (fabs.f64 F)))
(*.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (*.f64 (PI.f64) l))) (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
(*.f64 (pow.f64 F #s(literal -1 binary64)) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (neg.f64 F)))
(*.f64 (/.f64 #s(literal -1 binary64) F) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) F))
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l)))
(*.f64 (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (cos.f64 (*.f64 (PI.f64) l))) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (cos.f64 (*.f64 (PI.f64) l))))
(*.f64 (tan.f64 (*.f64 (PI.f64) l)) (/.f64 #s(literal -1 binary64) (*.f64 F F)))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (tan.f64 (*.f64 (PI.f64) l)))) (neg.f64 (*.f64 F F)))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 (PI.f64) l)))) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) (sin.f64 (neg.f64 (*.f64 (PI.f64) l)))) (*.f64 F (neg.f64 (cos.f64 (*.f64 (PI.f64) l)))))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) (sin.f64 (*.f64 (PI.f64) l))) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) F))
(/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 (*.f64 (PI.f64) l)))) (*.f64 (*.f64 F F) (neg.f64 (cos.f64 (*.f64 (PI.f64) l)))))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (neg.f64 (*.f64 (PI.f64) l)))) (*.f64 (neg.f64 (*.f64 F F)) (neg.f64 (cos.f64 (*.f64 (PI.f64) l)))))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (*.f64 (PI.f64) l))) (*.f64 (neg.f64 (*.f64 F F)) (cos.f64 (*.f64 (PI.f64) l))))
(/.f64 (*.f64 (sin.f64 (neg.f64 (*.f64 (PI.f64) l))) (/.f64 #s(literal -1 binary64) F)) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) l))) F))
(/.f64 (*.f64 (sin.f64 (neg.f64 (*.f64 (PI.f64) l))) #s(literal -1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
(/.f64 (*.f64 (sin.f64 (neg.f64 (*.f64 (PI.f64) l))) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) l))) (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) (/.f64 #s(literal -1 binary64) F)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) F))
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F))
(/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 (PI.f64) l))) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
(neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (cos.f64 (*.f64 (PI.f64) l))))
(pow.f64 (neg.f64 (*.f64 F F)) #s(literal -1 binary64))
(/.f64 (neg.f64 (/.f64 #s(literal -1 binary64) F)) (neg.f64 F))
(/.f64 (/.f64 #s(literal -1 binary64) F) F)
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (*.f64 F F))))
(/.f64 #s(literal -1 binary64) (*.f64 F F))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 F F)))
(/.f64 (neg.f64 (sin.f64 (neg.f64 (*.f64 (PI.f64) l)))) (neg.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) l)))))
(/.f64 (+.f64 (tan.f64 (*.f64 (PI.f64) l)) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (tan.f64 (PI.f64)))))
(/.f64 (sin.f64 (neg.f64 (*.f64 (PI.f64) l))) (neg.f64 (cos.f64 (*.f64 (PI.f64) l))))
(/.f64 (sin.f64 (*.f64 (PI.f64) l)) (cos.f64 (*.f64 (PI.f64) l)))
(tan.f64 (+.f64 (+.f64 (*.f64 (PI.f64) l) (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 (*.f64 (PI.f64) l) (PI.f64)))
(tan.f64 (*.f64 (PI.f64) l))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (ratio-of-squares.f64 (*.f64 #s(literal 1 binary64) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))) F))) (neg.f64 (+.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 (*.f64 #s(literal 1 binary64) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))) F) (*.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (ratio-of-squares.f64 (*.f64 #s(literal 1 binary64) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))) F)) (+.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 (*.f64 #s(literal 1 binary64) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))) F) (*.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l)))))))
(-.f64 (ratio-square-sum.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l)))) (/.f64 (ratio-of-squares.f64 (*.f64 #s(literal 1 binary64) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))) F) (+.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 (*.f64 #s(literal 1 binary64) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))) F) (*.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))))))) (/.f64 (pow.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 (*.f64 #s(literal 1 binary64) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))) F) (*.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))))))))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))))
(+.f64 (*.f64 (PI.f64) l) (*.f64 (neg.f64 (/.f64 #s(literal -1 binary64) F)) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))))
(*.f64 (pow.f64 F #s(literal -1 binary64)) (/.f64 #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l)))
(*.f64 #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l)) (/.f64 #s(literal -1 binary64) F))
(*.f64 #s(literal -1 binary64) (/.f64 #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l)) F))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l)))) (neg.f64 (neg.f64 F)))
(/.f64 (*.f64 #s(literal 1 binary64) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))) (neg.f64 F))
(*.f64 (pow.f64 F #s(literal -1 binary64)) #s(literal -1 binary64))
(*.f64 (/.f64 #s(literal -1 binary64) F) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (pow.f64 F #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) F))
(pow.f64 (neg.f64 F) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 F)))
(/.f64 #s(literal -1 binary64) F)
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (neg.f64 F))))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 F) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 F))
(neg.f64 (pow.f64 F #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 F)) #s(literal -1 binary64)))
#s(literal 1 binary64)
(*.f64 #s(literal -1 binary64) F)
(*.f64 F #s(literal -1 binary64))
(neg.f64 F)
#s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))
(*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l)
(*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F)) l))
(*.f64 l (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))))
(+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))) l) (*.f64 (/.f64 (neg.f64 (PI.f64)) F) l))
(+.f64 (*.f64 l (neg.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))))) (*.f64 l (/.f64 (neg.f64 (PI.f64)) F)))
(*.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F)) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (ratio-of-squares.f64 (PI.f64) F))) (neg.f64 (-.f64 (neg.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))) (/.f64 (neg.f64 (PI.f64)) F))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 (PI.f64)) F) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 (PI.f64) F) (*.f64 (neg.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))) (/.f64 (neg.f64 (PI.f64)) F))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (ratio-of-squares.f64 (PI.f64) F)) (-.f64 (neg.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))) (/.f64 (neg.f64 (PI.f64)) F)))
(/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 (PI.f64)) F) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 (PI.f64) F) (*.f64 (neg.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))) (/.f64 (neg.f64 (PI.f64)) F)))))
(neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (-.f64 (neg.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))) (/.f64 (neg.f64 (PI.f64)) F))) (/.f64 (ratio-of-squares.f64 (PI.f64) F) (-.f64 (neg.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))) (/.f64 (neg.f64 (PI.f64)) F))))
(-.f64 (neg.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))) (/.f64 (PI.f64) F))
(+.f64 (/.f64 (pow.f64 (neg.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 (PI.f64) F) (*.f64 (neg.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))) (/.f64 (neg.f64 (PI.f64)) F))))) (/.f64 (pow.f64 (/.f64 (neg.f64 (PI.f64)) F) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 (PI.f64) F) (*.f64 (neg.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))) (/.f64 (neg.f64 (PI.f64)) F))))))
(+.f64 (/.f64 (neg.f64 (PI.f64)) F) (neg.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))))
(+.f64 (neg.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))) (/.f64 (neg.f64 (PI.f64)) F))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (ratio-of-squares.f64 (PI.f64) F))) (neg.f64 (-.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) F) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 (PI.f64) F) (*.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (ratio-of-squares.f64 (PI.f64) F)) (-.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) F) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 (PI.f64) F) (*.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) (/.f64 (ratio-of-squares.f64 (PI.f64) F) (-.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 (PI.f64) F) (*.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))))) (/.f64 (pow.f64 (/.f64 (PI.f64) F) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (-.f64 (ratio-of-squares.f64 (PI.f64) F) (*.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))))))
(+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))
(+.f64 (/.f64 (PI.f64) F) (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))))
(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) l) l)
(*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))
(*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) (*.f64 #s(literal 1/3 binary64) (*.f64 l l)))
(*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l))
(*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))
(*.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F))
(/.f64 (neg.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (neg.f64 F))
(/.f64 (neg.f64 (-.f64 (ratio-of-squares.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) F) (ratio-of-squares.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) F))) (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) F)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (ratio-of-squares.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) F) (+.f64 (ratio-of-squares.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) F) (*.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)))))))
(/.f64 (neg.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (neg.f64 F))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) F) (*.f64 F (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))))) (*.f64 F F))
(/.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) F)
(/.f64 (-.f64 (ratio-of-squares.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) F) (ratio-of-squares.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) F)) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) F))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)) #s(literal 3 binary64))) (+.f64 (ratio-of-squares.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) F) (+.f64 (ratio-of-squares.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) F) (*.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F))))))
(/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64)) F)
(-.f64 (ratio-square-sum.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F))) (/.f64 (ratio-of-squares.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) F) (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) F)))
(-.f64 (/.f64 (pow.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)) #s(literal 3 binary64)) (+.f64 (ratio-of-squares.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) F) (+.f64 (ratio-of-squares.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) F) (*.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)))))) (/.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)) #s(literal 3 binary64)) (+.f64 (ratio-of-squares.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) F) (+.f64 (ratio-of-squares.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) F) (*.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)))))))
(-.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)))
(+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) F))
(+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)))
(/.f64 (neg.f64 (pow.f64 (neg.f64 (PI.f64)) #s(literal 3 binary64))) (neg.f64 (neg.f64 F)))
(/.f64 (pow.f64 (neg.f64 (PI.f64)) #s(literal 3 binary64)) (neg.f64 F))
(/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)
(*.f64 (neg.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (neg.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))
(*.f64 (fabs.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (fabs.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))
(*.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 3 binary64)) (PI.f64))
(*.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) (pow.f64 (PI.f64) #s(literal 3/2 binary64)))
(*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))
(*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))
(pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 3/2 binary64))
(pow.f64 (PI.f64) #s(literal 3 binary64))
(exp.f64 (+.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 2 binary64)) (log.f64 (PI.f64))))
(exp.f64 (+.f64 (log.f64 (PI.f64)) (*.f64 (log.f64 (PI.f64)) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 3 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 3 binary64))) (sinh.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 3 binary64))))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 (PI.f64) (PI.f64))))
#s(literal 3 binary64)
#s(literal 1/3 binary64)
(*.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 l)))
(*.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 l)))
(*.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 l)))
(*.f64 (exp.f64 (log.f64 l)) (exp.f64 (log.f64 l)))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 l l)
(pow.f64 (exp.f64 (log.f64 l)) #s(literal 2 binary64))
(pow.f64 (neg.f64 l) #s(literal 2 binary64))
(pow.f64 (fabs.f64 l) #s(literal 2 binary64))
(pow.f64 (*.f64 l l) #s(literal 1 binary64))
(pow.f64 l #s(literal 2 binary64))
(fabs.f64 (*.f64 l l))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 l) #s(literal 2 binary64))))
(*.f64 (/.f64 (PI.f64) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) F))
(*.f64 (/.f64 (PI.f64) F) #s(literal 1 binary64))
(*.f64 (/.f64 #s(literal -1 binary64) F) (/.f64 (PI.f64) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (PI.f64) F))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (PI.f64))) (*.f64 #s(literal 2 binary64) (neg.f64 F)))
(/.f64 (*.f64 #s(literal 2 binary64) (PI.f64)) (*.f64 #s(literal 2 binary64) F))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) (neg.f64 (neg.f64 F)))
(/.f64 (neg.f64 (PI.f64)) (neg.f64 F))
(/.f64 (PI.f64) F)
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
#s(approx (/ (/ (tan (* l (PI))) F) F) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (cos.f64 (*.f64 (PI.f64) l))))
#s(approx (/ (tan (* l (PI))) F) (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) F)))
#s(approx F F)
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 l F) (/.f64 (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64))) F)))
#s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (/.f64 (neg.f64 (PI.f64)) F) F))
#s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (-.f64 (*.f64 (*.f64 F F) (PI.f64)) (PI.f64)) (*.f64 F F)))
#s(approx (/ (neg (PI)) (* F F)) (/.f64 (/.f64 (neg.f64 (PI.f64)) F) F))
#s(approx (* F F) (*.f64 F F))
#s(approx (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
#s(approx (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) (*.f64 (/.f64 l F) (/.f64 (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64))) F)))
#s(approx (* (* l (PI)) (+ -1 (* F F))) (neg.f64 (*.f64 (PI.f64) l)))
#s(approx (* (* l (PI)) (+ -1 (* F F))) (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (*.f64 (PI.f64) l)))
#s(approx (+ -1 (* F F)) #s(literal -1 binary64))
#s(approx (+ -1 (* F F)) (-.f64 (*.f64 F F) #s(literal 1 binary64)))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
#s(approx (/ -1 (* F F)) (/.f64 #s(literal -1 binary64) (*.f64 F F)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (cos.f64 (*.f64 (PI.f64) l))))
#s(approx (/ 1 (neg F)) (/.f64 #s(literal -1 binary64) F))
#s(approx (neg F) (neg.f64 F))
#s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (/.f64 #s(literal -1 binary64) F) (tan.f64 (*.f64 (PI.f64) l))))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) (neg.f64 (*.f64 l (/.f64 (-.f64 (PI.f64) (*.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 3 binary64)))) F))))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) (neg.f64 (/.f64 (-.f64 (PI.f64) (*.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 3 binary64)))) F)))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) (/.f64 (-.f64 (PI.f64) (*.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 3 binary64)))) F))
#s(approx (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (*.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)) #s(literal 1/3 binary64)))
#s(approx (* (/ (pow (PI) 3) F) 1/3) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))
#s(approx (/ (pow (PI) 3) F) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F))
#s(approx (/ (PI) F) (/.f64 (PI.f64) F))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (+.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 (PI.f64) l)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (+.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 (PI.f64) l)))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (PI.f64) l))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (+.f64 (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (PI.f64) l)))
#s(approx (- (PI) (/ (PI) (* F F))) (PI.f64))
#s(approx (- (PI) (/ (PI) (* F F))) (+.f64 (/.f64 (/.f64 (neg.f64 (PI.f64)) F) F) (PI.f64)))
#s(approx (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) (*.f64 (PI.f64) l))
#s(approx (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) (+.f64 (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (PI.f64) l)))
#s(approx (* (* l (PI)) (+ -1 (* F F))) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))
#s(approx (* (* l (PI)) (+ -1 (* F F))) (*.f64 (+.f64 (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (PI.f64) l)) (*.f64 F F)))
#s(approx (+ -1 (* F F)) (*.f64 F F))
#s(approx (+ -1 (* F F)) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 F #s(literal -2 binary64))) (*.f64 F F)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (+.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 (PI.f64) l)))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) (*.f64 (/.f64 (-.f64 (neg.f64 (PI.f64)) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 3 binary64)))) F) l))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) (/.f64 (-.f64 (neg.f64 (PI.f64)) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 3 binary64)))) F))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) (neg.f64 (/.f64 (-.f64 (neg.f64 (PI.f64)) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 3 binary64)))) F)))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/3 binary64)) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F)) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F)) (*.f64 (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal -1/720 binary64))) (*.f64 F F)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64))) #s(literal 1/24 binary64))) (*.f64 #s(literal -1/5040 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F))) (*.f64 l l))) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* l (PI)) (*.f64 (PI.f64) l))
#s(approx l l)
#s(approx (/ (/ (tan (* l (PI))) F) F) (*.f64 (/.f64 l F) (/.f64 (PI.f64) F)))
#s(approx (/ (/ (tan (* l (PI))) F) F) (*.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (/ (/ (tan (* l (PI))) F) F) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 F F)) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 l l)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (/ (/ (tan (* l (PI))) F) F) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) (*.f64 F F)) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal -1/720 binary64))) (*.f64 F F))) (*.f64 l l)) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F))) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 l l)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (/ (tan (* l (PI))) F) (*.f64 l (/.f64 (PI.f64) F)))
#s(approx (/ (tan (* l (PI))) F) (*.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F)) l))
#s(approx (/ (tan (* l (PI))) F) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) F) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F))) (*.f64 l l)) (/.f64 (PI.f64) F)) l))
#s(approx (/ (tan (* l (PI))) F) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) F) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal -1/720 binary64))) F)) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) F) #s(literal 1/120 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) F)) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F))) (*.f64 l l)) (/.f64 (PI.f64) F)) l))
#s(approx (tan (* l (PI))) (*.f64 (PI.f64) l))
#s(approx (tan (* l (PI))) (*.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64)) (*.f64 l l)) (PI.f64)) l))
#s(approx (tan (* l (PI))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 l l)) (PI.f64)) l))
#s(approx (tan (* l (PI))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) (+.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal -1/720 binary64)))) (*.f64 l l)) (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 l l)) (PI.f64)) l))
#s(approx (* l (PI)) (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/3 binary64)) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F)) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F)) (*.f64 (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal -1/720 binary64))) (*.f64 F F)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64))) #s(literal 1/24 binary64))) (*.f64 #s(literal -1/5040 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F))) (*.f64 l l))) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (/ (* (* l (PI)) (+ -1 (* F F))) (* F F)) (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 F F) #s(literal 1 binary64)) (PI.f64)) F) (/.f64 l F)))
#s(approx (* (* l (PI)) (+ -1 (* F F))) (*.f64 (*.f64 (-.f64 (*.f64 F F) #s(literal 1 binary64)) (PI.f64)) l))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) (*.f64 F F)))) l))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64))) (neg.f64 (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 F F)) (*.f64 l l)))) (*.f64 l l)) (/.f64 (/.f64 (neg.f64 (PI.f64)) F) F)) l))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 F F))) (neg.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) (*.f64 F F)) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal -1/720 binary64))) (*.f64 F F))) (*.f64 l l)))) (*.f64 l l)) (neg.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)))) (*.f64 l l)) (/.f64 (/.f64 (neg.f64 (PI.f64)) F) F)) l))
#s(approx (tan (* l (PI))) (*.f64 (PI.f64) l))
#s(approx (tan (* l (PI))) (*.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64)) (*.f64 l l)) (PI.f64)) l))
#s(approx (tan (* l (PI))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 l l)) (PI.f64)) l))
#s(approx (tan (* l (PI))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) (+.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal -1/720 binary64)))) (*.f64 l l)) (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 l l)) (PI.f64)) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/3 binary64)) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F)) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F)) (*.f64 (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal -1/720 binary64))) (*.f64 F F)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64))) #s(literal 1/24 binary64))) (*.f64 #s(literal -1/5040 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F))) (*.f64 l l))) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) (*.f64 (/.f64 l F) (/.f64 (PI.f64) F)))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) (*.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 F F)) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 l l)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) (*.f64 F F)) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal -1/720 binary64))) (*.f64 F F))) (*.f64 l l)) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F))) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 l l)) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (/ (tan (* (PI) l)) (neg F)) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) F))
#s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))
#s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (neg.f64 (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) F) (*.f64 l l)))) (*.f64 l l)) (/.f64 (neg.f64 (PI.f64)) F)) l))
#s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) F)) (neg.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) F) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal -1/720 binary64))) F)) (*.f64 l l)))) (*.f64 l l)) (neg.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)))) (*.f64 l l)) (/.f64 (neg.f64 (PI.f64)) F)) l))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) F))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) (*.f64 (/.f64 (-.f64 (neg.f64 (PI.f64)) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 3 binary64)))) F) l))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) (/.f64 (neg.f64 (PI.f64)) F))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) (/.f64 (-.f64 (neg.f64 (PI.f64)) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 3 binary64)))) F))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) (/.f64 (PI.f64) F))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) (/.f64 (-.f64 (PI.f64) (*.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 3 binary64)))) F))
#s(approx (* l l) (*.f64 l l))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (*.f64 (+.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 F F) l)) (tan.f64 (*.f64 (PI.f64) l))) (PI.f64)) l))
#s(approx (tan (* l (PI))) (tan.f64 (*.f64 (PI.f64) l)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (+.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 F F) l)) (tan.f64 (*.f64 (PI.f64) l))) (PI.f64)) l))
#s(approx (tan (* l (PI))) (tan.f64 (*.f64 (PI.f64) l)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (*.f64 (+.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 F F) l)) (tan.f64 (*.f64 (PI.f64) l))) (PI.f64)) l))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) (*.f64 (/.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) F) #s(literal -1/3 binary64)))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) (*.f64 (-.f64 (/.f64 (neg.f64 (PI.f64)) (*.f64 (*.f64 l l) F)) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) (*.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 l l) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F))))
#s(approx (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) (*.f64 (-.f64 (/.f64 (neg.f64 (PI.f64)) (*.f64 (*.f64 l l) F)) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (*.f64 l l)))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) (*.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F)) #s(literal 1/3 binary64)))
#s(approx (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F)) (*.f64 (+.f64 (/.f64 (PI.f64) (*.f64 (*.f64 l l) F)) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (*.f64 l l)))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (neg.f64 (*.f64 (+.f64 (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) l)) (neg.f64 (PI.f64))) l)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (neg.f64 (*.f64 (+.f64 (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) l)) (neg.f64 (PI.f64))) l)))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (neg.f64 (*.f64 (+.f64 (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) l)) (neg.f64 (PI.f64))) l)))
#s(approx (* (* -1 (+ (* (* (/ (pow (PI) 3) F) 1/3) (* l l)) (/ (PI) F))) l) (neg.f64 (*.f64 (+.f64 (/.f64 (PI.f64) (*.f64 (*.f64 l l) F)) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (pow.f64 l #s(literal 3 binary64)))))

eval265.0ms (5.6%)

Memory
16.9MiB live, 339.9MiB allocated; 51ms collecting garbage
Samples
91.0ms2 342×0valid
31.0ms392×0invalid
5.0ms82×1valid
Compiler

Compiled 18 638 to 2 216 computations (88.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 60.0ms
ival-mult: 36.0ms (59.7% of total)
ival-div: 16.0ms (26.5% of total)
ival-add: 3.0ms (5% of total)
ival-true: 2.0ms (3.3% of total)
adjust: 1.0ms (1.7% of total)
ival-assert: 1.0ms (1.7% of total)

prune57.0ms (1.2%)

Memory
-21.2MiB live, 125.4MiB allocated; 20ms collecting garbage
Pruning

21 alts after pruning (17 fresh and 4 done)

PrunedKeptTotal
New44816464
Fresh819
Picked325
Done123
Total46021481
Accuracy
99.6%
Counts
481 → 21
Alt Table
Click to see full alt table
StatusAccuracyProgram
20.5%
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 (*.f64 #s(literal 1 binary64) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))) F) (*.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l)))))))
▶68.3%
(-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (*.f64 l (/.f64 (PI.f64) F))) F))
54.8%
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))) l))))
68.3%
(-.f64 (*.f64 (PI.f64) l) #s(approx (/ (/ (tan (* l (PI))) F) F) (*.f64 (/.f64 l F) (/.f64 (PI.f64) F))))
▶21.0%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
✓20.5%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
3.8%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (log.f64 (pow.f64 (exp.f64 (PI.f64)) l)))))
✓63.6%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
✓77.0%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
18.8%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (/.f64 (neg.f64 (PI.f64)) F) F)) l))
42.5%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (-.f64 (*.f64 (*.f64 F F) (PI.f64)) (PI.f64)) (*.f64 F F))) l))
✓18.8%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l))
18.8%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (*.f64 (/.f64 (PI.f64) F) (/.f64 #s(literal -1 binary64) F))) l))
▶19.4%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
22.6%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) #s(literal 2 binary64))) (-.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (*.f64 F F))))
12.6%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (*.f64 F F) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (pow.f64 F #s(literal 4 binary64)))))
▶36.9%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 l (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64)))) (*.f64 F F))))
36.8%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 #s(approx (* (* l (PI)) (+ -1 (* F F))) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64))) (*.f64 F F))))
37.7%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (+.f64 (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (/.f64 (*.f64 (*.f64 F F) l) F) (/.f64 (PI.f64) F)))))
▶45.4%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) (*.f64 l (/.f64 (PI.f64) F)))))
45.5%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 l F) (/.f64 (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64))) F))))
Samples
15.0ms322×0valid
8.0ms190×0invalid
Compiler

Compiled 1 472 to 830 computations (43.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 13.0ms
ival-mult: 9.0ms (71.8% of total)
ival-div: 3.0ms (23.9% of total)
ival-true: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series34.0ms (0.7%)

Memory
18.9MiB live, 64.9MiB allocated; 4ms collecting garbage
Counts
31 → 101
Calls
Call 1
Inputs
(-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (*.f64 l (/.f64 (PI.f64) F))) F))
(*.f64 (PI.f64) l)
(PI.f64)
l
(/.f64 #s(approx (/ (tan (* l (PI))) F) (*.f64 l (/.f64 (PI.f64) F))) F)
#s(approx (/ (tan (* l (PI))) F) (*.f64 l (/.f64 (PI.f64) F)))
(*.f64 l (/.f64 (PI.f64) F))
(/.f64 (PI.f64) F)
F
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
(/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F))
(neg.f64 (*.f64 (PI.f64) l))
(*.f64 F F)
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 l (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64)))) (*.f64 F F))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 l (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64)))) (*.f64 F F)))
(/.f64 (*.f64 l (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64)))) (*.f64 F F))
(*.f64 l (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64))))
(*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64)))
(+.f64 (*.f64 F F) #s(literal -1 binary64))
#s(literal -1 binary64)
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) (*.f64 l (/.f64 (PI.f64) F)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) (*.f64 l (/.f64 (PI.f64) F))))
(*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) (*.f64 l (/.f64 (PI.f64) F)))
(/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F)
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
(*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal -1 binary64))
(sin.f64 (*.f64 (PI.f64) l))
(*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F))
(cos.f64 (*.f64 (PI.f64) l))
Outputs
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (/ (sin (* l (PI))) (* F (cos (* l (PI)))))))
#s(approx (* l (/ (PI) F)) #s(hole binary64 (/ (* l (PI)) F)))
#s(approx (/ (PI) F) #s(hole binary64 (/ (PI) F)))
#s(approx F #s(hole binary64 F))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (/ (neg (* (PI) l)) (* F F)) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (* F F) #s(hole binary64 (pow F 2)))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (/ (+ (* -1 (* l (PI))) (* (pow F 2) (* l (PI)))) (pow F 2))))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) #s(hole binary64 (/ (+ (* -1 (* l (PI))) (* (pow F 2) (* l (PI)))) (pow F 2))))
#s(approx (* l (* (PI) (+ (* F F) -1))) #s(hole binary64 (* -1 (* l (PI)))))
#s(approx (* l (* (PI) (+ (* F F) -1))) #s(hole binary64 (+ (* -1 (* l (PI))) (* (pow F 2) (* l (PI))))))
#s(approx (* (PI) (+ (* F F) -1)) #s(hole binary64 (* -1 (PI))))
#s(approx (* (PI) (+ (* F F) -1)) #s(hole binary64 (+ (* -1 (PI)) (* (pow F 2) (PI)))))
#s(approx (+ (* F F) -1) #s(hole binary64 -1))
#s(approx (+ (* F F) -1) #s(hole binary64 (- (pow F 2) 1)))
#s(approx (* (/ (+ (* F F) -1) F) (* l (/ (PI) F))) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (* (/ (+ (* F F) -1) F) (* l (/ (PI) F))) #s(hole binary64 (/ (+ (* -1 (* l (PI))) (* (pow F 2) (* l (PI)))) (pow F 2))))
#s(approx (/ (+ (* F F) -1) F) #s(hole binary64 (/ -1 F)))
#s(approx (/ (+ (* F F) -1) F) #s(hole binary64 (/ (- (pow F 2) 1) F)))
#s(approx (/ (* (sin (* (PI) l)) -1) (* (cos (* (PI) l)) (* F F))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (* (cos (* (PI) l)) (* F F)) #s(hole binary64 (* (pow F 2) (cos (* l (PI))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* l (PI))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (+ (* -1 (/ (* l (PI)) (pow F 2))) (* l (PI)))))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) #s(hole binary64 (* l (PI))))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) #s(hole binary64 (+ (* -1 (/ (* l (PI)) (pow F 2))) (* l (PI)))))
#s(approx (* l (* (PI) (+ (* F F) -1))) #s(hole binary64 (* (pow F 2) (* l (PI)))))
#s(approx (* l (* (PI) (+ (* F F) -1))) #s(hole binary64 (* (pow F 2) (+ (* -1 (/ (* l (PI)) (pow F 2))) (* l (PI))))))
#s(approx (* (PI) (+ (* F F) -1)) #s(hole binary64 (* (pow F 2) (PI))))
#s(approx (* (PI) (+ (* F F) -1)) #s(hole binary64 (* (pow F 2) (+ (PI) (* -1 (/ (PI) (pow F 2)))))))
#s(approx (+ (* F F) -1) #s(hole binary64 (pow F 2)))
#s(approx (+ (* F F) -1) #s(hole binary64 (* (pow F 2) (- 1 (/ 1 (pow F 2))))))
#s(approx (* (/ (+ (* F F) -1) F) (* l (/ (PI) F))) #s(hole binary64 (* l (PI))))
#s(approx (* (/ (+ (* F F) -1) F) (* l (/ (PI) F))) #s(hole binary64 (+ (* -1 (/ (* l (PI)) (pow F 2))) (* l (PI)))))
#s(approx (/ (+ (* F F) -1) F) #s(hole binary64 F))
#s(approx (/ (+ (* F F) -1) F) #s(hole binary64 (* F (- 1 (/ 1 (pow F 2))))))
#s(approx (/ (+ (* F F) -1) F) #s(hole binary64 (* -1 (* F (- (/ 1 (pow F 2)) 1)))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (PI) l) #s(hole binary64 (* l (PI))))
#s(approx l #s(hole binary64 l))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (/ (* l (PI)) (pow F 2))))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* 1/120 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2)))))))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (/ (* l (PI)) F)))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) F)) (* -1/2 (/ (pow (PI) 3) F)))) (/ (PI) F)))))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) F)) (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F)) (* 1/24 (/ (pow (PI) 5) F)))))) (* -1/2 (/ (pow (PI) 3) F)))) (/ (PI) F)))))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) F)) (* (pow l 2) (- (+ (* 1/120 (/ (pow (PI) 5) F)) (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) F)) (+ (* -1/720 (/ (pow (PI) 7) F)) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F))))))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F)) (* 1/24 (/ (pow (PI) 5) F)))))) (* -1/2 (/ (pow (PI) 3) F)))) (/ (PI) F)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* -1 (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))) (* -1 (/ (PI) (pow F 2)))))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* -1 (/ (PI) (pow F 2))) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1 (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))))))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* -1 (/ (PI) (pow F 2))) (* (pow l 2) (+ (* -1 (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2)))))))) (* -1 (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))))))))))
#s(approx (neg (* (PI) l)) #s(hole binary64 (* -1 (* l (PI)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) #s(hole binary64 (/ (* l (* (PI) (- (pow F 2) 1))) (pow F 2))))
#s(approx (* l (* (PI) (+ (* F F) -1))) #s(hole binary64 (* l (* (PI) (- (pow F 2) 1)))))
#s(approx (* (/ (+ (* F F) -1) F) (* l (/ (PI) F))) #s(hole binary64 (/ (* l (* (PI) (- (pow F 2) 1))) (pow F 2))))
#s(approx (/ (* (sin (* (PI) l)) -1) (* (cos (* (PI) l)) (* F F))) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (/ (* (sin (* (PI) l)) -1) (* (cos (* (PI) l)) (* F F))) #s(hole binary64 (* l (+ (* -1 (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))) (* -1 (/ (PI) (pow F 2)))))))
#s(approx (/ (* (sin (* (PI) l)) -1) (* (cos (* (PI) l)) (* F F))) #s(hole binary64 (* l (+ (* -1 (/ (PI) (pow F 2))) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1 (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))))))))
#s(approx (/ (* (sin (* (PI) l)) -1) (* (cos (* (PI) l)) (* F F))) #s(hole binary64 (* l (+ (* -1 (/ (PI) (pow F 2))) (* (pow l 2) (+ (* -1 (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (* (pow (PI) 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (* (pow (PI) 4) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))))))))) (* -1 (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))))))))))
#s(approx (* (sin (* (PI) l)) -1) #s(hole binary64 (* -1 (* l (PI)))))
#s(approx (* (sin (* (PI) l)) -1) #s(hole binary64 (* l (+ (* -1 (PI)) (* 1/6 (* (pow l 2) (pow (PI) 3)))))))
#s(approx (* (sin (* (PI) l)) -1) #s(hole binary64 (* l (+ (* -1 (PI)) (* (pow l 2) (+ (* -1/120 (* (pow l 2) (pow (PI) 5))) (* 1/6 (pow (PI) 3))))))))
#s(approx (* (sin (* (PI) l)) -1) #s(hole binary64 (* l (+ (* -1 (PI)) (* (pow l 2) (+ (* 1/6 (pow (PI) 3)) (* (pow l 2) (+ (* -1/120 (pow (PI) 5)) (* 1/5040 (* (pow l 2) (pow (PI) 7)))))))))))
#s(approx (sin (* (PI) l)) #s(hole binary64 (* l (PI))))
#s(approx (sin (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* -1/6 (* (pow l 2) (pow (PI) 3)))))))
#s(approx (sin (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (+ (* -1/6 (pow (PI) 3)) (* 1/120 (* (pow l 2) (pow (PI) 5)))))))))
#s(approx (sin (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (+ (* -1/5040 (* (pow l 2) (pow (PI) 7))) (* 1/120 (pow (PI) 5))))))))))
#s(approx (* (cos (* (PI) l)) (* F F)) #s(hole binary64 (pow F 2)))
#s(approx (* (cos (* (PI) l)) (* F F)) #s(hole binary64 (+ (* -1/2 (* (pow F 2) (* (pow l 2) (pow (PI) 2)))) (pow F 2))))
#s(approx (* (cos (* (PI) l)) (* F F)) #s(hole binary64 (+ (* (pow l 2) (+ (* -1/2 (* (pow F 2) (pow (PI) 2))) (* 1/24 (* (pow F 2) (* (pow l 2) (pow (PI) 4)))))) (pow F 2))))
#s(approx (* (cos (* (PI) l)) (* F F)) #s(hole binary64 (+ (* (pow l 2) (+ (* -1/2 (* (pow F 2) (pow (PI) 2))) (* (pow l 2) (+ (* -1/720 (* (pow F 2) (* (pow l 2) (pow (PI) 6)))) (* 1/24 (* (pow F 2) (pow (PI) 4))))))) (pow F 2))))
#s(approx (cos (* (PI) l)) #s(hole binary64 1))
#s(approx (cos (* (PI) l)) #s(hole binary64 (+ 1 (* -1/2 (* (pow l 2) (pow (PI) 2))))))
#s(approx (cos (* (PI) l)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (pow (PI) 2)) (* 1/24 (* (pow l 2) (pow (PI) 4))))))))
#s(approx (cos (* (PI) l)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (pow (PI) 2)) (* (pow l 2) (+ (* -1/720 (* (pow l 2) (pow (PI) 6))) (* 1/24 (pow (PI) 4)))))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (* (sin (* (PI) l)) -1) #s(hole binary64 (* -1 (sin (* l (PI))))))
#s(approx (sin (* (PI) l)) #s(hole binary64 (sin (* l (PI)))))
#s(approx (cos (* (PI) l)) #s(hole binary64 (cos (* l (PI)))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
Calls

6 calls:

TimeVariablePointExpression
7.0ms
l
@inf
((- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (* (PI) l) (PI) l (/ (/ (tan (* l (PI))) F) F) (/ (tan (* l (PI))) F) (* l (/ (PI) F)) (/ (PI) F) F (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (/ -1 (* F F)) (tan (* (PI) l))) (/ (neg (* (PI) l)) (* F F)) (neg (* (PI) l)) (* F F) (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) (* l (* (PI) (+ (* F F) -1))) (* (PI) (+ (* F F) -1)) (+ (* F F) -1) -1 (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (* (/ (+ (* F F) -1) F) (* l (/ (PI) F))) (/ (+ (* F F) -1) F) (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/ (* (sin (* (PI) l)) -1) (* (cos (* (PI) l)) (* F F))) (* (sin (* (PI) l)) -1) (sin (* (PI) l)) (* (cos (* (PI) l)) (* F F)) (cos (* (PI) l)))
5.0ms
l
@-inf
((- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (* (PI) l) (PI) l (/ (/ (tan (* l (PI))) F) F) (/ (tan (* l (PI))) F) (* l (/ (PI) F)) (/ (PI) F) F (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (/ -1 (* F F)) (tan (* (PI) l))) (/ (neg (* (PI) l)) (* F F)) (neg (* (PI) l)) (* F F) (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) (* l (* (PI) (+ (* F F) -1))) (* (PI) (+ (* F F) -1)) (+ (* F F) -1) -1 (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (* (/ (+ (* F F) -1) F) (* l (/ (PI) F))) (/ (+ (* F F) -1) F) (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/ (* (sin (* (PI) l)) -1) (* (cos (* (PI) l)) (* F F))) (* (sin (* (PI) l)) -1) (sin (* (PI) l)) (* (cos (* (PI) l)) (* F F)) (cos (* (PI) l)))
5.0ms
l
@0
((- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (* (PI) l) (PI) l (/ (/ (tan (* l (PI))) F) F) (/ (tan (* l (PI))) F) (* l (/ (PI) F)) (/ (PI) F) F (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (/ -1 (* F F)) (tan (* (PI) l))) (/ (neg (* (PI) l)) (* F F)) (neg (* (PI) l)) (* F F) (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) (* l (* (PI) (+ (* F F) -1))) (* (PI) (+ (* F F) -1)) (+ (* F F) -1) -1 (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (* (/ (+ (* F F) -1) F) (* l (/ (PI) F))) (/ (+ (* F F) -1) F) (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/ (* (sin (* (PI) l)) -1) (* (cos (* (PI) l)) (* F F))) (* (sin (* (PI) l)) -1) (sin (* (PI) l)) (* (cos (* (PI) l)) (* F F)) (cos (* (PI) l)))
5.0ms
F
@-inf
((- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (* (PI) l) (PI) l (/ (/ (tan (* l (PI))) F) F) (/ (tan (* l (PI))) F) (* l (/ (PI) F)) (/ (PI) F) F (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (/ -1 (* F F)) (tan (* (PI) l))) (/ (neg (* (PI) l)) (* F F)) (neg (* (PI) l)) (* F F) (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) (* l (* (PI) (+ (* F F) -1))) (* (PI) (+ (* F F) -1)) (+ (* F F) -1) -1 (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (* (/ (+ (* F F) -1) F) (* l (/ (PI) F))) (/ (+ (* F F) -1) F) (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/ (* (sin (* (PI) l)) -1) (* (cos (* (PI) l)) (* F F))) (* (sin (* (PI) l)) -1) (sin (* (PI) l)) (* (cos (* (PI) l)) (* F F)) (cos (* (PI) l)))
5.0ms
F
@inf
((- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (* (PI) l) (PI) l (/ (/ (tan (* l (PI))) F) F) (/ (tan (* l (PI))) F) (* l (/ (PI) F)) (/ (PI) F) F (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (/ -1 (* F F)) (tan (* (PI) l))) (/ (neg (* (PI) l)) (* F F)) (neg (* (PI) l)) (* F F) (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) (* l (* (PI) (+ (* F F) -1))) (* (PI) (+ (* F F) -1)) (+ (* F F) -1) -1 (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (* (- (PI) (/ (PI) (* F F))) l) (* (/ (+ (* F F) -1) F) (* l (/ (PI) F))) (/ (+ (* F F) -1) F) (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/ (* (sin (* (PI) l)) -1) (* (cos (* (PI) l)) (* F F))) (* (sin (* (PI) l)) -1) (sin (* (PI) l)) (* (cos (* (PI) l)) (* F F)) (cos (* (PI) l)))

rewrite161.0ms (3.4%)

Memory
20.2MiB live, 207.1MiB allocated; 39ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04683990
05143539
126703423
082743363
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
132 → 329
Calls
Call 1
Inputs
(-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (*.f64 l (/.f64 (PI.f64) F))) F))
(*.f64 (PI.f64) l)
(PI.f64)
l
(/.f64 #s(approx (/ (tan (* l (PI))) F) (*.f64 l (/.f64 (PI.f64) F))) F)
#s(approx (/ (tan (* l (PI))) F) (*.f64 l (/.f64 (PI.f64) F)))
(*.f64 l (/.f64 (PI.f64) F))
(/.f64 (PI.f64) F)
F
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
(/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F))
(neg.f64 (*.f64 (PI.f64) l))
(*.f64 F F)
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 l (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64)))) (*.f64 F F))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 l (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64)))) (*.f64 F F)))
(/.f64 (*.f64 l (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64)))) (*.f64 F F))
(*.f64 l (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64))))
(*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64)))
(+.f64 (*.f64 F F) #s(literal -1 binary64))
#s(literal -1 binary64)
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) (*.f64 l (/.f64 (PI.f64) F)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) (*.f64 l (/.f64 (PI.f64) F))))
(*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) (*.f64 l (/.f64 (PI.f64) F)))
(/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F)
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
(*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal -1 binary64))
(sin.f64 (*.f64 (PI.f64) l))
(*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F))
(cos.f64 (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (/ (sin (* l (PI))) (* F (cos (* l (PI)))))))
#s(approx (* l (/ (PI) F)) #s(hole binary64 (/ (* l (PI)) F)))
#s(approx (/ (PI) F) #s(hole binary64 (/ (PI) F)))
#s(approx F #s(hole binary64 F))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (/ (- (* (pow F 2) (* l (PI))) (/ (sin (* l (PI))) (cos (* l (PI))))) (pow F 2))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (/ (neg (* (PI) l)) (* F F)) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (* F F) #s(hole binary64 (pow F 2)))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (/ (+ (* -1 (* l (PI))) (* (pow F 2) (* l (PI)))) (pow F 2))))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) #s(hole binary64 (/ (+ (* -1 (* l (PI))) (* (pow F 2) (* l (PI)))) (pow F 2))))
#s(approx (* l (* (PI) (+ (* F F) -1))) #s(hole binary64 (* -1 (* l (PI)))))
#s(approx (* l (* (PI) (+ (* F F) -1))) #s(hole binary64 (+ (* -1 (* l (PI))) (* (pow F 2) (* l (PI))))))
#s(approx (* (PI) (+ (* F F) -1)) #s(hole binary64 (* -1 (PI))))
#s(approx (* (PI) (+ (* F F) -1)) #s(hole binary64 (+ (* -1 (PI)) (* (pow F 2) (PI)))))
#s(approx (+ (* F F) -1) #s(hole binary64 -1))
#s(approx (+ (* F F) -1) #s(hole binary64 (- (pow F 2) 1)))
#s(approx (* (/ (+ (* F F) -1) F) (* l (/ (PI) F))) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (* (/ (+ (* F F) -1) F) (* l (/ (PI) F))) #s(hole binary64 (/ (+ (* -1 (* l (PI))) (* (pow F 2) (* l (PI)))) (pow F 2))))
#s(approx (/ (+ (* F F) -1) F) #s(hole binary64 (/ -1 F)))
#s(approx (/ (+ (* F F) -1) F) #s(hole binary64 (/ (- (pow F 2) 1) F)))
#s(approx (/ (* (sin (* (PI) l)) -1) (* (cos (* (PI) l)) (* F F))) #s(hole binary64 (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI))))))))
#s(approx (* (cos (* (PI) l)) (* F F)) #s(hole binary64 (* (pow F 2) (cos (* l (PI))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (PI))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (+ (* -1 (/ (sin (* l (PI))) (* (pow F 2) (cos (* l (PI)))))) (* l (PI)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* l (PI))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (+ (* -1 (/ (* l (PI)) (pow F 2))) (* l (PI)))))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) #s(hole binary64 (* l (PI))))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) #s(hole binary64 (+ (* -1 (/ (* l (PI)) (pow F 2))) (* l (PI)))))
#s(approx (* l (* (PI) (+ (* F F) -1))) #s(hole binary64 (* (pow F 2) (* l (PI)))))
#s(approx (* l (* (PI) (+ (* F F) -1))) #s(hole binary64 (* (pow F 2) (+ (* -1 (/ (* l (PI)) (pow F 2))) (* l (PI))))))
#s(approx (* (PI) (+ (* F F) -1)) #s(hole binary64 (* (pow F 2) (PI))))
#s(approx (* (PI) (+ (* F F) -1)) #s(hole binary64 (* (pow F 2) (+ (PI) (* -1 (/ (PI) (pow F 2)))))))
#s(approx (+ (* F F) -1) #s(hole binary64 (pow F 2)))
#s(approx (+ (* F F) -1) #s(hole binary64 (* (pow F 2) (- 1 (/ 1 (pow F 2))))))
#s(approx (* (/ (+ (* F F) -1) F) (* l (/ (PI) F))) #s(hole binary64 (* l (PI))))
#s(approx (* (/ (+ (* F F) -1) F) (* l (/ (PI) F))) #s(hole binary64 (+ (* -1 (/ (* l (PI)) (pow F 2))) (* l (PI)))))
#s(approx (/ (+ (* F F) -1) F) #s(hole binary64 F))
#s(approx (/ (+ (* F F) -1) F) #s(hole binary64 (* F (- 1 (/ 1 (pow F 2))))))
#s(approx (/ (+ (* F F) -1) F) #s(hole binary64 (* -1 (* F (- (/ 1 (pow F 2)) 1)))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (PI) l) #s(hole binary64 (* l (PI))))
#s(approx l #s(hole binary64 l))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (/ (* l (PI)) (pow F 2))))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (/ (tan (* l (PI))) F) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* 1/120 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2)))))))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (/ (PI) (pow F 2))))))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (/ (* l (PI)) F)))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) F)) (* -1/2 (/ (pow (PI) 3) F)))) (/ (PI) F)))))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) F)) (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F)) (* 1/24 (/ (pow (PI) 5) F)))))) (* -1/2 (/ (pow (PI) 3) F)))) (/ (PI) F)))))
#s(approx (/ (tan (* l (PI))) F) #s(hole binary64 (* l (+ (* (pow l 2) (- (+ (* -1/6 (/ (pow (PI) 3) F)) (* (pow l 2) (- (+ (* 1/120 (/ (pow (PI) 5) F)) (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) F)) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) F)) (+ (* -1/720 (/ (pow (PI) 7) F)) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F))))))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) F)) (* 1/24 (/ (pow (PI) 5) F)))))) (* -1/2 (/ (pow (PI) 3) F)))) (/ (PI) F)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2)))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (- (+ (PI) (* (pow l 2) (- (+ (* -1/2 (/ (pow (PI) 3) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (+ (* 1/24 (/ (pow (PI) 5) (pow F 2))) (* (pow l 2) (- (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))))) (* -1/5040 (/ (pow (PI) 7) (pow F 2))))))) (* 1/120 (/ (pow (PI) 5) (pow F 2)))))) (* -1/6 (/ (pow (PI) 3) (pow F 2)))))) (/ (PI) (pow F 2))))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* -1 (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))) (* -1 (/ (PI) (pow F 2)))))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* -1 (/ (PI) (pow F 2))) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1 (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))))))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) #s(hole binary64 (* l (+ (* -1 (/ (PI) (pow F 2))) (* (pow l 2) (+ (* -1 (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* 1/120 (pow (PI) 5)) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3))))) (* 1/24 (pow (PI) 5))))) (pow F 2))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (/ (* (pow (PI) 4) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2)))))))) (* -1 (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (/ (* (pow (PI) 2) (- (* -1/6 (pow (PI) 3)) (* -1/2 (pow (PI) 3)))) (pow F 2))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))))))))))
#s(approx (neg (* (PI) l)) #s(hole binary64 (* -1 (* l (PI)))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) #s(hole binary64 (* l (- (PI) (/ (PI) (pow F 2))))))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) #s(hole binary64 (/ (* l (* (PI) (- (pow F 2) 1))) (pow F 2))))
#s(approx (* l (* (PI) (+ (* F F) -1))) #s(hole binary64 (* l (* (PI) (- (pow F 2) 1)))))
#s(approx (* (/ (+ (* F F) -1) F) (* l (/ (PI) F))) #s(hole binary64 (/ (* l (* (PI) (- (pow F 2) 1))) (pow F 2))))
#s(approx (/ (* (sin (* (PI) l)) -1) (* (cos (* (PI) l)) (* F F))) #s(hole binary64 (* -1 (/ (* l (PI)) (pow F 2)))))
#s(approx (/ (* (sin (* (PI) l)) -1) (* (cos (* (PI) l)) (* F F))) #s(hole binary64 (* l (+ (* -1 (* (pow l 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))) (* -1 (/ (PI) (pow F 2)))))))
#s(approx (/ (* (sin (* (PI) l)) -1) (* (cos (* (PI) l)) (* F F))) #s(hole binary64 (* l (+ (* -1 (/ (PI) (pow F 2))) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (* -1 (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))))))))
#s(approx (/ (* (sin (* (PI) l)) -1) (* (cos (* (PI) l)) (* F F))) #s(hole binary64 (* l (+ (* -1 (/ (PI) (pow F 2))) (* (pow l 2) (+ (* -1 (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))) (* (pow l 2) (+ (* -1 (* (pow l 2) (- (* -1/5040 (/ (pow (PI) 7) (pow F 2))) (+ (* -1/2 (* (pow (PI) 2) (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))) (+ (* -1/720 (/ (pow (PI) 7) (pow F 2))) (* 1/24 (* (pow (PI) 4) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2))))))))))) (* -1 (- (* 1/120 (/ (pow (PI) 5) (pow F 2))) (+ (* -1/2 (* (pow (PI) 2) (- (* -1/6 (/ (pow (PI) 3) (pow F 2))) (* -1/2 (/ (pow (PI) 3) (pow F 2)))))) (* 1/24 (/ (pow (PI) 5) (pow F 2))))))))))))))
#s(approx (* (sin (* (PI) l)) -1) #s(hole binary64 (* -1 (* l (PI)))))
#s(approx (* (sin (* (PI) l)) -1) #s(hole binary64 (* l (+ (* -1 (PI)) (* 1/6 (* (pow l 2) (pow (PI) 3)))))))
#s(approx (* (sin (* (PI) l)) -1) #s(hole binary64 (* l (+ (* -1 (PI)) (* (pow l 2) (+ (* -1/120 (* (pow l 2) (pow (PI) 5))) (* 1/6 (pow (PI) 3))))))))
#s(approx (* (sin (* (PI) l)) -1) #s(hole binary64 (* l (+ (* -1 (PI)) (* (pow l 2) (+ (* 1/6 (pow (PI) 3)) (* (pow l 2) (+ (* -1/120 (pow (PI) 5)) (* 1/5040 (* (pow l 2) (pow (PI) 7)))))))))))
#s(approx (sin (* (PI) l)) #s(hole binary64 (* l (PI))))
#s(approx (sin (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* -1/6 (* (pow l 2) (pow (PI) 3)))))))
#s(approx (sin (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (+ (* -1/6 (pow (PI) 3)) (* 1/120 (* (pow l 2) (pow (PI) 5)))))))))
#s(approx (sin (* (PI) l)) #s(hole binary64 (* l (+ (PI) (* (pow l 2) (+ (* -1/6 (pow (PI) 3)) (* (pow l 2) (+ (* -1/5040 (* (pow l 2) (pow (PI) 7))) (* 1/120 (pow (PI) 5))))))))))
#s(approx (* (cos (* (PI) l)) (* F F)) #s(hole binary64 (pow F 2)))
#s(approx (* (cos (* (PI) l)) (* F F)) #s(hole binary64 (+ (* -1/2 (* (pow F 2) (* (pow l 2) (pow (PI) 2)))) (pow F 2))))
#s(approx (* (cos (* (PI) l)) (* F F)) #s(hole binary64 (+ (* (pow l 2) (+ (* -1/2 (* (pow F 2) (pow (PI) 2))) (* 1/24 (* (pow F 2) (* (pow l 2) (pow (PI) 4)))))) (pow F 2))))
#s(approx (* (cos (* (PI) l)) (* F F)) #s(hole binary64 (+ (* (pow l 2) (+ (* -1/2 (* (pow F 2) (pow (PI) 2))) (* (pow l 2) (+ (* -1/720 (* (pow F 2) (* (pow l 2) (pow (PI) 6)))) (* 1/24 (* (pow F 2) (pow (PI) 4))))))) (pow F 2))))
#s(approx (cos (* (PI) l)) #s(hole binary64 1))
#s(approx (cos (* (PI) l)) #s(hole binary64 (+ 1 (* -1/2 (* (pow l 2) (pow (PI) 2))))))
#s(approx (cos (* (PI) l)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (pow (PI) 2)) (* 1/24 (* (pow l 2) (pow (PI) 4))))))))
#s(approx (cos (* (PI) l)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (pow (PI) 2)) (* (pow l 2) (+ (* -1/720 (* (pow l 2) (pow (PI) 6))) (* 1/24 (pow (PI) 4)))))))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* l (+ (PI) (* -1 (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (* (sin (* (PI) l)) -1) #s(hole binary64 (* -1 (sin (* l (PI))))))
#s(approx (sin (* (PI) l)) #s(hole binary64 (sin (* l (PI)))))
#s(approx (cos (* (PI) l)) #s(hole binary64 (cos (* l (PI)))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(hole binary64 (* -1 (* l (+ (* -1 (PI)) (/ (sin (* l (PI))) (* (pow F 2) (* l (cos (* l (PI)))))))))))
Outputs
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (ratio-of-squares.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F))) (neg.f64 (+.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F) (*.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (ratio-of-squares.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F)) (+.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F)))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F) (*.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F)))))
(-.f64 (ratio-square-sum.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F)) (/.f64 (ratio-of-squares.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F) (+.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F))))
(-.f64 (/.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F) (*.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F))))) (/.f64 (pow.f64 (/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F) (*.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F))))))
(-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F))
(*.f64 (PI.f64) l)
(*.f64 l (PI.f64))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) l))
(PI.f64)
l
(/.f64 (neg.f64 (neg.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)))) (neg.f64 (neg.f64 F)))
(/.f64 (neg.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F))) (neg.f64 F))
(/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F)
#s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F))
(*.f64 (/.f64 (PI.f64) F) l)
(*.f64 l (/.f64 (PI.f64) F))
(/.f64 (neg.f64 (*.f64 (neg.f64 (PI.f64)) l)) (neg.f64 (neg.f64 F)))
(/.f64 (*.f64 (neg.f64 (PI.f64)) l) (neg.f64 F))
(/.f64 (*.f64 (PI.f64) l) F)
(/.f64 (neg.f64 (neg.f64 (PI.f64))) (neg.f64 (neg.f64 F)))
(/.f64 (neg.f64 (PI.f64)) (neg.f64 F))
(/.f64 (PI.f64) F)
F
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F))))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)))
(*.f64 (/.f64 (*.f64 #s(literal -1 binary64) l) (neg.f64 F)) (/.f64 (PI.f64) (neg.f64 F)))
(*.f64 (/.f64 (*.f64 #s(literal -1 binary64) l) (fabs.f64 F)) (/.f64 (PI.f64) (fabs.f64 F)))
(*.f64 (/.f64 (*.f64 #s(literal -1 binary64) l) F) (/.f64 (PI.f64) F))
(*.f64 (/.f64 (neg.f64 (PI.f64)) (fabs.f64 F)) (/.f64 l (fabs.f64 F)))
(*.f64 (/.f64 (*.f64 (PI.f64) l) (neg.f64 F)) (pow.f64 F #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 (PI.f64) l) (fabs.f64 F)) (/.f64 #s(literal -1 binary64) (fabs.f64 F)))
(*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F))
(*.f64 (/.f64 (PI.f64) (fabs.f64 F)) (/.f64 (neg.f64 l) (fabs.f64 F)))
(*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 F)) (/.f64 (*.f64 (PI.f64) l) (fabs.f64 F)))
(*.f64 (/.f64 (neg.f64 (PI.f64)) F) (/.f64 l F))
(*.f64 (pow.f64 F #s(literal -1 binary64)) (/.f64 (*.f64 (PI.f64) l) (neg.f64 F)))
(*.f64 (/.f64 #s(literal -1 binary64) F) (/.f64 (*.f64 (PI.f64) l) F))
(*.f64 (*.f64 (/.f64 l F) (/.f64 (PI.f64) F)) #s(literal -1 binary64))
(*.f64 (/.f64 (PI.f64) F) (/.f64 (neg.f64 l) F))
(*.f64 (/.f64 (PI.f64) F) (/.f64 l (neg.f64 F)))
(*.f64 #s(literal -1 binary64) (*.f64 (/.f64 l F) (/.f64 (PI.f64) F)))
(*.f64 (/.f64 (*.f64 (PI.f64) l) F) (/.f64 #s(literal -1 binary64) F))
(/.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 (PI.f64)) l) F)) (neg.f64 F))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 (PI.f64)) l))) (neg.f64 (neg.f64 (*.f64 F F))))
(/.f64 (/.f64 (*.f64 (neg.f64 (PI.f64)) l) F) F)
(/.f64 (neg.f64 (*.f64 (neg.f64 (PI.f64)) l)) (neg.f64 (*.f64 F F)))
(/.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 F F))
(neg.f64 (*.f64 (/.f64 l F) (/.f64 (PI.f64) F)))
(*.f64 (*.f64 #s(literal -1 binary64) l) (PI.f64))
(*.f64 (neg.f64 (PI.f64)) l)
(*.f64 #s(literal -1 binary64) (*.f64 (PI.f64) l))
(*.f64 (*.f64 (PI.f64) l) #s(literal -1 binary64))
(*.f64 (PI.f64) (neg.f64 l))
(neg.f64 (*.f64 (PI.f64) l))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1 binary64) l)))
(*.f64 (neg.f64 (neg.f64 F)) (neg.f64 (neg.f64 F)))
(*.f64 (neg.f64 (fabs.f64 F)) (neg.f64 (fabs.f64 F)))
(*.f64 (fabs.f64 (fabs.f64 F)) (fabs.f64 (fabs.f64 F)))
(*.f64 (exp.f64 (log.f64 F)) (exp.f64 (log.f64 F)))
(*.f64 (neg.f64 F) (neg.f64 F))
(*.f64 (fabs.f64 F) (fabs.f64 F))
(*.f64 F F)
(pow.f64 (exp.f64 (log.f64 F)) #s(literal 2 binary64))
(pow.f64 (neg.f64 F) #s(literal 2 binary64))
(pow.f64 (fabs.f64 F) #s(literal 2 binary64))
(pow.f64 (*.f64 F F) #s(literal 1 binary64))
(pow.f64 F #s(literal 2 binary64))
(fabs.f64 (*.f64 F F))
(exp.f64 (*.f64 (log.f64 F) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 F) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 F) #s(literal 2 binary64))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) l) (/.f64 (PI.f64) F))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) l) (/.f64 (PI.f64) F)))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) (neg.f64 F)) (/.f64 l (neg.f64 F)))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) (fabs.f64 F)) (/.f64 l (fabs.f64 F)))
(*.f64 (/.f64 (*.f64 (PI.f64) l) (neg.f64 F)) (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (neg.f64 F)))
(*.f64 (/.f64 (*.f64 (PI.f64) l) (fabs.f64 F)) (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (fabs.f64 F)))
(*.f64 (/.f64 l (neg.f64 F)) (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) (neg.f64 F)))
(*.f64 (/.f64 l (fabs.f64 F)) (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) (fabs.f64 F)))
(*.f64 (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) l) (/.f64 (PI.f64) F))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) F) (/.f64 l F))
(*.f64 (/.f64 l F) (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) F))
(*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) (/.f64 (*.f64 (PI.f64) l) F))
(*.f64 (/.f64 (*.f64 (PI.f64) l) F) (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F))
(*.f64 l (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) (/.f64 (PI.f64) F)))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (/.f64 (*.f64 (PI.f64) l) F))) (neg.f64 F))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) l) F)) (neg.f64 F))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) l))) (neg.f64 (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 (neg.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64))) (*.f64 (neg.f64 (PI.f64)) l)) (*.f64 F F))
(/.f64 (*.f64 (neg.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64))) (*.f64 (PI.f64) l)) (*.f64 (neg.f64 F) F))
(/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (*.f64 (neg.f64 (PI.f64)) l)) (*.f64 F (neg.f64 F)))
(/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (*.f64 (PI.f64) l)) (*.f64 F F))
(/.f64 (*.f64 (*.f64 (neg.f64 (PI.f64)) l) (neg.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)))) (*.f64 F F))
(/.f64 (*.f64 (*.f64 (neg.f64 (PI.f64)) l) (+.f64 (*.f64 F F) #s(literal -1 binary64))) (*.f64 (neg.f64 F) F))
(/.f64 (*.f64 (*.f64 (PI.f64) l) (neg.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)))) (*.f64 F (neg.f64 F)))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (PI.f64)) l) F) (*.f64 F F)) (*.f64 F (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (*.f64 F (*.f64 F F)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (PI.f64)) l)) (*.f64 F F)) (*.f64 (neg.f64 (*.f64 F F)) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (*.f64 (neg.f64 (*.f64 F F)) (*.f64 F F)))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 F F)) (*.f64 (*.f64 F F) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (pow.f64 F #s(literal 4 binary64)))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) l) F) F)
(/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (/.f64 (*.f64 (PI.f64) l) F)) F)
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) l)) (neg.f64 (*.f64 F F)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) l) (*.f64 F F))
(-.f64 (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)) (/.f64 (*.f64 (neg.f64 (*.f64 F F)) (*.f64 (PI.f64) l)) (*.f64 F F)))
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 F F) l) F) (/.f64 (PI.f64) F)) (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)))
(+.f64 (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)) (*.f64 (/.f64 (*.f64 (*.f64 F F) l) F) (/.f64 (PI.f64) F)))
(*.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) l)
(*.f64 (*.f64 (PI.f64) l) (+.f64 (*.f64 F F) #s(literal -1 binary64)))
(*.f64 l (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (PI.f64)) l) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 F #s(literal 6 binary64))))) (neg.f64 (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (PI.f64)) l) #s(literal 3 binary64)) (*.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 F #s(literal 6 binary64)))) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))))
(-.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 (neg.f64 (*.f64 F F)) (*.f64 (PI.f64) l)))
(+.f64 (/.f64 (pow.f64 (*.f64 (neg.f64 (PI.f64)) l) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))))) (/.f64 (*.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 F #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))))))
(+.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))
(+.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) (*.f64 (neg.f64 (PI.f64)) l))
(*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64))
(*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64)))
(/.f64 (neg.f64 (-.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 (*.f64 (*.f64 F F) (PI.f64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (neg.f64 (PI.f64)) (*.f64 (*.f64 F F) (PI.f64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (neg.f64 (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 F F) (PI.f64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (PI.f64) (PI.f64)) (-.f64 (pow.f64 (*.f64 (*.f64 F F) (PI.f64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (PI.f64)) (*.f64 (*.f64 F F) (PI.f64)))))))
(/.f64 (-.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 (*.f64 (*.f64 F F) (PI.f64)) #s(literal 2 binary64))) (-.f64 (neg.f64 (PI.f64)) (*.f64 (*.f64 F F) (PI.f64))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (PI.f64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 F F) (PI.f64)) #s(literal 3 binary64))) (+.f64 (*.f64 (PI.f64) (PI.f64)) (-.f64 (pow.f64 (*.f64 (*.f64 F F) (PI.f64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (PI.f64)) (*.f64 (*.f64 F F) (PI.f64))))))
(-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (-.f64 (neg.f64 (PI.f64)) (*.f64 (*.f64 F F) (PI.f64)))) (/.f64 (pow.f64 (*.f64 (*.f64 F F) (PI.f64)) #s(literal 2 binary64)) (-.f64 (neg.f64 (PI.f64)) (*.f64 (*.f64 F F) (PI.f64)))))
(-.f64 (neg.f64 (PI.f64)) (*.f64 (neg.f64 (*.f64 F F)) (PI.f64)))
(+.f64 (/.f64 (pow.f64 (neg.f64 (PI.f64)) #s(literal 3 binary64)) (+.f64 (*.f64 (PI.f64) (PI.f64)) (-.f64 (pow.f64 (*.f64 (*.f64 F F) (PI.f64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (PI.f64)) (*.f64 (*.f64 F F) (PI.f64)))))) (/.f64 (pow.f64 (*.f64 (*.f64 F F) (PI.f64)) #s(literal 3 binary64)) (+.f64 (*.f64 (PI.f64) (PI.f64)) (-.f64 (pow.f64 (*.f64 (*.f64 F F) (PI.f64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (PI.f64)) (*.f64 (*.f64 F F) (PI.f64)))))))
(+.f64 (*.f64 (*.f64 F F) (PI.f64)) (neg.f64 (PI.f64)))
(+.f64 (neg.f64 (PI.f64)) (*.f64 (*.f64 F F) (PI.f64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) (+.f64 (*.f64 F F) #s(literal -1 binary64))))
(*.f64 (+.f64 F #s(literal 1 binary64)) (-.f64 F #s(literal 1 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 F #s(literal 4 binary64)) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 F F) #s(literal -1 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 F #s(literal 6 binary64)) #s(literal -1 binary64))) (neg.f64 (+.f64 (pow.f64 F #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 F F) #s(literal -1 binary64))))))
(/.f64 (-.f64 (pow.f64 F #s(literal 4 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 F F) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 F #s(literal 6 binary64)) #s(literal -1 binary64)) (+.f64 (pow.f64 F #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 F F) #s(literal -1 binary64)))))
(-.f64 (/.f64 (pow.f64 F #s(literal 4 binary64)) (-.f64 (*.f64 F F) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 F F) #s(literal -1 binary64))))
(+.f64 (/.f64 (pow.f64 F #s(literal 6 binary64)) (+.f64 (pow.f64 F #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 F F) #s(literal -1 binary64))))) (/.f64 #s(literal -1 binary64) (+.f64 (pow.f64 F #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 F F) #s(literal -1 binary64))))))
(+.f64 (*.f64 F F) #s(literal -1 binary64))
(+.f64 #s(literal -1 binary64) (*.f64 F F))
#s(literal -1 binary64)
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) l) (/.f64 (PI.f64) F))))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) l) (/.f64 (PI.f64) F)))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) (neg.f64 F)) (/.f64 l (neg.f64 F)))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) (fabs.f64 F)) (/.f64 l (fabs.f64 F)))
(*.f64 (/.f64 (*.f64 (PI.f64) l) (neg.f64 F)) (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (neg.f64 F)))
(*.f64 (/.f64 (*.f64 (PI.f64) l) (fabs.f64 F)) (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (fabs.f64 F)))
(*.f64 (/.f64 l (neg.f64 F)) (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) (neg.f64 F)))
(*.f64 (/.f64 l (fabs.f64 F)) (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) (fabs.f64 F)))
(*.f64 (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) l) (/.f64 (PI.f64) F))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) F) (/.f64 l F))
(*.f64 (/.f64 l F) (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) F))
(*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) (/.f64 (*.f64 (PI.f64) l) F))
(*.f64 (/.f64 (*.f64 (PI.f64) l) F) (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F))
(*.f64 l (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) (/.f64 (PI.f64) F)))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (/.f64 (*.f64 (PI.f64) l) F))) (neg.f64 F))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) l) F)) (neg.f64 F))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) l))) (neg.f64 (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 (neg.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64))) (*.f64 (neg.f64 (PI.f64)) l)) (*.f64 F F))
(/.f64 (*.f64 (neg.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64))) (*.f64 (PI.f64) l)) (*.f64 (neg.f64 F) F))
(/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (*.f64 (neg.f64 (PI.f64)) l)) (*.f64 F (neg.f64 F)))
(/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (*.f64 (PI.f64) l)) (*.f64 F F))
(/.f64 (*.f64 (*.f64 (neg.f64 (PI.f64)) l) (neg.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)))) (*.f64 F F))
(/.f64 (*.f64 (*.f64 (neg.f64 (PI.f64)) l) (+.f64 (*.f64 F F) #s(literal -1 binary64))) (*.f64 (neg.f64 F) F))
(/.f64 (*.f64 (*.f64 (PI.f64) l) (neg.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)))) (*.f64 F (neg.f64 F)))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (PI.f64)) l) F) (*.f64 F F)) (*.f64 F (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (*.f64 F (*.f64 F F)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (PI.f64)) l)) (*.f64 F F)) (*.f64 (neg.f64 (*.f64 F F)) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (*.f64 (neg.f64 (*.f64 F F)) (*.f64 F F)))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 F F)) (*.f64 (*.f64 F F) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (pow.f64 F #s(literal 4 binary64)))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) l) F) F)
(/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (/.f64 (*.f64 (PI.f64) l) F)) F)
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) l)) (neg.f64 (*.f64 F F)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) l) (*.f64 F F))
(-.f64 (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)) (/.f64 (*.f64 (neg.f64 (*.f64 F F)) (*.f64 (PI.f64) l)) (*.f64 F F)))
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 F F) l) F) (/.f64 (PI.f64) F)) (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)))
(+.f64 (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)) (*.f64 (/.f64 (*.f64 (*.f64 F F) l) F) (/.f64 (PI.f64) F)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)))) (neg.f64 (neg.f64 F)))
(/.f64 (+.f64 (*.f64 (*.f64 F F) F) (*.f64 F #s(literal -1 binary64))) (*.f64 F F))
(/.f64 (+.f64 (*.f64 (*.f64 F F) (neg.f64 F)) (*.f64 F #s(literal 1 binary64))) (*.f64 F (neg.f64 F)))
(/.f64 (neg.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64))) (neg.f64 F))
(/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F)
(+.f64 (/.f64 (*.f64 F F) F) (/.f64 #s(literal -1 binary64) F))
(+.f64 (/.f64 #s(literal -1 binary64) F) (/.f64 (*.f64 F F) F))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (/.f64 (/.f64 #s(literal -1 binary64) F) F) (tan.f64 (*.f64 (PI.f64) l))))
(*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 F)) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (fabs.f64 F)))
(*.f64 (/.f64 #s(literal -1 binary64) (cos.f64 (*.f64 (PI.f64) l))) (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) F)) (/.f64 (sin.f64 (*.f64 (PI.f64) l)) F))
(*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (/.f64 #s(literal -1 binary64) (cos.f64 (*.f64 (PI.f64) l))))
(*.f64 (pow.f64 F #s(literal -1 binary64)) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (neg.f64 F)))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) F) F) (tan.f64 (*.f64 (PI.f64) l)))
(*.f64 (sin.f64 (*.f64 (PI.f64) l)) (/.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
(*.f64 (/.f64 #s(literal -1 binary64) F) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) F))
(*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) F)) (/.f64 #s(literal -1 binary64) F))
(*.f64 (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (cos.f64 (*.f64 (PI.f64) l))) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (cos.f64 (*.f64 (PI.f64) l))))
(*.f64 (tan.f64 (*.f64 (PI.f64) l)) (/.f64 (/.f64 #s(literal -1 binary64) F) F))
(/.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 (neg.f64 (PI.f64)) l)) (cos.f64 (*.f64 (PI.f64) l)))) (neg.f64 (*.f64 F F)))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (tan.f64 (*.f64 (PI.f64) l)))) (neg.f64 (*.f64 F F)))
(/.f64 (neg.f64 (neg.f64 (sin.f64 (*.f64 (neg.f64 (PI.f64)) l)))) (neg.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) (sin.f64 (*.f64 (neg.f64 (PI.f64)) l))) (*.f64 F (neg.f64 (cos.f64 (*.f64 (PI.f64) l)))))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) (sin.f64 (*.f64 (PI.f64) l))) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) F))
(/.f64 (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 (neg.f64 (PI.f64)) l))) (*.f64 (*.f64 F F) (neg.f64 (cos.f64 (*.f64 (PI.f64) l)))))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (*.f64 (neg.f64 (PI.f64)) l))) (*.f64 (neg.f64 (*.f64 F F)) (neg.f64 (cos.f64 (*.f64 (PI.f64) l)))))
(/.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (*.f64 (PI.f64) l))) (*.f64 (neg.f64 (*.f64 F F)) (cos.f64 (*.f64 (PI.f64) l))))
(/.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (PI.f64)) l)) (/.f64 #s(literal -1 binary64) F)) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) l))) F))
(/.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (PI.f64)) l)) #s(literal -1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
(/.f64 (*.f64 (sin.f64 (*.f64 (neg.f64 (PI.f64)) l)) #s(literal 1 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) l))) (neg.f64 (*.f64 F F))))
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) (/.f64 #s(literal -1 binary64) F)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) F))
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (neg.f64 (*.f64 F F))))
(/.f64 (/.f64 (sin.f64 (*.f64 (neg.f64 (PI.f64)) l)) (cos.f64 (*.f64 (PI.f64) l))) (*.f64 F F))
(/.f64 (*.f64 #s(literal -1 binary64) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F))
(/.f64 (neg.f64 (sin.f64 (*.f64 (neg.f64 (PI.f64)) l))) (neg.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
(/.f64 (sin.f64 (*.f64 (neg.f64 (PI.f64)) l)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
(neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (cos.f64 (*.f64 (PI.f64) l))))
(*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 (PI.f64) l)))
(neg.f64 (sin.f64 (*.f64 (PI.f64) l)))
(sin.f64 (+.f64 (*.f64 (PI.f64) l) (PI.f64)))
(sin.f64 (*.f64 (neg.f64 (PI.f64)) l))
(cos.f64 (+.f64 (*.f64 (PI.f64) l) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (*.f64 (PI.f64) l))
(*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F))
(*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) l)) F) F)
(*.f64 (*.f64 F F) (cos.f64 (*.f64 (PI.f64) l)))
(sin.f64 (+.f64 (*.f64 (neg.f64 (PI.f64)) l) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) l) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 (neg.f64 (PI.f64)) l)))
(cos.f64 (*.f64 (neg.f64 (PI.f64)) l))
(cos.f64 (*.f64 (PI.f64) l))
(+.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (*.f64 (/.f64 (/.f64 #s(literal -1 binary64) F) F) (tan.f64 (*.f64 (PI.f64) l))))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
#s(approx (/ (/ (tan (* l (PI))) F) F) (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (cos.f64 (*.f64 (PI.f64) l))))
#s(approx (/ (tan (* l (PI))) F) (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) F)))
#s(approx (* l (/ (PI) F)) (/.f64 (*.f64 (PI.f64) l) F))
#s(approx (/ (PI) F) (/.f64 (PI.f64) F))
#s(approx F F)
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (/.f64 (/.f64 #s(literal -1 binary64) F) F) (tan.f64 (*.f64 (PI.f64) l))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (/.f64 (/.f64 #s(literal -1 binary64) F) F) (tan.f64 (*.f64 (PI.f64) l))))
#s(approx (/ (neg (* (PI) l)) (* F F)) (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)))
#s(approx (* F F) (*.f64 F F))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) l) (/.f64 (PI.f64) F)))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) l) (/.f64 (PI.f64) F)))
#s(approx (* l (* (PI) (+ (* F F) -1))) (*.f64 (neg.f64 (PI.f64)) l))
#s(approx (* l (* (PI) (+ (* F F) -1))) (*.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) l))
#s(approx (* (PI) (+ (* F F) -1)) (neg.f64 (PI.f64)))
#s(approx (* (PI) (+ (* F F) -1)) (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)))
#s(approx (+ (* F F) -1) #s(literal -1 binary64))
#s(approx (+ (* F F) -1) (-.f64 (*.f64 F F) #s(literal 1 binary64)))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) l) (/.f64 (PI.f64) F)))
#s(approx (/ (+ (* F F) -1) F) (/.f64 #s(literal -1 binary64) F))
#s(approx (/ (+ (* F F) -1) F) (/.f64 (-.f64 (*.f64 F F) #s(literal 1 binary64)) F))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (/.f64 (/.f64 #s(literal -1 binary64) F) F) (tan.f64 (*.f64 (PI.f64) l))))
#s(approx (* (cos (* (PI) l)) (* F F)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (+.f64 (*.f64 (/.f64 (/.f64 #s(literal -1 binary64) F) F) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 (PI.f64) l)))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (+.f64 (*.f64 (/.f64 (/.f64 #s(literal -1 binary64) F) F) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 (PI.f64) l)))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (PI.f64) l))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (+.f64 (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)) (*.f64 (PI.f64) l)))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) (*.f64 (PI.f64) l))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) (+.f64 (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)) (*.f64 (PI.f64) l)))
#s(approx (* l (* (PI) (+ (* F F) -1))) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))
#s(approx (* l (* (PI) (+ (* F F) -1))) (*.f64 (+.f64 (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)) (*.f64 (PI.f64) l)) (*.f64 F F)))
#s(approx (* (PI) (+ (* F F) -1)) (*.f64 (*.f64 F F) (PI.f64)))
#s(approx (* (PI) (+ (* F F) -1)) (*.f64 (+.f64 (/.f64 (neg.f64 (PI.f64)) (*.f64 F F)) (PI.f64)) (*.f64 F F)))
#s(approx (+ (* F F) -1) (*.f64 F F))
#s(approx (+ (* F F) -1) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 F #s(literal -2 binary64))) (*.f64 F F)))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) (*.f64 (PI.f64) l))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) (+.f64 (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)) (*.f64 (PI.f64) l)))
#s(approx (/ (+ (* F F) -1) F) F)
#s(approx (/ (+ (* F F) -1) F) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 F #s(literal -2 binary64))) F))
#s(approx (/ (+ (* F F) -1) F) (neg.f64 (*.f64 (-.f64 (pow.f64 F #s(literal -2 binary64)) #s(literal 1 binary64)) F)))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (*.f64 (-.f64 (PI.f64) (/.f64 (/.f64 (PI.f64) F) F)) l))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/3 binary64)) (*.f64 l l)) (PI.f64)) (/.f64 (/.f64 (PI.f64) F) F)) l))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F)) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (/.f64 (PI.f64) F) F)) l))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F)) (*.f64 (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal -1/720 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 F F)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/24 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)))) (*.f64 #s(literal -1/5040 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F))) (*.f64 l l))) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (/.f64 (PI.f64) F) F)) l))
#s(approx (* (PI) l) (*.f64 (PI.f64) l))
#s(approx l l)
#s(approx (/ (/ (tan (* l (PI))) F) F) (*.f64 (/.f64 l F) (/.f64 (PI.f64) F)))
#s(approx (/ (/ (tan (* l (PI))) F) F) (*.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (/.f64 (PI.f64) F) F)) l))
#s(approx (/ (/ (tan (* l (PI))) F) F) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 F F)) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 l l)) (/.f64 (/.f64 (PI.f64) F) F)) l))
#s(approx (/ (/ (tan (* l (PI))) F) F) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 (PI.f64) (PI.f64))))) (*.f64 F F)) (-.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F) #s(literal -1/720 binary64)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 l l)) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F))) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 l l)) (/.f64 (/.f64 (PI.f64) F) F)) l))
#s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F))
#s(approx (/ (tan (* l (PI))) F) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F)) l))
#s(approx (/ (tan (* l (PI))) F) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) F) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal -1/6 binary64))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal -1/2 binary64))) (*.f64 l l)) (/.f64 (PI.f64) F)) l))
#s(approx (/ (tan (* l (PI))) F) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 (PI.f64) (PI.f64))))) F) (/.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64)))) (*.f64 #s(literal -1/720 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)))) F)) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) F) #s(literal 1/120 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) F)) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal -1/6 binary64))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal -1/2 binary64))) (*.f64 l l)) (/.f64 (PI.f64) F)) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (/.f64 (PI.f64) F) F)) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/3 binary64)) (*.f64 l l)) (PI.f64)) (/.f64 (/.f64 (PI.f64) F) F)) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F)) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (/.f64 (PI.f64) F) F)) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 F F)) (*.f64 (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal -1/720 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 F F)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/24 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)))) (*.f64 #s(literal -1/5040 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F))) (*.f64 l l))) (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) F))) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F))) (*.f64 l l)) (PI.f64)) (/.f64 (/.f64 (PI.f64) F) F)) l))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (/.f64 (PI.f64) F) F))) l))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 F F)) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)))) (*.f64 l l)) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 F F))) (neg.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 (PI.f64) (PI.f64))))) (*.f64 F F)) (-.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F) #s(literal -1/720 binary64)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 l l)))) (*.f64 l l)) (neg.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)))) (*.f64 l l)) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l))
#s(approx (neg (* (PI) l)) (*.f64 (neg.f64 (PI.f64)) l))
#s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (-.f64 (PI.f64) (/.f64 (/.f64 (PI.f64) F) F)) l))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 F F) #s(literal 1 binary64)) (PI.f64)) F) (/.f64 l F)))
#s(approx (* l (* (PI) (+ (* F F) -1))) (*.f64 (*.f64 (-.f64 (*.f64 F F) #s(literal 1 binary64)) (PI.f64)) l))
#s(approx (/ (* l (* (PI) (+ (* F F) -1))) (* F F)) (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 F F) #s(literal 1 binary64)) (PI.f64)) F) (/.f64 l F)))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (/.f64 (PI.f64) F) F))) l))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 F F)) (*.f64 l l)) (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)))) (*.f64 l l)) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l))
#s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 F F))) (neg.f64 (*.f64 (-.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/5040 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal 1/3 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))) (*.f64 (PI.f64) (PI.f64))))) (*.f64 F F)) (-.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 7/2 binary64)) F) #s(literal -1/720 binary64)) (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) (*.f64 l l)))) (*.f64 l l)) (neg.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) F) #s(literal 1/3 binary64)))) (*.f64 l l)) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l))
#s(approx (* (sin (* (PI) l)) -1) (*.f64 (neg.f64 (PI.f64)) l))
#s(approx (* (sin (* (PI) l)) -1) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 3 binary64))) (neg.f64 (PI.f64))) l))
#s(approx (* (sin (* (PI) l)) -1) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/120 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 l l)) (neg.f64 (PI.f64))) l))
#s(approx (* (sin (* (PI) l)) -1) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/5040 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal -1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 l l)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 l l)) (neg.f64 (PI.f64))) l))
#s(approx (sin (* (PI) l)) (*.f64 (PI.f64) l))
#s(approx (sin (* (PI) l)) (*.f64 (-.f64 (PI.f64) (*.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 3 binary64)))) l))
#s(approx (sin (* (PI) l)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64))) (*.f64 (*.f64 #s(literal -1/120 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 l l)) (PI.f64)) l))
#s(approx (sin (* (PI) l)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal -1/120 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (*.f64 l l)) (PI.f64)) l))
#s(approx (* (cos (* (PI) l)) (* F F)) (*.f64 F F))
#s(approx (* (cos (* (PI) l)) (* F F)) (+.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (PI.f64) l) F) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 F F)))
#s(approx (* (cos (* (PI) l)) (* F F)) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (*.f64 F l) #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1/24 binary64)) (*.f64 (pow.f64 (*.f64 (PI.f64) F) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 l l)) (*.f64 F F)))
#s(approx (* (cos (* (PI) l)) (* F F)) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 F F)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 (*.f64 F l) #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 6 binary64))) #s(literal -1/720 binary64))) (*.f64 l l)) (*.f64 (pow.f64 (*.f64 (PI.f64) F) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 l l)) (*.f64 F F)))
#s(approx (cos (* (PI) l)) #s(literal 1 binary64))
#s(approx (cos (* (PI) l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)))))
#s(approx (cos (* (PI) l)) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64))) (*.f64 l l)) #s(literal 1 binary64)))
#s(approx (cos (* (PI) l)) (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 l l)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal -1/24 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 l l)) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/2 binary64))) (*.f64 l l)) #s(literal 1 binary64)))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (*.f64 (+.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 F F) l)) (tan.f64 (*.f64 (PI.f64) l))) (PI.f64)) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (+.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 F F) l)) (tan.f64 (*.f64 (PI.f64) l))) (PI.f64)) l))
#s(approx (* (sin (* (PI) l)) -1) (sin.f64 (*.f64 (neg.f64 (PI.f64)) l)))
#s(approx (sin (* (PI) l)) (sin.f64 (*.f64 (PI.f64) l)))
#s(approx (cos (* (PI) l)) (cos.f64 (*.f64 (PI.f64) l)))
#s(approx (- (* (PI) l) (/ (/ (tan (* l (PI))) F) F)) (neg.f64 (*.f64 (+.f64 (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) l)) (neg.f64 (PI.f64))) l)))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (neg.f64 (*.f64 (+.f64 (/.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) l)) (neg.f64 (PI.f64))) l)))

eval176.0ms (3.7%)

Memory
13.5MiB live, 292.4MiB allocated; 42ms collecting garbage
Samples
76.0ms1 170×0valid
6.0ms110×0invalid
Compiler

Compiled 16 741 to 1 761 computations (89.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 39.0ms
ival-mult: 25.0ms (64.7% of total)
ival-div: 10.0ms (25.9% of total)
ival-add: 2.0ms (5.2% of total)
ival-true: 1.0ms (2.6% of total)
ival-assert: 1.0ms (2.6% of total)
adjust: 0.0ms (0% of total)

prune166.0ms (3.5%)

Memory
-0.1MiB live, 189.9MiB allocated; 21ms collecting garbage
Pruning

24 alts after pruning (19 fresh and 5 done)

PrunedKeptTotal
New41313426
Fresh6612
Picked415
Done044
Total42324447
Accuracy
99.7%
Counts
447 → 24
Alt Table
Click to see full alt table
StatusAccuracyProgram
21.8%
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F) (*.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F)))))
54.8%
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))) l))))
22.0%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal -1 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 (PI.f64)) l) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 F F))))
18.8%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal -1 binary64)) (*.f64 (cos.f64 (log.f64 (pow.f64 (exp.f64 (PI.f64)) l))) (*.f64 F F))))
21.0%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/.f64 (sin.f64 (*.f64 (neg.f64 (PI.f64)) l)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
✓20.5%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
3.8%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (log.f64 (pow.f64 (exp.f64 (PI.f64)) l)))))
✓63.6%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
✓77.0%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
18.8%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (/.f64 (neg.f64 (PI.f64)) F) F)) l))
42.5%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (-.f64 (*.f64 (*.f64 F F) (PI.f64)) (PI.f64)) (*.f64 F F))) l))
✓18.8%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l))
23.5%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (/.f64 (*.f64 (neg.f64 (PI.f64)) l) F) F)))
✓19.4%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
23.5%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (/.f64 (neg.f64 (PI.f64)) F) (/.f64 l F))))
17.1%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (PI.f64)) l) F) (*.f64 F F)) (*.f64 F (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (*.f64 F (*.f64 F F)))))
12.6%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 F F)) (*.f64 (*.f64 F F) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (pow.f64 F #s(literal 4 binary64)))))
36.5%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 l (*.f64 (PI.f64) #s(approx (+ (* F F) -1) (*.f64 F F)))) (*.f64 F F))))
36.8%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 #s(approx (* (* l (PI)) (+ -1 (* F F))) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64))) (*.f64 F F))))
29.8%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 #s(approx (* l (* (PI) (+ (* F F) -1))) (*.f64 (+.f64 (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)) (*.f64 (PI.f64) l)) (*.f64 F F))) (*.f64 F F))))
37.7%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (+.f64 (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (/.f64 (*.f64 (*.f64 F F) l) F) (/.f64 (PI.f64) F)))))
45.5%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) F) (/.f64 l F))))
23.5%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 #s(approx (+ (* F F) -1) #s(literal -1 binary64)) F) (*.f64 l (/.f64 (PI.f64) F)))))
55.0%
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 #s(approx (/ (+ (* F F) -1) F) F) (*.f64 l (/.f64 (PI.f64) F)))))
Samples
70.0ms737×0valid
18.0ms287×0invalid
Compiler

Compiled 2 699 to 858 computations (68.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 56.0ms
ival-div: 33.0ms (58.9% of total)
ival-mult: 21.0ms (37.5% of total)
ival-true: 1.0ms (1.8% of total)
ival-assert: 1.0ms (1.8% of total)
adjust: 0.0ms (0% of total)

regimes101.0ms (2.1%)

Memory
14.9MiB live, 149.3MiB allocated; 33ms collecting garbage
Counts
54 → 2
Calls
Call 1
Inputs
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 #s(approx (/ (+ (* F F) -1) F) F) (*.f64 l (/.f64 (PI.f64) F)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (/.f64 (neg.f64 (PI.f64)) F) (/.f64 l F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (/.f64 (*.f64 (neg.f64 (PI.f64)) l) F) F)))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (/.f64 (neg.f64 (PI.f64)) F) F)) l))
(-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (tan (log (pow (exp (PI)) l))) (*.f64 l (PI.f64))) (*.f64 F F)))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (/.f64 (PI.f64) F) F)) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 #s(approx (* (* l (PI)) (+ -1 (* F F))) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 l (*.f64 (PI.f64) #s(approx (+ (* F F) -1) (*.f64 F F)))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 #s(approx (+ (* F F) -1) #s(literal -1 binary64)) F) (*.f64 l (/.f64 (PI.f64) F)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (*.f64 (/.f64 (PI.f64) F) (/.f64 #s(literal -1 binary64) F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 l (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64)))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 (*.f64 l (PI.f64)) (+.f64 #s(literal -1 binary64) (*.f64 F F))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (-.f64 (*.f64 (*.f64 F F) (PI.f64)) (PI.f64)) (*.f64 F F))) l))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) #s(approx (tan (* (PI) l)) (*.f64 (PI.f64) l))))
(-.f64 (*.f64 (PI.f64) l) #s(approx (/ (/ (tan (* l (PI))) F) F) (*.f64 (/.f64 l F) (/.f64 (PI.f64) F))))
(-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (*.f64 l (/.f64 (PI.f64) F))) F))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 l F) (/.f64 (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64))) F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) F) (/.f64 l F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) (*.f64 l (/.f64 (PI.f64) F)))))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) #s(approx (/ (tan (* (PI) l)) (neg F)) (/.f64 (neg.f64 (*.f64 l (PI.f64))) F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (+.f64 (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (/.f64 (*.f64 (*.f64 F F) l) F) (/.f64 (PI.f64) F)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 #s(approx (* l (* (PI) (+ (* F F) -1))) (*.f64 (+.f64 (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)) (*.f64 (PI.f64) l)) (*.f64 F F))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (PI.f64)) l) F) (*.f64 F F)) (*.f64 F (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (*.f64 F (*.f64 F F)))))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))) l))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
(-.f64 (*.f64 (PI.f64) l) (/.f64 (*.f64 #s(literal 1 binary64) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
(-.f64 (*.f64 (PI.f64) l) (/.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) F) F))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (+.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 F F) l)) (tan.f64 (*.f64 (PI.f64) l))) (PI.f64)) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
(-.f64 (*.f64 (PI.f64) l) (/.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) (tan.f64 (*.f64 l (PI.f64)))) (neg.f64 F)))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) (/.f64 (tan.f64 (*.f64 (PI.f64) l)) (neg.f64 F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (*.f64 F F) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (pow.f64 F #s(literal 4 binary64)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 F F)) (*.f64 (*.f64 F F) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (pow.f64 F #s(literal 4 binary64)))))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))) l))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/.f64 (sin.f64 (*.f64 (neg.f64 (PI.f64)) l)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal -1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (neg F)) (/ (tan (* (PI) l)) (neg F)))) (neg.f64 (/.f64 (/.f64 (sin.f64 (*.f64 l (PI.f64))) (*.f64 F F)) (cos.f64 (*.f64 l (PI.f64))))))
(-.f64 (*.f64 (PI.f64) l) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal -1 binary64)) (*.f64 (sin.f64 (+.f64 (*.f64 (neg.f64 (PI.f64)) l) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)) #s(literal 2 binary64))) (-.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (*.f64 F F))))
(-.f64 (*.f64 (PI.f64) l) (/.f64 (*.f64 (pow.f64 F #s(literal -1 binary64)) (sin.f64 (*.f64 (PI.f64) l))) (*.f64 F (cos.f64 (*.f64 (PI.f64) l)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F) (*.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (/.f64 (*.f64 (PI.f64) l) F)) F)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (log.f64 (pow.f64 (exp.f64 (PI.f64)) l)))))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (log.f64 (pow.f64 (exp.f64 (PI.f64)) l)))))
(/.f64 (-.f64 (pow.f64 (*.f64 l (PI.f64)) #s(literal 2 binary64)) (ratio-of-squares.f64 (tan.f64 (*.f64 l (PI.f64))) (*.f64 F F))) (+.f64 (*.f64 l (PI.f64)) (*.f64 (tan.f64 (*.f64 l (PI.f64))) (pow.f64 F #s(literal -2 binary64)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) l)) #s(literal -1 binary64)) (*.f64 (cos.f64 (log.f64 (pow.f64 (exp.f64 (PI.f64)) l))) (*.f64 F F))))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 2 binary64))) (+.f64 (*.f64 (PI.f64) l) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (ratio-of-squares.f64 (*.f64 #s(literal 1 binary64) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l))) F) (*.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal -1 binary64) F) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) F) #s(literal 1/3 binary64))) (/.f64 (PI.f64) F))) l)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 3 binary64)) (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (PI.f64) l) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (PI.f64) l) (*.f64 (tan.f64 (*.f64 (PI.f64) l)) (pow.f64 F #s(literal -2 binary64)))))))
Outputs
(-.f64 (*.f64 (PI.f64) l) (/.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) F) F))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
Calls

6 calls:

23.0ms
l
20.0ms
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
18.0ms
(*.f64 (PI.f64) l)
13.0ms
F
12.0ms
(/.f64 #s(literal 1 binary64) (*.f64 F F))
Results
AccuracySegmentsBranch
78.7%2(*.f64 F F)
78.7%2(/.f64 #s(literal 1 binary64) (*.f64 F F))
99.4%2(*.f64 (PI.f64) l)
87.4%2(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
78.7%2F
99.4%2l
Compiler

Compiled 27 to 26 computations (3.7% saved)

regimes27.0ms (0.6%)

Memory
-17.6MiB live, 27.4MiB allocated; 6ms collecting garbage
Counts
31 → 2
Calls
Call 1
Inputs
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 #s(approx (/ (+ (* F F) -1) F) F) (*.f64 l (/.f64 (PI.f64) F)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (/.f64 (neg.f64 (PI.f64)) F) (/.f64 l F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (/.f64 (*.f64 (neg.f64 (PI.f64)) l) F) F)))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (/.f64 (neg.f64 (PI.f64)) F) F)) l))
(-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (tan (log (pow (exp (PI)) l))) (*.f64 l (PI.f64))) (*.f64 F F)))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (/.f64 (PI.f64) F) F)) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 #s(approx (* (* l (PI)) (+ -1 (* F F))) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 l (*.f64 (PI.f64) #s(approx (+ (* F F) -1) (*.f64 F F)))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 #s(approx (+ (* F F) -1) #s(literal -1 binary64)) F) (*.f64 l (/.f64 (PI.f64) F)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (*.f64 (/.f64 (PI.f64) F) (/.f64 #s(literal -1 binary64) F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 l (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64)))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 (*.f64 l (PI.f64)) (+.f64 #s(literal -1 binary64) (*.f64 F F))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (-.f64 (*.f64 (*.f64 F F) (PI.f64)) (PI.f64)) (*.f64 F F))) l))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) #s(approx (tan (* (PI) l)) (*.f64 (PI.f64) l))))
(-.f64 (*.f64 (PI.f64) l) #s(approx (/ (/ (tan (* l (PI))) F) F) (*.f64 (/.f64 l F) (/.f64 (PI.f64) F))))
(-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (*.f64 l (/.f64 (PI.f64) F))) F))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 l F) (/.f64 (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64))) F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) (PI.f64)) F) (/.f64 l F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 (+.f64 (*.f64 F F) #s(literal -1 binary64)) F) (*.f64 l (/.f64 (PI.f64) F)))))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) #s(approx (/ (tan (* (PI) l)) (neg F)) (/.f64 (neg.f64 (*.f64 l (PI.f64))) F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (+.f64 (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)) (*.f64 (/.f64 (*.f64 (*.f64 F F) l) F) (/.f64 (PI.f64) F)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 #s(approx (* l (* (PI) (+ (* F F) -1))) (*.f64 (+.f64 (*.f64 (/.f64 (PI.f64) (neg.f64 F)) (/.f64 l F)) (*.f64 (PI.f64) l)) (*.f64 F F))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (PI.f64)) l) F) (*.f64 F F)) (*.f64 F (*.f64 (*.f64 (*.f64 F F) l) (PI.f64)))) (*.f64 F (*.f64 F F)))))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 F)) #s(approx (/ (tan (* (PI) l)) (neg F)) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) F) #s(literal 1/3 binary64)) (*.f64 l l)) (/.f64 (PI.f64) F))) l))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
(-.f64 (*.f64 (PI.f64) l) (/.f64 (*.f64 #s(literal 1 binary64) (tan.f64 (*.f64 (PI.f64) l))) (*.f64 F F)))
Outputs
(-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (*.f64 l (/.f64 (PI.f64) F))) F))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
Calls

2 calls:

8.0ms
l
8.0ms
(*.f64 (PI.f64) l)
Results
AccuracySegmentsBranch
98.9%2(*.f64 (PI.f64) l)
98.9%2l
Compiler

Compiled 4 to 6 computations (-50% saved)

regimes11.0ms (0.2%)

Memory
19.5MiB live, 19.5MiB allocated; 0ms collecting garbage
Counts
19 → 2
Calls
Call 1
Inputs
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 #s(approx (/ (+ (* F F) -1) F) F) (*.f64 l (/.f64 (PI.f64) F)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (/.f64 (neg.f64 (PI.f64)) F) (/.f64 l F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (/.f64 (*.f64 (neg.f64 (PI.f64)) l) F) F)))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (/.f64 (neg.f64 (PI.f64)) F) F)) l))
(-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (tan (log (pow (exp (PI)) l))) (*.f64 l (PI.f64))) (*.f64 F F)))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (/.f64 (PI.f64) F) F)) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 #s(approx (* (* l (PI)) (+ -1 (* F F))) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 l (*.f64 (PI.f64) #s(approx (+ (* F F) -1) (*.f64 F F)))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 #s(approx (+ (* F F) -1) #s(literal -1 binary64)) F) (*.f64 l (/.f64 (PI.f64) F)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (*.f64 (/.f64 (PI.f64) F) (/.f64 #s(literal -1 binary64) F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 l (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64)))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 (*.f64 l (PI.f64)) (+.f64 #s(literal -1 binary64) (*.f64 F F))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (-.f64 (*.f64 (*.f64 F F) (PI.f64)) (PI.f64)) (*.f64 F F))) l))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) #s(approx (tan (* (PI) l)) (*.f64 (PI.f64) l))))
(-.f64 (*.f64 (PI.f64) l) #s(approx (/ (/ (tan (* l (PI))) F) F) (*.f64 (/.f64 l F) (/.f64 (PI.f64) F))))
Outputs
(-.f64 (*.f64 (PI.f64) l) #s(approx (/ (/ (tan (* l (PI))) F) F) (*.f64 (/.f64 l F) (/.f64 (PI.f64) F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
Calls

2 calls:

5.0ms
l
5.0ms
(*.f64 (PI.f64) l)
Results
AccuracySegmentsBranch
98.8%2(*.f64 (PI.f64) l)
98.8%2l
Compiler

Compiled 4 to 6 computations (-50% saved)

regimes21.0ms (0.4%)

Memory
-57.9MiB live, 19.0MiB allocated; 15ms collecting garbage
Counts
18 → 2
Calls
Call 1
Inputs
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 #s(approx (/ (+ (* F F) -1) F) F) (*.f64 l (/.f64 (PI.f64) F)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (/.f64 (neg.f64 (PI.f64)) F) (/.f64 l F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (/.f64 (*.f64 (neg.f64 (PI.f64)) l) F) F)))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (/.f64 (neg.f64 (PI.f64)) F) F)) l))
(-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (tan (log (pow (exp (PI)) l))) (*.f64 l (PI.f64))) (*.f64 F F)))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (/.f64 (PI.f64) F) F)) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 #s(approx (* (* l (PI)) (+ -1 (* F F))) (*.f64 (*.f64 (*.f64 F F) l) (PI.f64))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 l (*.f64 (PI.f64) #s(approx (+ (* F F) -1) (*.f64 F F)))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 (/.f64 #s(approx (+ (* F F) -1) #s(literal -1 binary64)) F) (*.f64 l (/.f64 (PI.f64) F)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (*.f64 (/.f64 (PI.f64) F) (/.f64 #s(literal -1 binary64) F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 l (*.f64 (PI.f64) (+.f64 (*.f64 F F) #s(literal -1 binary64)))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (/.f64 (*.f64 (*.f64 l (PI.f64)) (+.f64 #s(literal -1 binary64) (*.f64 F F))) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (-.f64 (*.f64 (*.f64 F F) (PI.f64)) (PI.f64)) (*.f64 F F))) l))
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) #s(approx (tan (* (PI) l)) (*.f64 (PI.f64) l))))
Outputs
(-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (tan (log (pow (exp (PI)) l))) (*.f64 l (PI.f64))) (*.f64 F F)))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
Calls

2 calls:

15.0ms
l
5.0ms
(*.f64 (PI.f64) l)
Results
AccuracySegmentsBranch
94.7%2(*.f64 (PI.f64) l)
94.7%2l
Compiler

Compiled 4 to 6 computations (-50% saved)

regimes6.0ms (0.1%)

Memory
16.0MiB live, 16.0MiB allocated; 0ms collecting garbage
Counts
8 → 2
Calls
Call 1
Inputs
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 #s(approx (/ (+ (* F F) -1) F) F) (*.f64 l (/.f64 (PI.f64) F)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (*.f64 (/.f64 (neg.f64 (PI.f64)) F) (/.f64 l F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (/.f64 (*.f64 (neg.f64 (PI.f64)) l) F) F)))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (/.f64 (neg.f64 (PI.f64)) F) F)) l))
Outputs
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
Calls

2 calls:

3.0ms
(*.f64 (PI.f64) l)
3.0ms
l
Results
AccuracySegmentsBranch
94.1%2(*.f64 (PI.f64) l)
94.1%2l
Compiler

Compiled 4 to 6 computations (-50% saved)

regimes21.0ms (0.4%)

Memory
-27.6MiB live, 19.3MiB allocated; 4ms collecting garbage
Counts
4 → 2
Calls
Call 1
Inputs
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 #s(approx (/ (+ (* F F) -1) F) F) (*.f64 l (/.f64 (PI.f64) F)))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 #s(approx (- (PI) (/ (PI) (* F F))) (/.f64 (neg.f64 (PI.f64)) (*.f64 F F))) l))
Outputs
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F))))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
Calls

3 calls:

17.0ms
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
2.0ms
l
2.0ms
(*.f64 (PI.f64) l)
Results
AccuracySegmentsBranch
82.3%2(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
77.0%1(*.f64 (PI.f64) l)
77.0%1l
Compiler

Compiled 18 to 16 computations (11.1% saved)

regimes7.0ms (0.2%)

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

Total -14.1b remaining (-95.9%)

Threshold costs -14.1b (-95.9%)

Counts
2 → 1
Calls
Call 1
Inputs
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (- (PI) (/ (PI) (* F F))) l) (*.f64 #s(approx (/ (+ (* F F) -1) F) F) (*.f64 l (/.f64 (PI.f64) F)))))
Outputs
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
Calls

6 calls:

1.0ms
(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
1.0ms
(*.f64 (PI.f64) l)
1.0ms
F
1.0ms
l
1.0ms
(/.f64 #s(literal 1 binary64) (*.f64 F F))
Results
AccuracySegmentsBranch
77.0%1(*.f64 (PI.f64) l)
77.0%1l
77.0%1(*.f64 F F)
77.0%1(/.f64 #s(literal 1 binary64) (*.f64 F F))
77.0%1F
77.0%1(-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l))))
Compiler

Compiled 27 to 26 computations (3.7% saved)

bsearch17.0ms (0.4%)

Memory
19.7MiB live, 19.7MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
15.0ms
40751481832.36807
5988048088796.603
Samples
11.0ms112×0valid
Compiler

Compiled 227 to 183 computations (19.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 8.0ms
ival-tanu: 4.0ms (49.7% of total)
ival-mult: 2.0ms (24.9% of total)
ival-div: 1.0ms (12.4% of total)
ival-pi: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-sub: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch15.0ms (0.3%)

Memory
-37.2MiB live, 9.5MiB allocated; 3ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
14.0ms
40751481832.36807
5988048088796.603
Samples
5.0ms48×0valid
Compiler

Compiled 269 to 211 computations (21.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 3.0ms
ival-tanu: 2.0ms (57.2% of total)
ival-mult: 1.0ms (28.6% of total)
ival-pi: 0.0ms (0% of total)
ival-div: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-sub: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
1.3MiB live, 1.3MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
40751481832.36807
5988048088796.603
Compiler

Compiled 283 to 218 computations (23% saved)

bsearch1.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
40751481832.36807
5988048088796.603
Compiler

Compiled 269 to 218 computations (19% saved)

bsearch1.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
40751481832.36807
5988048088796.603
Compiler

Compiled 311 to 232 computations (25.4% saved)

bsearch0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated; 0ms collecting garbage
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
-2.604438548955851e-197
1.7615238491285113e-302
Compiler

Compiled 17 to 15 computations (11.8% saved)

simplify54.0ms (1.1%)

Memory
15.1MiB live, 60.9MiB allocated; 4ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
066289
1121270
2260270
3604270
42142270
57102270
Stop Event
1×node limit
Calls
Call 1
Inputs
(if (<=.f64 l #s(literal 5800000000000 binary64)) (-.f64 (*.f64 (PI.f64) l) (/.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) F) F)) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l)))
(if (<=.f64 l #s(literal 3800000000000 binary64)) (-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (*.f64 l (/.f64 (PI.f64) F))) F)) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l)))
(if (<=.f64 l #s(literal 3800000000000 binary64)) (-.f64 (*.f64 (PI.f64) l) #s(approx (/ (/ (tan (* l (PI))) F) F) (*.f64 (/.f64 l F) (/.f64 (PI.f64) F)))) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l)))
(if (<=.f64 l #s(literal 3800000000000 binary64)) (-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (tan (log (pow (exp (PI)) l))) (*.f64 l (PI.f64))) (*.f64 F F))) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l)))
(if (<=.f64 l #s(literal 3800000000000 binary64)) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l)) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l)))
(if (<=.f64 (-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l)))) #s(literal -3366486976990959/168324348849547952231711676252164117297610873690341563503944988898199428937506586307637329160882830439263455003397702966816621832005881723620090072660860187198567157476110227142133240252298326952681384055545004032 binary64)) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l)))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))
Outputs
(if (<=.f64 l #s(literal 5800000000000 binary64)) (-.f64 (*.f64 (PI.f64) l) (/.f64 (/.f64 (tan.f64 (*.f64 l (PI.f64))) F) F)) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l)))
(if (<=.f64 l #s(literal 3800000000000 binary64)) (-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (/ (tan (* l (PI))) F) (*.f64 l (/.f64 (PI.f64) F))) F)) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l)))
(if (<=.f64 l #s(literal 3800000000000 binary64)) (-.f64 (*.f64 (PI.f64) l) #s(approx (/ (/ (tan (* l (PI))) F) F) (*.f64 (/.f64 l F) (/.f64 (PI.f64) F)))) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l)))
(if (<=.f64 l #s(literal 3800000000000 binary64)) (-.f64 (*.f64 (PI.f64) l) (/.f64 #s(approx (tan (log (pow (exp (PI)) l))) (*.f64 l (PI.f64))) (*.f64 F F))) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l)))
(if (<=.f64 l #s(literal 3800000000000 binary64)) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (-.f64 (PI.f64) (/.f64 (PI.f64) (*.f64 F F))) l)) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l)))
(if (<=.f64 (-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l)))) #s(literal -3366486976990959/168324348849547952231711676252164117297610873690341563503944988898199428937506586307637329160882830439263455003397702966816621832005881723620090072660860187198567157476110227142133240252298326952681384055545004032 binary64)) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (neg.f64 (*.f64 (PI.f64) l)) (*.f64 F F)))) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l)))
(if (<=.f64 (-.f64 (*.f64 (PI.f64) l) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 F F)) (tan.f64 (*.f64 (PI.f64) l)))) #s(literal -3366486976990959/168324348849547952231711676252164117297610873690341563503944988898199428937506586307637329160882830439263455003397702966816621832005881723620090072660860187198567157476110227142133240252298326952681384055545004032 binary64)) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) #s(approx (* (/ -1 (* F F)) (tan (* (PI) l))) (/.f64 (*.f64 (neg.f64 (PI.f64)) l) (*.f64 F F)))) #s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l)))
#s(approx (- (* (PI) l) (* (/ 1 (* F F)) (tan (* (PI) l)))) (*.f64 (PI.f64) l))

derivations212.0ms (4.4%)

Memory
-20.4MiB live, 216.5MiB allocated; 32ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 289 to 68 computations (76.5% saved)

preprocess91.0ms (1.9%)

Memory
49.9MiB live, 182.0MiB allocated; 21ms collecting garbage
Remove

(abs F)

Compiler

Compiled 810 to 282 computations (65.2% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...