Toniolo and Linder, Equation (10-)

Time bar (total: 17.4s)

start0.0ms (0%)

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

analyze1.6s (9.5%)

Memory
-219.9MiB live, 1 408.2MiB allocated; 1.4s collecting garbage
Algorithm
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
0%0%99.9%0.1%0%0%0%7
0%0%99.9%0.1%0%0%0%8
0%0%99.9%0.1%0%0%0%9
2%2%97.9%0.1%0%0%0%10
2.9%2.9%96.9%0.1%0%0%0%11
3.8%3.8%96.1%0.1%0%0%0%12
Compiler

Compiled 27 to 21 computations (22.2% saved)

sample3.0s (17.1%)

Memory
77.9MiB live, 4 114.1MiB allocated; 542ms collecting garbage
Samples
889.0ms4 305×0valid
701.0ms1 604×2valid
540.0ms1 268×3valid
353.0ms1 070×1valid
4.0ms4valid
Precisions
Click to see histograms. Total time spent on operations: 2.1s
adjust: 438.0ms (21.2% of total)
ival-div: 333.0ms (16.1% of total)
ival-mult: 316.0ms (15.3% of total)
ival-sin: 246.0ms (11.9% of total)
ival-tan: 178.0ms (8.6% of total)
ival-pow: 176.0ms (8.5% of total)
ival-pow2: 154.0ms (7.5% of total)
ival-sub: 120.0ms (5.8% of total)
ival-add: 86.0ms (4.2% of total)
exact: 15.0ms (0.7% of total)
ival-assert: 3.0ms (0.1% of total)
Bogosity

explain355.0ms (2%)

Memory
-60.8MiB live, 424.8MiB allocated; 85ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
980-0-(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
700-1(-1.163049510644225e-58 4.2612894323674595e-159 -2.1889390671133497e-179)(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))
580-0-(-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))
80-0-(*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))
40-0-(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
30-0-(*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k))
00-0-k
00-0-(/.f64 k t)
00-0-t
00-0-#s(literal 1 binary64)
00-0-#s(literal 3 binary64)
00-0-(tan.f64 k)
00-0-(pow.f64 (/.f64 k t) #s(literal 2 binary64))
00-0-(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64)))
00-0-(*.f64 l l)
00-0-(sin.f64 k)
00-0-(pow.f64 t #s(literal 3 binary64))
00-0-#s(literal 2 binary64)
00-0-l
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
-.f64(-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))cancellation580
*.f64(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))u*o510
(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))underflow83
(*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))underflow107
(*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k))underflow92
(pow.f64 t #s(literal 3 binary64))underflow76
(*.f64 l l)underflow54
(/.f64 k t)overflow35
(-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))overflow79
(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64)))overflow79
(pow.f64 (/.f64 k t) #s(literal 2 binary64))overflow79
*.f64(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))o*u290
(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))overflow82
(*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))overflow71
(*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k))overflow79
(pow.f64 t #s(literal 3 binary64))overflow94
(*.f64 l l)overflow71
(/.f64 k t)underflow28
(-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))underflow69
(pow.f64 (/.f64 k t) #s(literal 2 binary64))underflow69
/.f64(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))o/o280
(pow.f64 t #s(literal 3 binary64))overflow94
(*.f64 l l)overflow71
/.f64(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))u/u210
(pow.f64 t #s(literal 3 binary64))underflow76
(*.f64 l l)underflow54
*.f64(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))n*o100
/.f64(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))n/o90
(*.f64 l l)overflow71
*.f64(*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))n*o80
*.f64(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))n*u80
/.f64(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))o/n40
(pow.f64 t #s(literal 3 binary64))overflow94
/.f64(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))n/o40
(*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))overflow71
(*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k))overflow79
(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))overflow65
(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64)))overflow79
(/.f64 k t)overflow35
(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))overflow82
(pow.f64 t #s(literal 3 binary64))overflow94
(-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))overflow79
(*.f64 l l)overflow71
(pow.f64 (/.f64 k t) #s(literal 2 binary64))overflow79
/.f64(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))u/n40
(pow.f64 t #s(literal 3 binary64))underflow76
*.f64(*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k))n*o30
/.f64(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))n/u30
(*.f64 l l)underflow54
Confusion
Predicted +Predicted -
+1760
-2852
Precision
0.8627450980392157
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+17600
-28052
Precision?
0.8627450980392157
Recall?
1.0
Freqs
test
numberfreq
052
1168
236
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
70.0ms80×3valid
63.0ms260×0valid
38.0ms102×2valid
20.0ms68×1valid
1.0ms4valid
Compiler

Compiled 265 to 61 computations (77% saved)

Precisions
Click to see histograms. Total time spent on operations: 122.0ms
ival-tan: 25.0ms (20.5% of total)
adjust: 24.0ms (19.6% of total)
ival-div: 18.0ms (14.7% of total)
ival-mult: 14.0ms (11.5% of total)
ival-pow2: 10.0ms (8.2% of total)
ival-sin: 10.0ms (8.2% of total)
ival-pow: 9.0ms (7.4% of total)
ival-sub: 5.0ms (4.1% of total)
ival-add: 5.0ms (4.1% of total)
exact: 1.0ms (0.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

preprocess146.0ms (0.8%)

Memory
-21.1MiB live, 75.0MiB allocated; 10ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
086256
1250230
21176210
37995210
01925
03225
16223
220721
3144121
0876317
Stop Event
iter limit
node limit
iter limit
node limit
Calls
Call 1
Inputs
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
Outputs
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 (/.f64 #s(literal 2 binary64) (ratio-of-squares.f64 k t)) (*.f64 (tan.f64 k) (*.f64 (ratio-of-squares.f64 t l) (*.f64 (sin.f64 k) t))))
Symmetry

(abs l)

(abs k)

(negabs t)

Compiler

Compiled 25 to 19 computations (24% saved)

eval0.0ms (0%)

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

Compiled 0 to 3 computations (-∞% saved)

prune1.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
31.7%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
Compiler

Compiled 25 to 19 computations (24% saved)

series59.0ms (0.3%)

Memory
-0.2MiB live, 46.1MiB allocated; 3ms collecting garbage
Counts
19 → 44
Calls
Call 1
Inputs
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(literal 2 binary64)
(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))
(*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k))
(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))
(pow.f64 t #s(literal 3 binary64))
t
#s(literal 3 binary64)
(*.f64 l l)
l
(sin.f64 k)
k
(tan.f64 k)
(-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64)))
#s(literal 1 binary64)
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 k t)
Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (/ (* (pow t 3) (sin k)) (pow l 2))))
#s(approx (/ (pow t 3) (* l l)) #s(hole binary64 (/ (pow t 3) (pow l 2))))
#s(approx (pow t 3) #s(hole binary64 (pow t 3)))
#s(approx t #s(hole binary64 t))
#s(approx (- (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (pow (/ k t) 2) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (/ k t) #s(hole binary64 (/ k t)))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 1))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (+ 1 (/ (pow k 2) (pow t 2)))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx l #s(hole binary64 l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (pow l 2))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (/ (* (pow k 2) (pow t 3)) (pow l 2))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* 1/6 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 1/6 (/ (pow t 3) (pow l 2))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 1/6 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 31/360 (/ (pow t 3) (pow l 2))))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (/ (* k (pow t 3)) (pow l 2))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* -1/6 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* (pow k 2) (+ (* -1/6 (/ (pow t 3) (pow l 2))) (* 1/120 (/ (* (pow k 2) (pow t 3)) (pow l 2))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* (pow k 2) (+ (* -1/6 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* -1/5040 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 1/120 (/ (pow t 3) (pow l 2))))))) (/ (pow t 3) (pow l 2))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx k #s(hole binary64 k))
#s(approx (tan k) #s(hole binary64 k))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* 1/3 (pow k 2))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* 2/15 (pow k 2))))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* (pow k 2) (+ 2/15 (* 17/315 (pow k 2))))))))))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (tan k) #s(hole binary64 (/ (sin k) (cos k))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))
Calls

9 calls:

TimeVariablePointExpression
12.0ms
k
@inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (pow t 3) (* l l)) (pow t 3) t 3 (* l l) l (sin k) k (tan k) (- (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t))
8.0ms
t
@0
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (pow t 3) (* l l)) (pow t 3) t 3 (* l l) l (sin k) k (tan k) (- (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t))
8.0ms
k
@0
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (pow t 3) (* l l)) (pow t 3) t 3 (* l l) l (sin k) k (tan k) (- (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t))
7.0ms
t
@-inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (pow t 3) (* l l)) (pow t 3) t 3 (* l l) l (sin k) k (tan k) (- (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t))
6.0ms
k
@-inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (* (/ (pow t 3) (* l l)) (sin k)) (/ (pow t 3) (* l l)) (pow t 3) t 3 (* l l) l (sin k) k (tan k) (- (+ 1 (pow (/ k t) 2)) 1) (+ 1 (pow (/ k t) 2)) 1 (pow (/ k t) 2) (/ k t))

rewrite150.0ms (0.9%)

Memory
19.0MiB live, 158.5MiB allocated; 16ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02391361
02611320
113671264
081101126
Stop Event
iter limit
node limit
iter limit
Counts
63 → 225
Calls
Call 1
Inputs
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(literal 2 binary64)
(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))
(*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k))
(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))
(pow.f64 t #s(literal 3 binary64))
t
#s(literal 3 binary64)
(*.f64 l l)
l
(sin.f64 k)
k
(tan.f64 k)
(-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64)))
#s(literal 1 binary64)
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 k t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (/ (* (pow t 3) (sin k)) (pow l 2))))
#s(approx (/ (pow t 3) (* l l)) #s(hole binary64 (/ (pow t 3) (pow l 2))))
#s(approx (pow t 3) #s(hole binary64 (pow t 3)))
#s(approx t #s(hole binary64 t))
#s(approx (- (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (pow (/ k t) 2) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (/ k t) #s(hole binary64 (/ k t)))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 1))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (+ 1 (/ (pow k 2) (pow t 2)))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx l #s(hole binary64 l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (pow l 2))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (/ (* (pow k 2) (pow t 3)) (pow l 2))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* 1/6 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 1/6 (/ (pow t 3) (pow l 2))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 1/6 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 31/360 (/ (pow t 3) (pow l 2))))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (/ (* k (pow t 3)) (pow l 2))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* -1/6 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* (pow k 2) (+ (* -1/6 (/ (pow t 3) (pow l 2))) (* 1/120 (/ (* (pow k 2) (pow t 3)) (pow l 2))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) #s(hole binary64 (* k (+ (* (pow k 2) (+ (* -1/6 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* -1/5040 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 1/120 (/ (pow t 3) (pow l 2))))))) (/ (pow t 3) (pow l 2))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx k #s(hole binary64 k))
#s(approx (tan k) #s(hole binary64 k))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* 1/3 (pow k 2))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* 2/15 (pow k 2))))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* (pow k 2) (+ 2/15 (* 17/315 (pow k 2))))))))))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (tan k) #s(hole binary64 (/ (sin k) (cos k))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))
Outputs
(/.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k))))) (neg.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))) (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k))))))
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
(+.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k))))))
#s(literal 2 binary64)
(*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k))))
(*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k))) (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (*.f64 (tan.f64 k) (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))
(*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))
(*.f64 (tan.f64 k) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)))
(*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (tan.f64 k))
(/.f64 (*.f64 (neg.f64 (sin.f64 k)) (neg.f64 (*.f64 (sin.f64 k) (pow.f64 t #s(literal 3 binary64))))) (*.f64 (neg.f64 (cos.f64 k)) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (neg.f64 (sin.f64 k)) (*.f64 (sin.f64 k) (pow.f64 t #s(literal 3 binary64)))) (*.f64 (neg.f64 (cos.f64 k)) (*.f64 l l)))
(/.f64 (*.f64 (sin.f64 k) (neg.f64 (*.f64 (sin.f64 k) (pow.f64 t #s(literal 3 binary64))))) (*.f64 (cos.f64 k) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (sin.f64 k) (*.f64 (sin.f64 k) (pow.f64 t #s(literal 3 binary64)))) (*.f64 (cos.f64 k) (*.f64 l l)))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 k) (pow.f64 t #s(literal 3 binary64)))) (neg.f64 (sin.f64 k))) (*.f64 (neg.f64 (*.f64 l l)) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 k) (pow.f64 t #s(literal 3 binary64)))) (sin.f64 k)) (*.f64 (neg.f64 (*.f64 l l)) (cos.f64 k)))
(/.f64 (*.f64 (*.f64 (sin.f64 k) (pow.f64 t #s(literal 3 binary64))) (neg.f64 (sin.f64 k))) (*.f64 (*.f64 l l) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (*.f64 (sin.f64 k) (pow.f64 t #s(literal 3 binary64))) (sin.f64 k)) (*.f64 (cos.f64 k) (*.f64 l l)))
(*.f64 (/.f64 (sin.f64 k) (neg.f64 l)) (/.f64 (pow.f64 t #s(literal 3 binary64)) (neg.f64 l)))
(*.f64 (/.f64 (sin.f64 k) (fabs.f64 l)) (/.f64 (pow.f64 t #s(literal 3 binary64)) (fabs.f64 l)))
(*.f64 (/.f64 (sin.f64 k) l) (/.f64 (pow.f64 t #s(literal 3 binary64)) l))
(*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (neg.f64 l)) (/.f64 (sin.f64 k) (neg.f64 l)))
(*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (fabs.f64 l)) (/.f64 (sin.f64 k) (fabs.f64 l)))
(*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) l) (/.f64 (sin.f64 k) l))
(*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k))
(*.f64 (sin.f64 k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))
(*.f64 (pow.f64 t #s(literal 3 binary64)) (ratio-of-squares.f64 (pow.f64 (sin.f64 k) #s(literal 1/2 binary64)) l))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 k) (pow.f64 t #s(literal 3 binary64))))) (neg.f64 (neg.f64 (*.f64 l l))))
(/.f64 (neg.f64 (*.f64 (sin.f64 k) (pow.f64 t #s(literal 3 binary64)))) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 (sin.f64 k) (pow.f64 t #s(literal 3 binary64))) (*.f64 l l))
(*.f64 (/.f64 (pow.f64 t #s(literal 3/2 binary64)) (neg.f64 l)) (/.f64 (pow.f64 t #s(literal 3/2 binary64)) (neg.f64 l)))
(*.f64 (/.f64 (pow.f64 t #s(literal 3/2 binary64)) (fabs.f64 l)) (/.f64 (pow.f64 t #s(literal 3/2 binary64)) (fabs.f64 l)))
(*.f64 (/.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (pow.f64 t #s(literal 3/2 binary64)) l))
(*.f64 (/.f64 (*.f64 t t) (neg.f64 l)) (/.f64 t (neg.f64 l)))
(*.f64 (/.f64 t (neg.f64 l)) (/.f64 (*.f64 t t) (neg.f64 l)))
(*.f64 (/.f64 (*.f64 t t) (fabs.f64 l)) (/.f64 t (fabs.f64 l)))
(*.f64 (/.f64 t (fabs.f64 l)) (/.f64 (*.f64 t t) (fabs.f64 l)))
(*.f64 (/.f64 (*.f64 t t) l) (/.f64 t l))
(*.f64 (/.f64 t l) (/.f64 (*.f64 t t) l))
(ratio-of-squares.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) l)
(ratio-of-squares.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) (neg.f64 l))
(ratio-of-squares.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) (fabs.f64 l))
(ratio-of-squares.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) l)
(ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) (neg.f64 l))
(ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) (fabs.f64 l))
(ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)
(/.f64 (neg.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) l)) (neg.f64 l))
(/.f64 (neg.f64 (pow.f64 (neg.f64 t) #s(literal 3 binary64))) (neg.f64 (neg.f64 (*.f64 l l))))
(/.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) l) l)
(/.f64 (pow.f64 (neg.f64 t) #s(literal 3 binary64)) (neg.f64 (*.f64 l l)))
(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))
(exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))
(*.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(*.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(*.f64 (pow.f64 t #s(literal 3/2 binary64)) (pow.f64 t #s(literal 3/2 binary64)))
(*.f64 (*.f64 t t) t)
(*.f64 t (*.f64 t t))
(pow.f64 (exp.f64 (log.f64 t)) #s(literal 3 binary64))
(pow.f64 (pow.f64 t #s(literal 3/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 t t) #s(literal 3/2 binary64))
(pow.f64 t #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))) (sinh.f64 (*.f64 (log.f64 t) #s(literal 3 binary64))))
t
#s(literal 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))
(/.f64 #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))))
l
(*.f64 (pow.f64 (sin.f64 k) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 k) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 k) #s(literal 1 binary64))
(sin.f64 k)
(exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 1 binary64)))
k
(/.f64 (neg.f64 (neg.f64 (sin.f64 k))) (neg.f64 (neg.f64 (cos.f64 k))))
(/.f64 (+.f64 (tan.f64 k) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 k) (tan.f64 (PI.f64)))))
(/.f64 (neg.f64 (sin.f64 k)) (neg.f64 (cos.f64 k)))
(/.f64 (sin.f64 k) (cos.f64 k))
(tan.f64 (+.f64 (+.f64 k (PI.f64)) (PI.f64)))
(tan.f64 (+.f64 k (PI.f64)))
(tan.f64 k)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) (-.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)))) (-.f64 #s(literal 1 binary64) (-.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) (-.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64))) (*.f64 #s(literal 1 binary64) (-.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (pow.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t)) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 k t) #s(literal 3 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t)))) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (+.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(-.f64 (ratio-square-sum.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 (/.f64 (pow.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))))))
(-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (-.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 t t) (*.f64 k k)))) (neg.f64 (neg.f64 (*.f64 t t))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 k t) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t))))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 k k)) (*.f64 t t)) (*.f64 (neg.f64 (*.f64 t t)) (*.f64 t t))) (*.f64 (neg.f64 (*.f64 t t)) (*.f64 t t)))
(/.f64 (+.f64 (pow.f64 (*.f64 k t) #s(literal 2 binary64)) (pow.f64 t #s(literal 4 binary64))) (pow.f64 t #s(literal 4 binary64)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 k k)) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 t t)) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 t t)) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 2 binary64)) (*.f64 (*.f64 t t) #s(literal 2 binary64))) (*.f64 (*.f64 t t) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 t t))) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 k k)))) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 t t))))
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 t t)) (*.f64 #s(literal 2 binary64) (*.f64 k k))) (*.f64 #s(literal 2 binary64) (*.f64 t t)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 k t) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t)))))
(/.f64 (neg.f64 (+.f64 (*.f64 t t) (*.f64 k k))) (neg.f64 (*.f64 t t)))
(/.f64 (+.f64 (*.f64 t t) (*.f64 k k)) (*.f64 t t))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t))) (/.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t))))
(+.f64 (ratio-square-sum.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t)))) (/.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t))))))
(+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t))
#s(literal 1 binary64)
(*.f64 (neg.f64 (/.f64 k t)) (neg.f64 (/.f64 k t)))
(*.f64 (fabs.f64 (/.f64 k t)) (fabs.f64 (/.f64 k t)))
(*.f64 (exp.f64 (log.f64 (/.f64 k t))) (exp.f64 (log.f64 (/.f64 k t))))
(*.f64 (/.f64 k t) (/.f64 k t))
(ratio-of-squares.f64 (fabs.f64 k) (fabs.f64 t))
(ratio-of-squares.f64 (fabs.f64 k) (exp.f64 (log.f64 t)))
(ratio-of-squares.f64 (fabs.f64 k) (neg.f64 t))
(ratio-of-squares.f64 (fabs.f64 k) t)
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) (fabs.f64 t))
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) (exp.f64 (log.f64 t)))
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) (neg.f64 t))
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) t)
(ratio-of-squares.f64 (neg.f64 k) (fabs.f64 t))
(ratio-of-squares.f64 (neg.f64 k) (exp.f64 (log.f64 t)))
(ratio-of-squares.f64 (neg.f64 k) (neg.f64 t))
(ratio-of-squares.f64 (neg.f64 k) t)
(ratio-of-squares.f64 k (fabs.f64 t))
(ratio-of-squares.f64 k (exp.f64 (log.f64 t)))
(ratio-of-squares.f64 k (neg.f64 t))
(ratio-of-squares.f64 k t)
(pow.f64 (exp.f64 (log.f64 (/.f64 k t))) #s(literal 2 binary64))
(pow.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64))
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (*.f64 k k))) (neg.f64 (neg.f64 (*.f64 t t))))
(/.f64 (*.f64 (neg.f64 k) k) (*.f64 (neg.f64 t) t))
(/.f64 (*.f64 k (neg.f64 k)) (*.f64 t (neg.f64 t)))
(/.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 t t)))
(/.f64 (*.f64 k k) (*.f64 t t))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal -2 binary64)))
(exp.f64 (-.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)) (*.f64 (log.f64 t) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 k t) #s(literal 1/2 binary64)) (pow.f64 (/.f64 k t) #s(literal 1/2 binary64)))
(pow.f64 (/.f64 k t) #s(literal 1 binary64))
(/.f64 (neg.f64 (neg.f64 k)) (neg.f64 (neg.f64 t)))
(/.f64 (neg.f64 k) (neg.f64 t))
(/.f64 k t)
(exp.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 1 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (ratio-of-squares.f64 (sin.f64 k) l) (/.f64 (pow.f64 t #s(literal 3 binary64)) (cos.f64 k))))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)))
#s(approx (/ (pow t 3) (* l l)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))
#s(approx (pow t 3) (pow.f64 t #s(literal 3 binary64)))
#s(approx t t)
#s(approx (- (+ 1 (pow (/ k t) 2)) 1) (ratio-of-squares.f64 k t))
#s(approx (+ 1 (pow (/ k t) 2)) (ratio-of-squares.f64 k t))
#s(approx (+ 1 (pow (/ k t) 2)) (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)))
#s(approx (pow (/ k t) 2) (ratio-of-squares.f64 k t))
#s(approx (/ k t) (/.f64 k t))
#s(approx (+ 1 (pow (/ k t) 2)) #s(literal 1 binary64))
#s(approx (+ 1 (pow (/ k t) 2)) (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)))
#s(approx (* l l) (*.f64 l l))
#s(approx l l)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 151/7560 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (+.f64 t (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 31/360 binary64) t) (*.f64 #s(literal 173/5040 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal 1/6 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (*.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (*.f64 (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal 31/360 binary64))) (*.f64 k k)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (*.f64 k k)))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 31/360 binary64) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (*.f64 (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal 173/5040 binary64))) (*.f64 k k)) (*.f64 #s(literal 1/6 binary64) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (*.f64 k k)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (*.f64 k k)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 k (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal -1/6 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) k))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (*.f64 k k)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) k))
#s(approx (* (/ (pow t 3) (* l l)) (sin k)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/120 binary64) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (*.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)))) (*.f64 k k)) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (*.f64 k k)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) k))
#s(approx (sin k) k)
#s(approx (sin k) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) k))
#s(approx (sin k) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k)) #s(literal 1 binary64)) k))
#s(approx (sin k) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 k k)) #s(literal 1/120 binary64)) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k)) #s(literal 1 binary64)) k))
#s(approx k k)
#s(approx (tan k) k)
#s(approx (tan k) (*.f64 (+.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 k k)) #s(literal 1 binary64)) k))
#s(approx (tan k) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 2/15 binary64) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k)) #s(literal 1 binary64)) k))
#s(approx (tan k) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 17/315 binary64) (*.f64 k k)) #s(literal 2/15 binary64)) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k)) #s(literal 1 binary64)) k))
#s(approx (sin k) (sin.f64 k))
#s(approx (tan k) (tan.f64 k))
#s(approx (+ 1 (pow (/ k t) 2)) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 t #s(literal -2 binary64)) (*.f64 k k))))

eval614.0ms (3.5%)

Memory
-3.5MiB live, 699.4MiB allocated; 102ms collecting garbage
Samples
392.0ms9 681×0valid
51.0ms1 325×0invalid
0.0ms1valid
Compiler

Compiled 7 159 to 1 297 computations (81.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 203.0ms
ival-mult: 133.0ms (65.5% of total)
ival-div: 56.0ms (27.6% of total)
ival-true: 6.0ms (3% of total)
ival-assert: 4.0ms (2% of total)
adjust: 2.0ms (1% of total)
ival-add: 2.0ms (1% of total)

prune267.0ms (1.5%)

Memory
38.8MiB live, 232.1MiB allocated; 10ms collecting garbage
Pruning

15 alts after pruning (15 fresh and 0 done)

PrunedKeptTotal
New21915234
Fresh000
Picked101
Done000
Total22015235
Accuracy
84.2%
Counts
235 → 15
Alt Table
Click to see full alt table
StatusAccuracyProgram
43.7%
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))) (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
43.7%
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
43.7%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
25.8%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 #s(approx (+ 1 (pow (/ k t) 2)) #s(literal 1 binary64)) #s(literal 1 binary64))))
40.6%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (ratio-of-squares.f64 k t))))
47.1%
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
39.4%
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
67.4%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l))))
60.6%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (+.f64 t (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64)))))
77.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
60.6%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64)))))
46.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (pow.f64 k #s(literal 4 binary64))))
26.2%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
38.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
76.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
Samples
165.0ms4 526×0valid
22.0ms594×0invalid
Compiler

Compiled 1 080 to 776 computations (28.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 92.0ms
ival-mult: 61.0ms (66.2% of total)
ival-div: 26.0ms (28.2% of total)
ival-true: 3.0ms (3.3% of total)
ival-assert: 2.0ms (2.2% of total)
adjust: 1.0ms (1.1% of total)

series109.0ms (0.6%)

Memory
5.4MiB live, 97.6MiB allocated; 8ms collecting garbage
Counts
53 → 146
Calls
Call 1
Inputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(literal 2 binary64)
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))
(*.f64 (/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))
(/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k))
(*.f64 (*.f64 k k) t)
(*.f64 k k)
k
t
(cos.f64 k)
(ratio-of-squares.f64 (sin.f64 k) l)
(sin.f64 k)
l
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
(*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k)))
(/.f64 #s(literal 2 binary64) t)
(ratio-of-squares.f64 l (*.f64 k k))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
(*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64)))
(+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l)))
(*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k))
(/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l))
(+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t)))
(*.f64 #s(literal 1/6 binary64) t)
#s(literal 1/6 binary64)
(*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))
#s(literal 31/360 binary64)
(*.f64 l l)
(/.f64 t (*.f64 l l))
(pow.f64 k #s(literal 4 binary64))
#s(literal 4 binary64)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (pow.f64 k #s(literal 4 binary64))))
(/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (pow.f64 k #s(literal 4 binary64)))
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t)
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 l l))
(*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))
#s(literal -1/3 binary64)
(pow.f64 (*.f64 l k) #s(literal 2 binary64))
(*.f64 l k)
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
(*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k))))
(-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64))
(ratio-of-squares.f64 k t)
#s(literal 1 binary64)
(*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))
(ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)
(pow.f64 t #s(literal 3/2 binary64))
#s(literal 3/2 binary64)
(*.f64 (sin.f64 k) (tan.f64 k))
(tan.f64 k)
Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (/ (* (* k k) t) (cos k)) #s(hole binary64 (/ (* (pow k 2) t) (cos k))))
#s(approx (* (* k k) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx t #s(hole binary64 t))
#s(approx (* (/ 2 t) (/ (* l l) (* (* k k) (* k k)))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ 2 t) #s(hole binary64 (/ 2 t)))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (* (pow k 4) (* t (+ (/ 1 (pow l 2)) (/ (* (pow k 2) (+ 1/6 (* 31/360 (pow k 2)))) (pow l 2)))))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (* t (+ (/ 1 (pow l 2)) (/ (* (pow k 2) (+ 1/6 (* 31/360 (pow k 2)))) (pow l 2))))))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) #s(hole binary64 (/ (* (pow k 2) (* t (+ 1/6 (* 31/360 (pow k 2))))) (pow l 2))))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) #s(hole binary64 (/ (* t (+ 1/6 (* 31/360 (pow k 2)))) (pow l 2))))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) #s(hole binary64 (* t (+ 1/6 (* 31/360 (pow k 2))))))
#s(approx (* 1/6 t) #s(hole binary64 (* 1/6 t)))
#s(approx (* 31/360 (* (* k k) t)) #s(hole binary64 (* 31/360 (* (pow k 2) t))))
#s(approx (/ t (* l l)) #s(hole binary64 (/ t (pow l 2))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (* (pow k 2) (pow l 2))) (* 2 (pow l 2))) (* (pow k 4) t))))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) #s(hole binary64 (/ (+ (* -1/3 (* (pow k 2) (pow l 2))) (* 2 (pow l 2))) t)))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (- (+ (/ (* k k) (* t t)) 1) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (/ (* k k) (* t t)) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (/ (* k k) (* t t)) 1) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (/ (* k k) (* t t)) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) #s(hole binary64 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) #s(hole binary64 (/ (pow t 3) (pow l 2))))
#s(approx (pow t 3/2) #s(hole binary64 (sqrt (pow t 3))))
#s(approx (+ (/ (* k k) (* t t)) 1) #s(hole binary64 1))
#s(approx (+ (/ (* k k) (* t t)) 1) #s(hole binary64 (+ 1 (/ (pow k 2) (pow t 2)))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (* -1 (* (pow k 4) (* t (- (/ (* (pow k 2) (- (* -31/360 (pow k 2)) 1/6)) (pow l 2)) (/ 1 (pow l 2))))))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (* -1 (* t (- (/ (* (pow k 2) (- (* -31/360 (pow k 2)) 1/6)) (pow l 2)) (/ 1 (pow l 2)))))))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) #s(hole binary64 (* -1 (/ (* (pow k 2) (* t (- (* -31/360 (pow k 2)) 1/6))) (pow l 2)))))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) #s(hole binary64 (* -1 (/ (* t (- (* -31/360 (pow k 2)) 1/6)) (pow l 2)))))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) #s(hole binary64 (* -1 (* t (- (* -31/360 (pow k 2)) 1/6)))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) #s(hole binary64 (* -2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (* (pow (sin k) 2) (pow (sqrt -1) 2))))))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) #s(hole binary64 (* -1 (/ (* (pow k 2) (* t (* (pow (sin k) 2) (pow (sqrt -1) 2)))) (* (pow l 2) (cos k))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) #s(hole binary64 (* -1 (/ (* (pow t 3) (* (pow (sin k) 2) (pow (sqrt -1) 2))) (* (pow l 2) (cos k))))))
#s(approx (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) #s(hole binary64 (* -1 (/ (* (pow t 3) (pow (sqrt -1) 2)) (pow l 2)))))
#s(approx (pow t 3/2) #s(hole binary64 (* (sqrt (pow t 3)) (pow (sqrt -1) 2))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (/ (pow (sin k) 2) (pow l 2))))
#s(approx l #s(hole binary64 l))
#s(approx (/ (* l l) (* (* k k) (* k k))) #s(hole binary64 (/ (pow l 2) (pow k 4))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (/ (* (pow k 4) (+ t (* (pow k 2) (+ (* 31/360 (* (pow k 2) t)) (* 1/6 t))))) (pow l 2))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (/ (+ t (* (pow k 2) (+ (* 31/360 (* (pow k 2) t)) (* 1/6 t)))) (pow l 2))))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) #s(hole binary64 (/ (* (pow k 2) (+ (* 31/360 (* (pow k 2) t)) (* 1/6 t))) (pow l 2))))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) #s(hole binary64 (/ (+ (* 31/360 (* (pow k 2) t)) (* 1/6 t)) (pow l 2))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (* (pow l 2) (+ 2 (* -1/3 (pow k 2)))) (* (pow k 4) t))))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) #s(hole binary64 (/ (* (pow l 2) (+ 2 (* -1/3 (pow k 2)))) t)))
#s(approx (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) #s(hole binary64 (* (pow l 2) (+ 2 (* -1/3 (pow k 2))))))
#s(approx (* 2 (* l l)) #s(hole binary64 (* 2 (pow l 2))))
#s(approx (* -1/3 (pow (* l k) 2)) #s(hole binary64 (* -1/3 (* (pow k 2) (pow l 2)))))
#s(approx (pow (* l k) 2) #s(hole binary64 (* (pow k 2) (pow l 2))))
#s(approx (* l k) #s(hole binary64 (* k l)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (* k k) t) (cos k)) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* (* k k) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* 1/2 (* (pow k 2) t))))))
#s(approx (/ (* (* k k) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/4 t) (* 1/24 t)))) (* -1/2 t)))))))
#s(approx (/ (* (* k k) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/720 t) (+ (* 1/48 t) (* 1/2 (+ (* -1/4 t) (* 1/24 t))))))) (+ (* -1/4 t) (* 1/24 t)))) (* -1/2 t)))))))
#s(approx (* k k) #s(hole binary64 (pow k 2)))
#s(approx k #s(hole binary64 k))
#s(approx (cos k) #s(hole binary64 1))
#s(approx (cos k) #s(hole binary64 (+ 1 (* -1/2 (pow k 2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 1/24 (pow k 2)) 1/2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/24 (* -1/720 (pow k 2)))) 1/2)))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (/ (pow k 2) (pow l 2))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (/ (pow k 2) (pow l 2))) (/ 1 (pow l 2))))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (* 2/45 (/ (pow k 2) (pow l 2))) (* 1/3 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (* (pow k 2) (+ (* -1/315 (/ (pow k 2) (pow l 2))) (* 2/45 (/ 1 (pow l 2))))) (* 1/3 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (* (pow k 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (pow l 2))))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (/ t (pow l 2))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (pow l 2)))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (pow l 2)))))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) #s(hole binary64 (* 1/6 (/ (* (pow k 2) t) (pow l 2)))))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) #s(hole binary64 (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2)))))))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) #s(hole binary64 (* 1/6 (/ t (pow l 2)))))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) #s(hole binary64 (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) #s(hole binary64 (* 1/6 t)))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) #s(hole binary64 (+ (* 31/360 (* (pow k 2) t)) (* 1/6 t))))
#s(approx (pow k 4) #s(hole binary64 (pow k 4)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) #s(hole binary64 (* 2 (/ (pow l 2) t))))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) #s(hole binary64 (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t)))))
#s(approx (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) #s(hole binary64 (* 2 (pow l 2))))
#s(approx (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) #s(hole binary64 (+ (* -1/3 (* (pow k 2) (pow l 2))) (* 2 (pow l 2)))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) #s(hole binary64 (* (pow k 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (pow l 2))))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) #s(hole binary64 (/ (* (pow k 2) (pow t 3)) (pow l 2))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) #s(hole binary64 (* (pow k 2) (+ (* 1/6 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 1/6 (/ (pow t 3) (pow l 2))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 1/6 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 31/360 (/ (pow t 3) (pow l 2))))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (sin k) (tan k)) #s(hole binary64 (pow k 2)))
#s(approx (* (sin k) (tan k)) #s(hole binary64 (* (pow k 2) (+ 1 (* 1/6 (pow k 2))))))
#s(approx (* (sin k) (tan k)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (+ 1/6 (* 31/360 (pow k 2))))))))
#s(approx (* (sin k) (tan k)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (+ 1/6 (* (pow k 2) (+ 31/360 (* 173/5040 (pow k 2))))))))))
#s(approx (tan k) #s(hole binary64 k))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* 1/3 (pow k 2))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* 2/15 (pow k 2))))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* (pow k 2) (+ 2/15 (* 17/315 (pow k 2))))))))))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (* 31/360 (/ (* (pow k 8) t) (pow l 2)))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (* (pow k 8) (+ (* 31/360 (/ t (pow l 2))) (* 1/6 (/ t (* (pow k 2) (pow l 2))))))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (* (pow k 8) (+ (* 31/360 (/ t (pow l 2))) (+ (* 1/6 (/ t (* (pow k 2) (pow l 2)))) (/ t (* (pow k 4) (pow l 2))))))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (* 31/360 (/ (* (pow k 4) t) (pow l 2)))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (* (pow k 4) (+ (* 31/360 (/ t (pow l 2))) (* 1/6 (/ t (* (pow k 2) (pow l 2))))))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (* (pow k 4) (+ (* 31/360 (/ t (pow l 2))) (+ (* 1/6 (/ t (* (pow k 2) (pow l 2)))) (/ t (* (pow k 4) (pow l 2))))))))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) #s(hole binary64 (* 31/360 (/ (* (pow k 4) t) (pow l 2)))))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) #s(hole binary64 (* (pow k 4) (+ (* 31/360 (/ t (pow l 2))) (* 1/6 (/ t (* (pow k 2) (pow l 2))))))))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) #s(hole binary64 (* 31/360 (/ (* (pow k 2) t) (pow l 2)))))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* 31/360 (/ t (pow l 2))) (* 1/6 (/ t (* (pow k 2) (pow l 2))))))))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) #s(hole binary64 (* 31/360 (* (pow k 2) t))))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) #s(hole binary64 (* (pow k 2) (+ (* 31/360 t) (* 1/6 (/ t (pow k 2)))))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))) (pow k 2))))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) #s(hole binary64 (* -1/3 (/ (* (pow k 2) (pow l 2)) t))))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))))))
#s(approx (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) #s(hole binary64 (* -1/3 (* (pow k 2) (pow l 2)))))
#s(approx (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (pow l 2)) (* 2 (/ (pow l 2) (pow k 2)))))))
#s(approx (+ (/ (* k k) (* t t)) 1) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))
#s(approx (* (sin k) (tan k)) #s(hole binary64 (/ (pow (sin k) 2) (cos k))))
#s(approx (tan k) #s(hole binary64 (/ (sin k) (cos k))))
Calls

9 calls:

TimeVariablePointExpression
24.0ms
t
@0
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) (/ (* (* k k) t) (cos k)) (* (* k k) t) (* k k) k t (cos k) (/ (* (sin k) (sin k)) (* l l)) (sin k) l (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (/ 2 t) (/ (* l l) (* (* k k) (* k k)))) (/ 2 t) (/ (* l l) (* (* k k) (* k k))) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* 1/6 t) 1/6 (* 31/360 (* (* k k) t)) 31/360 (* l l) (/ t (* l l)) (pow k 4) 4 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) (* 2 (* l l)) (* -1/3 (pow (* l k) 2)) -1/3 (pow (* l k) 2) (* l k) (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (- (+ (/ (* k k) (* t t)) 1) 1) (+ (/ (* k k) (* t t)) 1) (/ (* k k) (* t t)) 1 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (pow t 3/2) 3/2 (* (sin k) (tan k)) (tan k))
14.0ms
t
@-inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) (/ (* (* k k) t) (cos k)) (* (* k k) t) (* k k) k t (cos k) (/ (* (sin k) (sin k)) (* l l)) (sin k) l (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (/ 2 t) (/ (* l l) (* (* k k) (* k k)))) (/ 2 t) (/ (* l l) (* (* k k) (* k k))) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* 1/6 t) 1/6 (* 31/360 (* (* k k) t)) 31/360 (* l l) (/ t (* l l)) (pow k 4) 4 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) (* 2 (* l l)) (* -1/3 (pow (* l k) 2)) -1/3 (pow (* l k) 2) (* l k) (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (- (+ (/ (* k k) (* t t)) 1) 1) (+ (/ (* k k) (* t t)) 1) (/ (* k k) (* t t)) 1 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (pow t 3/2) 3/2 (* (sin k) (tan k)) (tan k))
11.0ms
l
@inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) (/ (* (* k k) t) (cos k)) (* (* k k) t) (* k k) k t (cos k) (/ (* (sin k) (sin k)) (* l l)) (sin k) l (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (/ 2 t) (/ (* l l) (* (* k k) (* k k)))) (/ 2 t) (/ (* l l) (* (* k k) (* k k))) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* 1/6 t) 1/6 (* 31/360 (* (* k k) t)) 31/360 (* l l) (/ t (* l l)) (pow k 4) 4 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) (* 2 (* l l)) (* -1/3 (pow (* l k) 2)) -1/3 (pow (* l k) 2) (* l k) (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (- (+ (/ (* k k) (* t t)) 1) 1) (+ (/ (* k k) (* t t)) 1) (/ (* k k) (* t t)) 1 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (pow t 3/2) 3/2 (* (sin k) (tan k)) (tan k))
10.0ms
k
@inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) (/ (* (* k k) t) (cos k)) (* (* k k) t) (* k k) k t (cos k) (/ (* (sin k) (sin k)) (* l l)) (sin k) l (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (/ 2 t) (/ (* l l) (* (* k k) (* k k)))) (/ 2 t) (/ (* l l) (* (* k k) (* k k))) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* 1/6 t) 1/6 (* 31/360 (* (* k k) t)) 31/360 (* l l) (/ t (* l l)) (pow k 4) 4 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) (* 2 (* l l)) (* -1/3 (pow (* l k) 2)) -1/3 (pow (* l k) 2) (* l k) (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (- (+ (/ (* k k) (* t t)) 1) 1) (+ (/ (* k k) (* t t)) 1) (/ (* k k) (* t t)) 1 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (pow t 3/2) 3/2 (* (sin k) (tan k)) (tan k))
10.0ms
l
@0
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) (/ (* (* k k) t) (cos k)) (* (* k k) t) (* k k) k t (cos k) (/ (* (sin k) (sin k)) (* l l)) (sin k) l (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (/ 2 t) (/ (* l l) (* (* k k) (* k k)))) (/ 2 t) (/ (* l l) (* (* k k) (* k k))) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* 1/6 t) 1/6 (* 31/360 (* (* k k) t)) 31/360 (* l l) (/ t (* l l)) (pow k 4) 4 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) (* 2 (* l l)) (* -1/3 (pow (* l k) 2)) -1/3 (pow (* l k) 2) (* l k) (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (- (+ (/ (* k k) (* t t)) 1) 1) (+ (/ (* k k) (* t t)) 1) (/ (* k k) (* t t)) 1 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (pow t 3/2) 3/2 (* (sin k) (tan k)) (tan k))

rewrite122.0ms (0.7%)

Memory
-21.5MiB live, 77.3MiB allocated; 5ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06015254
06754512
031584460
Stop Event
iter limit
iter limit
node limit
iter limit
Counts
199 → 417
Calls
Call 1
Inputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(literal 2 binary64)
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))
(*.f64 (/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))
(/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k))
(*.f64 (*.f64 k k) t)
(*.f64 k k)
k
t
(cos.f64 k)
(ratio-of-squares.f64 (sin.f64 k) l)
(sin.f64 k)
l
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
(*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k)))
(/.f64 #s(literal 2 binary64) t)
(ratio-of-squares.f64 l (*.f64 k k))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
(*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64)))
(+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l)))
(*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k))
(/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l))
(+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t)))
(*.f64 #s(literal 1/6 binary64) t)
#s(literal 1/6 binary64)
(*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))
#s(literal 31/360 binary64)
(*.f64 l l)
(/.f64 t (*.f64 l l))
(pow.f64 k #s(literal 4 binary64))
#s(literal 4 binary64)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (pow.f64 k #s(literal 4 binary64))))
(/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (pow.f64 k #s(literal 4 binary64)))
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t)
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 l l))
(*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))
#s(literal -1/3 binary64)
(pow.f64 (*.f64 l k) #s(literal 2 binary64))
(*.f64 l k)
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
(*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k))))
(-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64))
(ratio-of-squares.f64 k t)
#s(literal 1 binary64)
(*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))
(ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)
(pow.f64 t #s(literal 3/2 binary64))
#s(literal 3/2 binary64)
(*.f64 (sin.f64 k) (tan.f64 k))
(tan.f64 k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (/ (* (* k k) t) (cos k)) #s(hole binary64 (/ (* (pow k 2) t) (cos k))))
#s(approx (* (* k k) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx t #s(hole binary64 t))
#s(approx (* (/ 2 t) (/ (* l l) (* (* k k) (* k k)))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ 2 t) #s(hole binary64 (/ 2 t)))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (* (pow k 4) (* t (+ (/ 1 (pow l 2)) (/ (* (pow k 2) (+ 1/6 (* 31/360 (pow k 2)))) (pow l 2)))))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (* t (+ (/ 1 (pow l 2)) (/ (* (pow k 2) (+ 1/6 (* 31/360 (pow k 2)))) (pow l 2))))))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) #s(hole binary64 (/ (* (pow k 2) (* t (+ 1/6 (* 31/360 (pow k 2))))) (pow l 2))))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) #s(hole binary64 (/ (* t (+ 1/6 (* 31/360 (pow k 2)))) (pow l 2))))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) #s(hole binary64 (* t (+ 1/6 (* 31/360 (pow k 2))))))
#s(approx (* 1/6 t) #s(hole binary64 (* 1/6 t)))
#s(approx (* 31/360 (* (* k k) t)) #s(hole binary64 (* 31/360 (* (pow k 2) t))))
#s(approx (/ t (* l l)) #s(hole binary64 (/ t (pow l 2))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (* (pow k 2) (pow l 2))) (* 2 (pow l 2))) (* (pow k 4) t))))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) #s(hole binary64 (/ (+ (* -1/3 (* (pow k 2) (pow l 2))) (* 2 (pow l 2))) t)))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (- (+ (/ (* k k) (* t t)) 1) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (/ (* k k) (* t t)) 1) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (/ (* k k) (* t t)) 1) #s(hole binary64 (/ (+ (pow k 2) (pow t 2)) (pow t 2))))
#s(approx (/ (* k k) (* t t)) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) #s(hole binary64 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) #s(hole binary64 (/ (pow t 3) (pow l 2))))
#s(approx (pow t 3/2) #s(hole binary64 (sqrt (pow t 3))))
#s(approx (+ (/ (* k k) (* t t)) 1) #s(hole binary64 1))
#s(approx (+ (/ (* k k) (* t t)) 1) #s(hole binary64 (+ 1 (/ (pow k 2) (pow t 2)))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (* -1 (* (pow k 4) (* t (- (/ (* (pow k 2) (- (* -31/360 (pow k 2)) 1/6)) (pow l 2)) (/ 1 (pow l 2))))))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (* -1 (* t (- (/ (* (pow k 2) (- (* -31/360 (pow k 2)) 1/6)) (pow l 2)) (/ 1 (pow l 2)))))))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) #s(hole binary64 (* -1 (/ (* (pow k 2) (* t (- (* -31/360 (pow k 2)) 1/6))) (pow l 2)))))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) #s(hole binary64 (* -1 (/ (* t (- (* -31/360 (pow k 2)) 1/6)) (pow l 2)))))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) #s(hole binary64 (* -1 (* t (- (* -31/360 (pow k 2)) 1/6)))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) #s(hole binary64 (* -2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (* (pow (sin k) 2) (pow (sqrt -1) 2))))))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) #s(hole binary64 (* -1 (/ (* (pow k 2) (* t (* (pow (sin k) 2) (pow (sqrt -1) 2)))) (* (pow l 2) (cos k))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) #s(hole binary64 (* -1 (/ (* (pow t 3) (* (pow (sin k) 2) (pow (sqrt -1) 2))) (* (pow l 2) (cos k))))))
#s(approx (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) #s(hole binary64 (* -1 (/ (* (pow t 3) (pow (sqrt -1) 2)) (pow l 2)))))
#s(approx (pow t 3/2) #s(hole binary64 (* (sqrt (pow t 3)) (pow (sqrt -1) 2))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (/ (pow (sin k) 2) (pow l 2))))
#s(approx l #s(hole binary64 l))
#s(approx (/ (* l l) (* (* k k) (* k k))) #s(hole binary64 (/ (pow l 2) (pow k 4))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (/ (* (pow k 4) (+ t (* (pow k 2) (+ (* 31/360 (* (pow k 2) t)) (* 1/6 t))))) (pow l 2))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (/ (+ t (* (pow k 2) (+ (* 31/360 (* (pow k 2) t)) (* 1/6 t)))) (pow l 2))))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) #s(hole binary64 (/ (* (pow k 2) (+ (* 31/360 (* (pow k 2) t)) (* 1/6 t))) (pow l 2))))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) #s(hole binary64 (/ (+ (* 31/360 (* (pow k 2) t)) (* 1/6 t)) (pow l 2))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (* (pow l 2) (+ 2 (* -1/3 (pow k 2)))) (* (pow k 4) t))))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) #s(hole binary64 (/ (* (pow l 2) (+ 2 (* -1/3 (pow k 2)))) t)))
#s(approx (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) #s(hole binary64 (* (pow l 2) (+ 2 (* -1/3 (pow k 2))))))
#s(approx (* 2 (* l l)) #s(hole binary64 (* 2 (pow l 2))))
#s(approx (* -1/3 (pow (* l k) 2)) #s(hole binary64 (* -1/3 (* (pow k 2) (pow l 2)))))
#s(approx (pow (* l k) 2) #s(hole binary64 (* (pow k 2) (pow l 2))))
#s(approx (* l k) #s(hole binary64 (* k l)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (* k k) t) (cos k)) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* (* k k) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* 1/2 (* (pow k 2) t))))))
#s(approx (/ (* (* k k) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/4 t) (* 1/24 t)))) (* -1/2 t)))))))
#s(approx (/ (* (* k k) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/720 t) (+ (* 1/48 t) (* 1/2 (+ (* -1/4 t) (* 1/24 t))))))) (+ (* -1/4 t) (* 1/24 t)))) (* -1/2 t)))))))
#s(approx (* k k) #s(hole binary64 (pow k 2)))
#s(approx k #s(hole binary64 k))
#s(approx (cos k) #s(hole binary64 1))
#s(approx (cos k) #s(hole binary64 (+ 1 (* -1/2 (pow k 2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 1/24 (pow k 2)) 1/2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/24 (* -1/720 (pow k 2)))) 1/2)))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (/ (pow k 2) (pow l 2))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (/ (pow k 2) (pow l 2))) (/ 1 (pow l 2))))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (* 2/45 (/ (pow k 2) (pow l 2))) (* 1/3 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (* (pow k 2) (+ (* -1/315 (/ (pow k 2) (pow l 2))) (* 2/45 (/ 1 (pow l 2))))) (* 1/3 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (* (pow k 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (pow l 2))))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (/ t (pow l 2))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (pow l 2)))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (pow l 2)))))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) #s(hole binary64 (* 1/6 (/ (* (pow k 2) t) (pow l 2)))))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) #s(hole binary64 (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2)))))))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) #s(hole binary64 (* 1/6 (/ t (pow l 2)))))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) #s(hole binary64 (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) #s(hole binary64 (* 1/6 t)))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) #s(hole binary64 (+ (* 31/360 (* (pow k 2) t)) (* 1/6 t))))
#s(approx (pow k 4) #s(hole binary64 (pow k 4)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) #s(hole binary64 (* 2 (/ (pow l 2) t))))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) #s(hole binary64 (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t)))))
#s(approx (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) #s(hole binary64 (* 2 (pow l 2))))
#s(approx (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) #s(hole binary64 (+ (* -1/3 (* (pow k 2) (pow l 2))) (* 2 (pow l 2)))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) #s(hole binary64 (* (pow k 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (pow l 2))))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (pow l 2))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) #s(hole binary64 (/ (* (pow k 2) (pow t 3)) (pow l 2))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) #s(hole binary64 (* (pow k 2) (+ (* 1/6 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 1/6 (/ (pow t 3) (pow l 2))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* 1/6 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) (pow t 3)) (pow l 2))) (* 31/360 (/ (pow t 3) (pow l 2))))))) (/ (pow t 3) (pow l 2))))))
#s(approx (* (sin k) (tan k)) #s(hole binary64 (pow k 2)))
#s(approx (* (sin k) (tan k)) #s(hole binary64 (* (pow k 2) (+ 1 (* 1/6 (pow k 2))))))
#s(approx (* (sin k) (tan k)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (+ 1/6 (* 31/360 (pow k 2))))))))
#s(approx (* (sin k) (tan k)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (+ 1/6 (* (pow k 2) (+ 31/360 (* 173/5040 (pow k 2))))))))))
#s(approx (tan k) #s(hole binary64 k))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* 1/3 (pow k 2))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* 2/15 (pow k 2))))))))
#s(approx (tan k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (+ 1/3 (* (pow k 2) (+ 2/15 (* 17/315 (pow k 2))))))))))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (* 31/360 (/ (* (pow k 8) t) (pow l 2)))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (* (pow k 8) (+ (* 31/360 (/ t (pow l 2))) (* 1/6 (/ t (* (pow k 2) (pow l 2))))))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) #s(hole binary64 (* (pow k 8) (+ (* 31/360 (/ t (pow l 2))) (+ (* 1/6 (/ t (* (pow k 2) (pow l 2)))) (/ t (* (pow k 4) (pow l 2))))))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (* 31/360 (/ (* (pow k 4) t) (pow l 2)))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (* (pow k 4) (+ (* 31/360 (/ t (pow l 2))) (* 1/6 (/ t (* (pow k 2) (pow l 2))))))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) #s(hole binary64 (* (pow k 4) (+ (* 31/360 (/ t (pow l 2))) (+ (* 1/6 (/ t (* (pow k 2) (pow l 2)))) (/ t (* (pow k 4) (pow l 2))))))))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) #s(hole binary64 (* 31/360 (/ (* (pow k 4) t) (pow l 2)))))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) #s(hole binary64 (* (pow k 4) (+ (* 31/360 (/ t (pow l 2))) (* 1/6 (/ t (* (pow k 2) (pow l 2))))))))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) #s(hole binary64 (* 31/360 (/ (* (pow k 2) t) (pow l 2)))))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* 31/360 (/ t (pow l 2))) (* 1/6 (/ t (* (pow k 2) (pow l 2))))))))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) #s(hole binary64 (* 31/360 (* (pow k 2) t))))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) #s(hole binary64 (* (pow k 2) (+ (* 31/360 t) (* 1/6 (/ t (pow k 2)))))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))) (pow k 2))))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) #s(hole binary64 (* -1/3 (/ (* (pow k 2) (pow l 2)) t))))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))))))
#s(approx (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) #s(hole binary64 (* -1/3 (* (pow k 2) (pow l 2)))))
#s(approx (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (pow l 2)) (* 2 (/ (pow l 2) (pow k 2)))))))
#s(approx (+ (/ (* k k) (* t t)) 1) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))
#s(approx (* (sin k) (tan k)) #s(hole binary64 (/ (pow (sin k) 2) (cos k))))
#s(approx (tan k) #s(hole binary64 (/ (sin k) (cos k))))
Outputs
(/.f64 #s(literal -2 binary64) (neg.f64 #s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (*.f64 (ratio-of-squares.f64 (sin.f64 k) l) (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k)))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (*.f64 (ratio-of-squares.f64 (sin.f64 k) l) (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))))))
#s(literal 2 binary64)
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (*.f64 (ratio-of-squares.f64 (sin.f64 k) l) (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k)))))
(*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k)))
(*.f64 (ratio-of-squares.f64 (sin.f64 k) l) (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))))
(*.f64 (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))) (ratio-of-squares.f64 (sin.f64 k) l))
(*.f64 (*.f64 k k) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 (cos.f64 k) (*.f64 l l))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 l l)) (cos.f64 k))
(/.f64 (*.f64 (*.f64 (*.f64 k k) t) (ratio-of-squares.f64 (sin.f64 k) l)) (cos.f64 k))
(/.f64 (*.f64 (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 l l))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (neg.f64 (*.f64 (cos.f64 k) (*.f64 l l))))
(/.f64 (*.f64 (*.f64 (*.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 (cos.f64 k) (*.f64 l l)))
(*.f64 (*.f64 k k) (/.f64 t (cos.f64 k)))
(/.f64 (neg.f64 (*.f64 (*.f64 k k) t)) (neg.f64 (cos.f64 k)))
(/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k))
(*.f64 (*.f64 k k) t)
(*.f64 k (*.f64 k t))
(*.f64 t (*.f64 k k))
(*.f64 (pow.f64 k #s(literal 1 binary64)) (pow.f64 k #s(literal 1 binary64)))
(*.f64 (fabs.f64 k) (fabs.f64 k))
(*.f64 (neg.f64 k) (neg.f64 k))
(*.f64 k k)
(pow.f64 k #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))
k
t
(sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 k))
(cos.f64 k)
(*.f64 (/.f64 (sin.f64 k) l) (/.f64 (sin.f64 k) l))
(*.f64 (sin.f64 k) (/.f64 (sin.f64 k) (*.f64 l l)))
(ratio-of-squares.f64 (pow.f64 (sin.f64 k) #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 (sin.f64 k) #s(literal 1 binary64)) (neg.f64 l))
(ratio-of-squares.f64 (pow.f64 (sin.f64 k) #s(literal 1 binary64)) (fabs.f64 l))
(ratio-of-squares.f64 (pow.f64 (sin.f64 k) #s(literal 1 binary64)) l)
(ratio-of-squares.f64 (neg.f64 (sin.f64 k)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (neg.f64 (sin.f64 k)) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 (sin.f64 k)) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 (sin.f64 k)) l)
(ratio-of-squares.f64 (fabs.f64 (sin.f64 k)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (fabs.f64 (sin.f64 k)) (neg.f64 l))
(ratio-of-squares.f64 (fabs.f64 (sin.f64 k)) (fabs.f64 l))
(ratio-of-squares.f64 (fabs.f64 (sin.f64 k)) l)
(ratio-of-squares.f64 (sin.f64 k) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (sin.f64 k) (neg.f64 l))
(ratio-of-squares.f64 (sin.f64 k) (fabs.f64 l))
(ratio-of-squares.f64 (sin.f64 k) l)
(/.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l) l)
(/.f64 (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (neg.f64 (*.f64 l l)))
(/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 l l))
(sin.f64 k)
l
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
(*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64))
(*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 #s(literal 2 binary64) t))
(*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k)))
(*.f64 #s(literal 2 binary64) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t))
(/.f64 (*.f64 #s(literal 2 binary64) (ratio-of-squares.f64 l (*.f64 k k))) t)
(/.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t))
(+.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t))
(/.f64 #s(literal -2 binary64) (neg.f64 t))
(/.f64 #s(literal 2 binary64) t)
(*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))
(*.f64 l (/.f64 l (pow.f64 k #s(literal 4 binary64))))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (neg.f64 (*.f64 k k)))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (fabs.f64 (*.f64 k k)))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (*.f64 k k))
(ratio-of-squares.f64 (neg.f64 l) (neg.f64 (*.f64 k k)))
(ratio-of-squares.f64 (neg.f64 l) (fabs.f64 (*.f64 k k)))
(ratio-of-squares.f64 (neg.f64 l) (*.f64 k k))
(ratio-of-squares.f64 (fabs.f64 l) (neg.f64 (*.f64 k k)))
(ratio-of-squares.f64 (fabs.f64 l) (fabs.f64 (*.f64 k k)))
(ratio-of-squares.f64 (fabs.f64 l) (*.f64 k k))
(ratio-of-squares.f64 l (neg.f64 (*.f64 k k)))
(ratio-of-squares.f64 l (fabs.f64 (*.f64 k k)))
(ratio-of-squares.f64 l (*.f64 k k))
(/.f64 (neg.f64 (*.f64 l l)) (neg.f64 (pow.f64 k #s(literal 4 binary64))))
(/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))
(/.f64 (*.f64 l l) (pow.f64 k #s(literal 4 binary64)))
(/.f64 #s(literal -2 binary64) (neg.f64 #s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k)) t) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k)) t) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64)))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k)) t) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k)) t) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64)))
(*.f64 (pow.f64 k #s(literal 4 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k)) t) (*.f64 l l)))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k)) t) (pow.f64 k #s(literal 4 binary64)))) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k)) t) (pow.f64 k #s(literal 4 binary64))) (*.f64 l l))
(+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)) (*.f64 k k)) (pow.f64 k #s(literal 4 binary64))) (*.f64 (/.f64 t (*.f64 l l)) (pow.f64 k #s(literal 4 binary64))))
(+.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)) (*.f64 k k))) (*.f64 (pow.f64 k #s(literal 4 binary64)) (/.f64 t (*.f64 l l))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)) (*.f64 k k)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)) (*.f64 k k))) (*.f64 (/.f64 t (*.f64 l l)) (/.f64 t (*.f64 l l)))) (-.f64 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)) (*.f64 k k)) #s(literal 3 binary64)) (pow.f64 (/.f64 t (*.f64 l l)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)) (*.f64 k k)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)) (*.f64 k k))) (-.f64 (*.f64 (/.f64 t (*.f64 l l)) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k)) t)) (neg.f64 (*.f64 l l)))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k)) t) (*.f64 l l))
(+.f64 (/.f64 t (*.f64 l l)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)) (*.f64 k k)))
(+.f64 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l)))
(*.f64 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)) k) k)
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)) (*.f64 k k))
(*.f64 (*.f64 k k) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)))
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k))) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k)) (*.f64 l l))
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 l l)) (*.f64 k k)) (*.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) (*.f64 k k)))
(+.f64 (*.f64 (*.f64 k k) (/.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 l l))) (*.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) (*.f64 k k)))
(*.f64 t (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) (*.f64 l l)))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) l) l)
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 l l)) (/.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 l l))) (*.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 l l)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 l l)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 l l)) (/.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 l l))) (-.f64 (*.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 l l)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t)) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 l l)) (*.f64 #s(literal -1/6 binary64) (/.f64 t (*.f64 l l))))
(+.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 l l)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 l l)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)))
(*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t)
(*.f64 t (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 1/6 binary64) t)) (*.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t))) (-.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t)) (*.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 1/6 binary64) t))) (-.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 #s(literal 1/6 binary64) t)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/6 binary64) t) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 1/6 binary64) t)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t)) (*.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/6 binary64) t) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t)) (-.f64 (*.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 1/6 binary64) t)) (*.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 #s(literal 1/6 binary64) t)))))
(-.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 #s(literal -1/6 binary64) t))
(-.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal -31/360 binary64) (*.f64 (*.f64 k k) t)))
(+.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 #s(literal 1/6 binary64) t))
(+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 t (*.f64 (*.f64 k k) #s(literal 31/360 binary64))))
(+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t))
(*.f64 #s(literal 1/6 binary64) t)
(*.f64 t #s(literal 1/6 binary64))
#s(literal 1/6 binary64)
(*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t)
(*.f64 (*.f64 (*.f64 k k) t) #s(literal 31/360 binary64))
(*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))
#s(literal 31/360 binary64)
(*.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 l l)
(pow.f64 l #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(/.f64 (/.f64 t l) l)
(/.f64 (neg.f64 t) (neg.f64 (*.f64 l l)))
(/.f64 t (*.f64 l l))
(*.f64 (*.f64 (*.f64 k k) k) k)
(*.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 k k)))
(*.f64 (fabs.f64 (*.f64 k k)) (fabs.f64 (*.f64 k k)))
(*.f64 (*.f64 k k) (*.f64 k k))
(*.f64 k (*.f64 k (*.f64 k k)))
(pow.f64 (*.f64 k k) #s(literal 2 binary64))
(pow.f64 k #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 k) #s(literal 4 binary64)))
#s(literal 4 binary64)
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
(*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t))
(*.f64 (*.f64 l l) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64))) t)
(/.f64 (neg.f64 (*.f64 (*.f64 l l) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t))) (neg.f64 (pow.f64 k #s(literal 4 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l))) (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t))
(/.f64 (*.f64 (*.f64 l l) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)) (pow.f64 k #s(literal 4 binary64)))
(+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) t) #s(literal -1/3 binary64)) (pow.f64 k #s(literal 4 binary64))) (/.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)) (pow.f64 k #s(literal 4 binary64))))
(+.f64 (/.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
(*.f64 (*.f64 l l) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) t) #s(literal -1/3 binary64)) (*.f64 (/.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) t) #s(literal -1/3 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)))) (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) t) #s(literal -1/3 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) t) #s(literal -1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) t) #s(literal -1/3 binary64)) (*.f64 (/.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) t) #s(literal -1/3 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) t) #s(literal -1/3 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l))) (neg.f64 t))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) t)
(-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) t) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 l l) t)))
(+.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) t) #s(literal -1/3 binary64)))
(+.f64 (*.f64 (/.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) t) #s(literal -1/3 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)))
(*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l))
(*.f64 (*.f64 l l) (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)))) (-.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64))) (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64))) (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 k l) #s(literal 2 binary64))))
(-.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 l l)))
(+.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 l l) (*.f64 (*.f64 k k) #s(literal -1/3 binary64))))
(+.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)))
(+.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 2 binary64) l) l)
(*.f64 (*.f64 l l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 l l))
(+.f64 (*.f64 l l) (*.f64 l l))
(*.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) (*.f64 l l))
(*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64))
(*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 k l) #s(literal 2 binary64)))
#s(literal -1/3 binary64)
(*.f64 (pow.f64 (*.f64 k l) #s(literal 1 binary64)) (pow.f64 (*.f64 k l) #s(literal 1 binary64)))
(*.f64 (*.f64 k l) (*.f64 k l))
(*.f64 (*.f64 k k) (*.f64 l l))
(*.f64 (*.f64 l l) (*.f64 k k))
(pow.f64 (*.f64 k l) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 k l)) #s(literal 2 binary64)))
(*.f64 k l)
(*.f64 l k)
(/.f64 (/.f64 #s(literal 2 binary64) (+.f64 (ratio-of-squares.f64 k t) #s(literal 0 binary64))) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (tan.f64 k) (sin.f64 k))))
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (tan.f64 k) (sin.f64 k)))) (+.f64 (ratio-of-squares.f64 k t) #s(literal 0 binary64)))
(/.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (tan.f64 k) (sin.f64 k))) (+.f64 (ratio-of-squares.f64 k t) #s(literal 0 binary64)))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (tan.f64 k) (sin.f64 k))) (+.f64 (ratio-of-squares.f64 k t) #s(literal 0 binary64))))
(*.f64 (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 0 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (*.f64 (tan.f64 k) (sin.f64 k)))
(*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (tan.f64 k) (sin.f64 k))) (+.f64 (ratio-of-squares.f64 k t) #s(literal 0 binary64)))
(*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 0 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (tan.f64 k) (sin.f64 k))))
(*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (*.f64 (tan.f64 k) (+.f64 (ratio-of-squares.f64 k t) #s(literal 0 binary64))))
(/.f64 (-.f64 (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64))) #s(literal 1 binary64)) (+.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))))
(-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 (ratio-of-squares.f64 k t) #s(literal 0 binary64))
(+.f64 #s(literal 1 binary64) (-.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 k t) (ratio-of-squares.f64 k t))) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t)))
(/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 k t) (ratio-of-squares.f64 k t)) #s(literal 1 binary64)) (-.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 k t) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (ratio-of-squares.f64 k t) (ratio-of-squares.f64 k t)) (*.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t)))))
(/.f64 (+.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (*.f64 (ratio-of-squares.f64 k t) (ratio-of-squares.f64 k t)) (-.f64 #s(literal 1 binary64) (*.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)))))
(+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t))
(*.f64 (pow.f64 (/.f64 k t) #s(literal 1 binary64)) (pow.f64 (/.f64 k t) #s(literal 1 binary64)))
(*.f64 (/.f64 k t) (/.f64 k t))
(*.f64 k (/.f64 k (*.f64 t t)))
(ratio-of-squares.f64 (pow.f64 k #s(literal 1 binary64)) (pow.f64 t #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 k #s(literal 1 binary64)) (neg.f64 t))
(ratio-of-squares.f64 (pow.f64 k #s(literal 1 binary64)) (fabs.f64 t))
(ratio-of-squares.f64 (pow.f64 k #s(literal 1 binary64)) t)
(ratio-of-squares.f64 (fabs.f64 k) (pow.f64 t #s(literal 1 binary64)))
(ratio-of-squares.f64 (fabs.f64 k) (neg.f64 t))
(ratio-of-squares.f64 (fabs.f64 k) (fabs.f64 t))
(ratio-of-squares.f64 (fabs.f64 k) t)
(ratio-of-squares.f64 (neg.f64 k) (pow.f64 t #s(literal 1 binary64)))
(ratio-of-squares.f64 (neg.f64 k) (neg.f64 t))
(ratio-of-squares.f64 (neg.f64 k) (fabs.f64 t))
(ratio-of-squares.f64 (neg.f64 k) t)
(ratio-of-squares.f64 k (pow.f64 t #s(literal 1 binary64)))
(ratio-of-squares.f64 k (neg.f64 t))
(ratio-of-squares.f64 k (fabs.f64 t))
(ratio-of-squares.f64 k t)
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 k k) t) t)
(/.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 t t)))
(/.f64 (*.f64 k k) (*.f64 t t))
(exp.f64 (*.f64 (log.f64 (/.f64 k t)) #s(literal 2 binary64)))
#s(literal 1 binary64)
(*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (tan.f64 k) (sin.f64 k)))
(*.f64 (*.f64 (tan.f64 k) (sin.f64 k)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))
(*.f64 (tan.f64 k) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)))
(*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (tan.f64 k))
(/.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (tan.f64 k) (sin.f64 k))) (*.f64 l l))
(*.f64 (/.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (pow.f64 t #s(literal 3/2 binary64)) l))
(*.f64 (pow.f64 t #s(literal 3/2 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/4 binary64)) l))
(ratio-of-squares.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64))) l)
(ratio-of-squares.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) (neg.f64 l))
(ratio-of-squares.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) (fabs.f64 l))
(ratio-of-squares.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))) l)
(ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) (neg.f64 l))
(ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) (fabs.f64 l))
(ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)
(/.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) l) l)
(/.f64 (neg.f64 (pow.f64 t #s(literal 3 binary64))) (neg.f64 (*.f64 l l)))
(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))
(*.f64 (pow.f64 t #s(literal 3/4 binary64)) (pow.f64 t #s(literal 3/4 binary64)))
(pow.f64 (pow.f64 t #s(literal 3 binary64)) #s(literal 1/2 binary64))
(pow.f64 t #s(literal 3/2 binary64))
(sqrt.f64 (pow.f64 t #s(literal 3 binary64)))
(exp.f64 (*.f64 (log.f64 t) #s(literal 3/2 binary64)))
#s(literal 3/2 binary64)
(*.f64 (tan.f64 k) (sin.f64 k))
(*.f64 (sin.f64 k) (tan.f64 k))
(/.f64 (neg.f64 (sin.f64 k)) (neg.f64 (cos.f64 k)))
(/.f64 (sin.f64 k) (cos.f64 k))
(tan.f64 (+.f64 k (PI.f64)))
(tan.f64 k)
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (*.f64 (ratio-of-squares.f64 (sin.f64 k) l) (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k)))))
#s(approx (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) (*.f64 (ratio-of-squares.f64 (sin.f64 k) l) (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k)))))
#s(approx (/ (* (* k k) t) (cos k)) (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))))
#s(approx (* (* k k) t) (*.f64 (*.f64 k k) t))
#s(approx t t)
#s(approx (* (/ 2 t) (/ (* l l) (* (* k k) (* k k)))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 t) (/.f64 #s(literal 2 binary64) t))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) (*.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 l l))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 l l)) t))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)) (*.f64 k k)))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t))
#s(approx (* 1/6 t) (*.f64 #s(literal 1/6 binary64) t))
#s(approx (* 31/360 (* (* k k) t)) (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t))
#s(approx (/ t (* l l)) (/.f64 t (*.f64 l l)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (*.f64 (*.f64 l l) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (*.f64 (ratio-of-squares.f64 (sin.f64 k) l) (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k)))))
#s(approx (- (+ (/ (* k k) (* t t)) 1) 1) (ratio-of-squares.f64 k t))
#s(approx (+ (/ (* k k) (* t t)) 1) (ratio-of-squares.f64 k t))
#s(approx (+ (/ (* k k) (* t t)) 1) (+.f64 (ratio-of-squares.f64 k t) (ratio-of-squares.f64 t t)))
#s(approx (/ (* k k) (* t t)) (ratio-of-squares.f64 k t))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))
#s(approx (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))
#s(approx (pow t 3/2) (pow.f64 t #s(literal 3/2 binary64)))
#s(approx (+ (/ (* k k) (* t t)) 1) #s(literal 1 binary64))
#s(approx (+ (/ (* k k) (* t t)) 1) (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) (neg.f64 (*.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t) (/.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -31/360 binary64) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 l l)))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (neg.f64 (*.f64 (/.f64 (-.f64 (*.f64 (-.f64 (*.f64 #s(literal -31/360 binary64) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 l l)) t)))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (neg.f64 (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -31/360 binary64) (*.f64 k k)) #s(literal 1/6 binary64)) t) (*.f64 k k)) (*.f64 l l))))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal -31/360 binary64) (*.f64 k k)) #s(literal 1/6 binary64)) t)) (*.f64 l l)))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal -31/360 binary64) (*.f64 k k)) #s(literal 1/6 binary64)) t)))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (*.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) t))) #s(literal -2 binary64)))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (neg.f64 (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) t) (cos.f64 k)))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) (neg.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (cos.f64 k)))))
#s(approx (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (neg.f64 (*.f64 (pow.f64 t #s(literal 3 binary64)) (/.f64 #s(literal -1 binary64) (*.f64 l l)))))
#s(approx (pow t 3/2) (*.f64 #s(literal -1 binary64) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) (ratio-of-squares.f64 (sin.f64 k) l))
#s(approx l l)
#s(approx (/ (* l l) (* (* k k) (* k k))) (ratio-of-squares.f64 l (*.f64 k k)))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k)) t) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k)) t) (*.f64 l l)))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)) (*.f64 k k)))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)))
#s(approx (* l l) (*.f64 l l))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (*.f64 (*.f64 l l) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)))
#s(approx (* 2 (* l l)) (*.f64 (*.f64 l l) #s(literal 2 binary64)))
#s(approx (* -1/3 (pow (* l k) 2)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)))
#s(approx (pow (* l k) 2) (pow.f64 (*.f64 k l) #s(literal 2 binary64)))
#s(approx (* l k) (*.f64 k l))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 151/7560 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (*.f64 (pow.f64 k #s(literal 4 binary64)) (/.f64 t (*.f64 l l))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t)) (*.f64 l l)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k)) t) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 173/5040 binary64) (*.f64 (*.f64 k k) t)) (*.f64 l l)) (*.f64 #s(literal -31/360 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) (*.f64 (pow.f64 k #s(literal 4 binary64)) (/.f64 t (*.f64 l l))))
#s(approx (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 t (*.f64 l l))))) (*.f64 k k)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* (* k k) t) (cos k)) (/ (* (sin k) (sin k)) (* l l))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/315 binary64) (/.f64 t (*.f64 l l))) (+.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 t (*.f64 l l))) (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 t (*.f64 l l))))) #s(literal -1/2 binary64)))) (*.f64 k k)) (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 t (*.f64 l l))))) (*.f64 k k)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ (* (* k k) t) (cos k)) (*.f64 (*.f64 k k) t))
#s(approx (/ (* (* k k) t) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 k k) t)) t) (*.f64 k k)))
#s(approx (/ (* (* k k) t) (cos k)) (*.f64 (+.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (*.f64 t #s(literal -5/24 binary64)) (*.f64 k k))) (*.f64 #s(literal -1/2 binary64) t)) (*.f64 k k)) t) (*.f64 k k)))
#s(approx (/ (* (* k k) t) (cos k)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/48 binary64) t) (*.f64 #s(literal -1/2 binary64) (*.f64 t #s(literal -5/24 binary64)))) (*.f64 #s(literal -1/720 binary64) t)) (*.f64 k k))) (*.f64 t #s(literal -5/24 binary64))) (*.f64 k k)) (*.f64 #s(literal -1/2 binary64) t)) (*.f64 k k)) t) (*.f64 k k)))
#s(approx (* k k) (*.f64 k k))
#s(approx k k)
#s(approx (cos k) #s(literal 1 binary64))
#s(approx (cos k) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 k k)) #s(literal 1 binary64)))
#s(approx (cos k) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 k k)) #s(literal 1/2 binary64)) (*.f64 k k)) #s(literal 1 binary64)))
#s(approx (cos k) (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 k k)) #s(literal 1/24 binary64)) (*.f64 k k)) #s(literal 1/2 binary64)) (*.f64 k k)) #s(literal 1 binary64)))
#s(approx (/ (* (sin k) (sin k)) (* l l)) (ratio-of-squares.f64 k l))
#s(approx (/ (* (sin k) (sin k)) (* l l)) (*.f64 (+.f64 (*.f64 (ratio-of-squares.f64 k l) #s(literal -1/3 binary64)) (pow.f64 l #s(literal -2 binary64))) (*.f64 k k)))
#s(approx (/ (* (sin k) (sin k)) (* l l)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (ratio-of-squares.f64 k l) #s(literal 2/45 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal -2 binary64)))) (*.f64 k k)) (pow.f64 l #s(literal -2 binary64))) (*.f64 k k)))
#s(approx (/ (* (sin k) (sin k)) (* l l)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (ratio-of-squares.f64 k l) #s(literal -1/315 binary64)) (*.f64 #s(literal -2/45 binary64) (pow.f64 l #s(literal -2 binary64)))) (*.f64 k k)) (*.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal -2 binary64)))) (*.f64 k k)) (pow.f64 l #s(literal -2 binary64))) (*.f64 k k)))
#s(approx (sin k) k)
#s(approx (sin k) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) k))
#s(approx (sin k) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k)) #s(literal 1 binary64)) k))
#s(approx (sin k) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 k k)) #s(literal 1/120 binary64)) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k)) #s(literal 1 binary64)) k))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) (*.f64 (pow.f64 k #s(literal 4 binary64)) (/.f64 t (*.f64 l l))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t)) (*.f64 l l)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k)) t) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (/.f64 t (*.f64 l l)))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (+.f64 (/.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t)) (*.f64 l l)) (/.f64 t (*.f64 l l))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k)) t) (*.f64 l l)))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t)) (*.f64 l l)))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)) (*.f64 k k)))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 l l)))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (*.f64 #s(literal 1/6 binary64) t))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t))
#s(approx (pow k 4) (pow.f64 k #s(literal 4 binary64)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (*.f64 (*.f64 l l) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) (*.f64 (*.f64 l l) #s(literal 2 binary64)))
#s(approx (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 151/7560 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (*.f64 (pow.f64 k #s(literal 4 binary64)) (/.f64 t (*.f64 l l))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t)) (*.f64 l l)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) t) (*.f64 k k)) t) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 173/5040 binary64) (*.f64 (*.f64 k k) t)) (*.f64 l l)) (*.f64 #s(literal -31/360 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal 1/6 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (*.f64 k k)))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal 31/360 binary64)) (*.f64 #s(literal -1/6 binary64) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (*.f64 k k)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (*.f64 k k)))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal 173/5040 binary64)) (*.f64 #s(literal -31/360 binary64) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (*.f64 k k)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 1/6 binary64))) (*.f64 k k)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (*.f64 k k)))
#s(approx (* (sin k) (tan k)) (*.f64 k k))
#s(approx (* (sin k) (tan k)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 k k))) (*.f64 k k)))
#s(approx (* (sin k) (tan k)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) #s(literal 1/6 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (* (sin k) (tan k)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 173/5040 binary64) (*.f64 k k)) #s(literal 31/360 binary64)) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (tan k) k)
#s(approx (tan k) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 k k) #s(literal -1/3 binary64))) k))
#s(approx (tan k) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 2/15 binary64) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k)) #s(literal 1 binary64)) k))
#s(approx (tan k) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 17/315 binary64) (*.f64 k k)) #s(literal 2/15 binary64)) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k)) #s(literal 1 binary64)) k))
#s(approx (cos k) (cos.f64 k))
#s(approx (sin k) (sin.f64 k))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) (/.f64 (*.f64 #s(literal 31/360 binary64) (*.f64 (pow.f64 k #s(literal 8 binary64)) t)) (*.f64 l l)))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) (*.f64 (-.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 31/360 binary64)) (*.f64 #s(literal -1/6 binary64) (/.f64 t (pow.f64 (*.f64 k l) #s(literal 2 binary64))))) (pow.f64 k #s(literal 8 binary64))))
#s(approx (* (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (pow k 4)) (*.f64 (+.f64 (+.f64 (/.f64 (/.f64 t (pow.f64 k #s(literal 4 binary64))) (*.f64 l l)) (*.f64 (/.f64 t (pow.f64 (*.f64 k l) #s(literal 2 binary64))) #s(literal 1/6 binary64))) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 31/360 binary64))) (pow.f64 k #s(literal 8 binary64))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (/.f64 (*.f64 #s(literal 31/360 binary64) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)) (*.f64 l l)))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (*.f64 (-.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 31/360 binary64)) (*.f64 #s(literal -1/6 binary64) (/.f64 t (pow.f64 (*.f64 k l) #s(literal 2 binary64))))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (+ (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/ t (* l l))) (*.f64 (+.f64 (+.f64 (/.f64 (/.f64 t (pow.f64 k #s(literal 4 binary64))) (*.f64 l l)) (*.f64 (/.f64 t (pow.f64 (*.f64 k l) #s(literal 2 binary64))) #s(literal 1/6 binary64))) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 31/360 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (/.f64 (*.f64 #s(literal 31/360 binary64) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)) (*.f64 l l)))
#s(approx (* (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (* k k)) (*.f64 (-.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 31/360 binary64)) (*.f64 #s(literal -1/6 binary64) (/.f64 t (pow.f64 (*.f64 k l) #s(literal 2 binary64))))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (/.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t) (*.f64 l l)))
#s(approx (/ (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (* l l)) (*.f64 (-.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 31/360 binary64)) (*.f64 #s(literal -1/6 binary64) (/.f64 t (pow.f64 (*.f64 k l) #s(literal 2 binary64))))) (*.f64 k k)))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (*.f64 (*.f64 (*.f64 k k) #s(literal 31/360 binary64)) t))
#s(approx (+ (* 1/6 t) (* 31/360 (* (* k k) t))) (*.f64 (-.f64 (*.f64 #s(literal 31/360 binary64) t) (*.f64 #s(literal -1/6 binary64) (/.f64 t (*.f64 k k)))) (*.f64 k k)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k)))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (*.f64 (/.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) t) #s(literal -1/3 binary64)))
#s(approx (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (*.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k)))
#s(approx (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)))
#s(approx (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) (*.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) (*.f64 k k)))
#s(approx (+ (/ (* k k) (* t t)) 1) (*.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) (pow.f64 k #s(literal -2 binary64))) (*.f64 k k)))
#s(approx (* (sin k) (tan k)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))
#s(approx (tan k) (tan.f64 k))

eval984.0ms (5.7%)

Memory
10.7MiB live, 809.2MiB allocated; 84ms collecting garbage
Samples
567.0ms15 592×0valid
114.0ms3 096×0invalid
Compiler

Compiled 23 732 to 2 416 computations (89.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 325.0ms
ival-mult: 213.0ms (65.6% of total)
ival-div: 92.0ms (28.3% of total)
ival-true: 10.0ms (3.1% of total)
ival-assert: 6.0ms (1.8% of total)
adjust: 4.0ms (1.2% of total)

prune641.0ms (3.7%)

Memory
-15.8MiB live, 510.5MiB allocated; 99ms collecting garbage
Pruning

24 alts after pruning (23 fresh and 1 done)

PrunedKeptTotal
New49321514
Fresh8210
Picked415
Done000
Total50524529
Accuracy
96.7%
Counts
529 → 24
Alt Table
Click to see full alt table
StatusAccuracyProgram
50.5%
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (tan.f64 k) (sin.f64 k)))) (+.f64 (ratio-of-squares.f64 k t) #s(literal 0 binary64)))
39.1%
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) #s(approx (tan k) k)))))
39.4%
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
33.2%
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 k (/.f64 k (*.f64 t t))) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
50.5%
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (- (+ (/ (* k k) (* t t)) 1) 1) (ratio-of-squares.f64 k t)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
77.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 k k) t) (ratio-of-squares.f64 (sin.f64 k) l)) (cos.f64 k))))
89.9%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k)))))
67.4%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l))))
81.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
60.6%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k))))
70.4%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (* k k) t) (cos k)) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 (sin.f64 k) l))))
39.4%
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
38.7%
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
89.5%
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
46.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
47.0%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
62.1%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
38.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
38.0%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))))
69.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))))
70.6%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
76.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
50.6%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
28.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
Samples
391.0ms9 757×0valid
49.0ms1 251×0invalid
Compiler

Compiled 1 865 to 1 293 computations (30.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 204.0ms
ival-mult: 133.0ms (65.2% of total)
ival-div: 59.0ms (28.9% of total)
ival-true: 6.0ms (2.9% of total)
ival-assert: 4.0ms (2% of total)
adjust: 2.0ms (1% of total)

series84.0ms (0.5%)

Memory
46.9MiB live, 46.9MiB allocated; 0ms collecting garbage
Counts
43 → 106
Calls
Call 1
Inputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k)))))
#s(literal 2 binary64)
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k))))
(*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k)))
(ratio-of-squares.f64 k l)
k
l
(/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(sin.f64 k)
t
(cos.f64 k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64)))
(*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))
(/.f64 (ratio-of-squares.f64 l k) t)
(ratio-of-squares.f64 l k)
#s(literal -1/3 binary64)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k)))
(/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))
(+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)))
(*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64))
(*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))
(/.f64 (*.f64 l l) t)
(*.f64 l l)
(*.f64 k k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t))
(*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l))
(+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64))
(*.f64 (*.f64 k k) #s(literal -1/3 binary64))
(*.f64 (pow.f64 k #s(literal 4 binary64)) t)
(pow.f64 k #s(literal 4 binary64))
#s(literal 4 binary64)
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))
(*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))
(/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k))
(*.f64 k (*.f64 k t))
(*.f64 k t)
(ratio-of-squares.f64 (sin.f64 k) l)
Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (/ (* t (pow (sin k) 2)) (cos k))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* t (pow (sin k) 2))))
#s(approx t #s(hole binary64 t))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (* (pow k 2) (pow l 2))) (* 2 (pow l 2))) (* (pow k 4) t))))
#s(approx (* (/ (/ (* l l) (* k k)) t) -1/3) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (/ (* l l) (* k k)) t) #s(hole binary64 (/ (pow l 2) (* (pow k 2) t))))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) #s(hole binary64 (/ (+ (* -1/3 (pow l 2)) (* 2 (/ (pow l 2) (pow k 2)))) (* (pow k 2) t))))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) #s(hole binary64 (/ (+ (* -1/3 (pow l 2)) (* 2 (/ (pow l 2) (pow k 2)))) t)))
#s(approx (* (/ (/ (* l l) (* k k)) t) 2) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (* (/ (* l l) t) -1/3) #s(hole binary64 (* -1/3 (/ (pow l 2) t))))
#s(approx (/ (* l l) t) #s(hole binary64 (/ (pow l 2) t)))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) #s(hole binary64 (/ (* (pow l 2) (+ 2 (* -1/3 (pow k 2)))) (* (pow k 4) t))))
#s(approx (* (pow k 4) t) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (/ (* k (* k t)) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (/ (* k (* k t)) (cos k)) #s(hole binary64 (/ (* (pow k 2) t) (cos k))))
#s(approx (* k (* k t)) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* k t) #s(hole binary64 (* k t)))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) #s(hole binary64 (* -1 (/ (+ (* -2 (/ (pow l 2) (pow k 2))) (* 1/3 (pow l 2))) (* (pow k 2) t)))))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) #s(hole binary64 (* -1 (/ (+ (* -2 (/ (pow l 2) (pow k 2))) (* 1/3 (pow l 2))) t))))
#s(approx (/ (* k k) (* l l)) #s(hole binary64 (/ (pow k 2) (pow l 2))))
#s(approx l #s(hole binary64 l))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (* (pow l 2) (+ 2 (* -1/3 (pow k 2)))) (* (pow k 4) t))))
#s(approx (/ (* l l) (* k k)) #s(hole binary64 (/ (pow l 2) (pow k 2))))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) #s(hole binary64 (/ (* (pow l 2) (- (* 2 (/ 1 (* (pow k 2) t))) (* 1/3 (/ 1 t)))) (pow k 2))))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) #s(hole binary64 (* (pow l 2) (- (* 2 (/ 1 (* (pow k 2) t))) (* 1/3 (/ 1 t))))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (* (+ (* (* k k) -1/3) 2) (* l l)) #s(hole binary64 (* (pow l 2) (+ 2 (* -1/3 (pow k 2))))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (/ (pow (sin k) 2) (pow l 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (pow l 2))))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx k #s(hole binary64 k))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (* -1/3 t) (* -1/2 t)))))))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (+ (* -1/3 t) (* (pow k 2) (- (* 2/45 t) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t))))) (* -1/2 t)))))))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (+ (* -1/3 t) (* (pow k 2) (- (+ (* 2/45 t) (* (pow k 2) (- (* -1/315 t) (+ (* -1/2 (- (* 2/45 t) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t)))) (+ (* -1/720 t) (* 1/24 (- (* -1/3 t) (* -1/2 t)))))))) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t))))) (* -1/2 t)))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (pow k 2)))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 2/45 (pow k 2)) 1/3))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/45 (* -1/315 (pow k 2)))) 1/3))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx (cos k) #s(hole binary64 1))
#s(approx (cos k) #s(hole binary64 (+ 1 (* -1/2 (pow k 2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 1/24 (pow k 2)) 1/2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/24 (* -1/720 (pow k 2)))) 1/2)))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 2))))
#s(approx (* k k) #s(hole binary64 (pow k 2)))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (* (+ (* (* k k) -1/3) 2) (* l l)) #s(hole binary64 (* 2 (pow l 2))))
#s(approx (* (+ (* (* k k) -1/3) 2) (* l l)) #s(hole binary64 (+ (* -1/3 (* (pow k 2) (pow l 2))) (* 2 (pow l 2)))))
#s(approx (+ (* (* k k) -1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* k k) -1/3) 2) #s(hole binary64 (+ 2 (* -1/3 (pow k 2)))))
#s(approx (* (* k k) -1/3) #s(hole binary64 (* -1/3 (pow k 2))))
#s(approx (pow k 4) #s(hole binary64 (pow k 4)))
#s(approx (* (/ (* k (* k t)) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (/ (* k (* k t)) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* k (* k t)) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* k (* k t)) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* k (* k t)) (cos k)) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* k (* k t)) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* 1/2 (* (pow k 2) t))))))
#s(approx (/ (* k (* k t)) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/4 t) (* 1/24 t)))) (* -1/2 t)))))))
#s(approx (/ (* k (* k t)) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/720 t) (+ (* 1/48 t) (* 1/2 (+ (* -1/4 t) (* 1/24 t))))))) (+ (* -1/4 t) (* 1/24 t)))) (* -1/2 t)))))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (/ (pow k 2) (pow l 2))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (/ (pow k 2) (pow l 2))) (/ 1 (pow l 2))))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (* 2/45 (/ (pow k 2) (pow l 2))) (* 1/3 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (* (pow k 2) (+ (* -1/315 (/ (pow k 2) (pow l 2))) (* 2/45 (/ 1 (pow l 2))))) (* 1/3 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (pow (sin k) 2)))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))) (pow k 2))))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) #s(hole binary64 (/ (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))) (pow k 2))))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) #s(hole binary64 (* -1/3 (/ (pow l 2) t))))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) #s(hole binary64 (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t))))))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) #s(hole binary64 (/ (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))) (pow k 2))))
#s(approx (* (+ (* (* k k) -1/3) 2) (* l l)) #s(hole binary64 (* -1/3 (* (pow k 2) (pow l 2)))))
#s(approx (* (+ (* (* k k) -1/3) 2) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (pow l 2)) (* 2 (/ (pow l 2) (pow k 2)))))))
#s(approx (+ (* (* k k) -1/3) 2) #s(hole binary64 (* -1/3 (pow k 2))))
#s(approx (+ (* (* k k) -1/3) 2) #s(hole binary64 (* (pow k 2) (- (* 2 (/ 1 (pow k 2))) 1/3))))
Calls

9 calls:

TimeVariablePointExpression
21.0ms
t
@inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (/ (* k k) (* l l)) k l (/ (* (pow (sin k) 2) t) (cos k)) (* (pow (sin k) 2) t) (pow (sin k) 2) (sin k) t (cos k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (* (/ (/ (* l l) (* k k)) t) -1/3) (/ (/ (* l l) (* k k)) t) (/ (* l l) (* k k)) -1/3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3) (/ (* l l) t) (* l l) (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (* (+ (* (* k k) -1/3) 2) (* l l)) (+ (* (* k k) -1/3) 2) (* (* k k) -1/3) (* (pow k 4) t) (pow k 4) 4 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* k (* k t)) (cos k)) (/ (* (sin k) (sin k)) (* l l))) (/ (* k (* k t)) (cos k)) (* k (* k t)) (* k t) (/ (* (sin k) (sin k)) (* l l)))
9.0ms
t
@-inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (/ (* k k) (* l l)) k l (/ (* (pow (sin k) 2) t) (cos k)) (* (pow (sin k) 2) t) (pow (sin k) 2) (sin k) t (cos k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (* (/ (/ (* l l) (* k k)) t) -1/3) (/ (/ (* l l) (* k k)) t) (/ (* l l) (* k k)) -1/3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3) (/ (* l l) t) (* l l) (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (* (+ (* (* k k) -1/3) 2) (* l l)) (+ (* (* k k) -1/3) 2) (* (* k k) -1/3) (* (pow k 4) t) (pow k 4) 4 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* k (* k t)) (cos k)) (/ (* (sin k) (sin k)) (* l l))) (/ (* k (* k t)) (cos k)) (* k (* k t)) (* k t) (/ (* (sin k) (sin k)) (* l l)))
8.0ms
t
@0
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (/ (* k k) (* l l)) k l (/ (* (pow (sin k) 2) t) (cos k)) (* (pow (sin k) 2) t) (pow (sin k) 2) (sin k) t (cos k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (* (/ (/ (* l l) (* k k)) t) -1/3) (/ (/ (* l l) (* k k)) t) (/ (* l l) (* k k)) -1/3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3) (/ (* l l) t) (* l l) (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (* (+ (* (* k k) -1/3) 2) (* l l)) (+ (* (* k k) -1/3) 2) (* (* k k) -1/3) (* (pow k 4) t) (pow k 4) 4 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* k (* k t)) (cos k)) (/ (* (sin k) (sin k)) (* l l))) (/ (* k (* k t)) (cos k)) (* k (* k t)) (* k t) (/ (* (sin k) (sin k)) (* l l)))
8.0ms
l
@inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (/ (* k k) (* l l)) k l (/ (* (pow (sin k) 2) t) (cos k)) (* (pow (sin k) 2) t) (pow (sin k) 2) (sin k) t (cos k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (* (/ (/ (* l l) (* k k)) t) -1/3) (/ (/ (* l l) (* k k)) t) (/ (* l l) (* k k)) -1/3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3) (/ (* l l) t) (* l l) (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (* (+ (* (* k k) -1/3) 2) (* l l)) (+ (* (* k k) -1/3) 2) (* (* k k) -1/3) (* (pow k 4) t) (pow k 4) 4 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* k (* k t)) (cos k)) (/ (* (sin k) (sin k)) (* l l))) (/ (* k (* k t)) (cos k)) (* k (* k t)) (* k t) (/ (* (sin k) (sin k)) (* l l)))
7.0ms
k
@inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (/ (* k k) (* l l)) k l (/ (* (pow (sin k) 2) t) (cos k)) (* (pow (sin k) 2) t) (pow (sin k) 2) (sin k) t (cos k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (* (/ (/ (* l l) (* k k)) t) -1/3) (/ (/ (* l l) (* k k)) t) (/ (* l l) (* k k)) -1/3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3) (/ (* l l) t) (* l l) (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (* (+ (* (* k k) -1/3) 2) (* l l)) (+ (* (* k k) -1/3) 2) (* (* k k) -1/3) (* (pow k 4) t) (pow k 4) 4 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* k (* k t)) (cos k)) (/ (* (sin k) (sin k)) (* l l))) (/ (* k (* k t)) (cos k)) (* k (* k t)) (* k t) (/ (* (sin k) (sin k)) (* l l)))

rewrite148.0ms (0.9%)

Memory
-39.2MiB live, 55.8MiB allocated; 3ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04853847
05393463
127143451
080053327
Stop Event
iter limit
node limit
iter limit
Counts
149 → 713
Calls
Call 1
Inputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k)))))
#s(literal 2 binary64)
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k))))
(*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k)))
(ratio-of-squares.f64 k l)
k
l
(/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(sin.f64 k)
t
(cos.f64 k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64)))
(*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))
(/.f64 (ratio-of-squares.f64 l k) t)
(ratio-of-squares.f64 l k)
#s(literal -1/3 binary64)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k)))
(/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))
(+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)))
(*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64))
(*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))
(/.f64 (*.f64 l l) t)
(*.f64 l l)
(*.f64 k k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t))
(*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l))
(+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64))
(*.f64 (*.f64 k k) #s(literal -1/3 binary64))
(*.f64 (pow.f64 k #s(literal 4 binary64)) t)
(pow.f64 k #s(literal 4 binary64))
#s(literal 4 binary64)
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))
(*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))
(/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k))
(*.f64 k (*.f64 k t))
(*.f64 k t)
(ratio-of-squares.f64 (sin.f64 k) l)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (/ (* t (pow (sin k) 2)) (cos k))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* t (pow (sin k) 2))))
#s(approx t #s(hole binary64 t))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (* (pow k 2) (pow l 2))) (* 2 (pow l 2))) (* (pow k 4) t))))
#s(approx (* (/ (/ (* l l) (* k k)) t) -1/3) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (/ (* l l) (* k k)) t) #s(hole binary64 (/ (pow l 2) (* (pow k 2) t))))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) #s(hole binary64 (/ (+ (* -1/3 (pow l 2)) (* 2 (/ (pow l 2) (pow k 2)))) (* (pow k 2) t))))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) #s(hole binary64 (/ (+ (* -1/3 (pow l 2)) (* 2 (/ (pow l 2) (pow k 2)))) t)))
#s(approx (* (/ (/ (* l l) (* k k)) t) 2) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (* (/ (* l l) t) -1/3) #s(hole binary64 (* -1/3 (/ (pow l 2) t))))
#s(approx (/ (* l l) t) #s(hole binary64 (/ (pow l 2) t)))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) #s(hole binary64 (/ (* (pow l 2) (+ 2 (* -1/3 (pow k 2)))) (* (pow k 4) t))))
#s(approx (* (pow k 4) t) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (/ (* k (* k t)) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (/ (* k (* k t)) (cos k)) #s(hole binary64 (/ (* (pow k 2) t) (cos k))))
#s(approx (* k (* k t)) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* k t) #s(hole binary64 (* k t)))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) #s(hole binary64 (* -1 (/ (+ (* -2 (/ (pow l 2) (pow k 2))) (* 1/3 (pow l 2))) (* (pow k 2) t)))))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) #s(hole binary64 (* -1 (/ (+ (* -2 (/ (pow l 2) (pow k 2))) (* 1/3 (pow l 2))) t))))
#s(approx (/ (* k k) (* l l)) #s(hole binary64 (/ (pow k 2) (pow l 2))))
#s(approx l #s(hole binary64 l))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (* (pow l 2) (+ 2 (* -1/3 (pow k 2)))) (* (pow k 4) t))))
#s(approx (/ (* l l) (* k k)) #s(hole binary64 (/ (pow l 2) (pow k 2))))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) #s(hole binary64 (/ (* (pow l 2) (- (* 2 (/ 1 (* (pow k 2) t))) (* 1/3 (/ 1 t)))) (pow k 2))))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) #s(hole binary64 (* (pow l 2) (- (* 2 (/ 1 (* (pow k 2) t))) (* 1/3 (/ 1 t))))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (* (+ (* (* k k) -1/3) 2) (* l l)) #s(hole binary64 (* (pow l 2) (+ 2 (* -1/3 (pow k 2))))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (/ (pow (sin k) 2) (pow l 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (pow l 2))))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx k #s(hole binary64 k))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (* -1/3 t) (* -1/2 t)))))))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (+ (* -1/3 t) (* (pow k 2) (- (* 2/45 t) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t))))) (* -1/2 t)))))))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (+ (* -1/3 t) (* (pow k 2) (- (+ (* 2/45 t) (* (pow k 2) (- (* -1/315 t) (+ (* -1/2 (- (* 2/45 t) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t)))) (+ (* -1/720 t) (* 1/24 (- (* -1/3 t) (* -1/2 t)))))))) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t))))) (* -1/2 t)))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (pow k 2)))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 2/45 (pow k 2)) 1/3))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/45 (* -1/315 (pow k 2)))) 1/3))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx (cos k) #s(hole binary64 1))
#s(approx (cos k) #s(hole binary64 (+ 1 (* -1/2 (pow k 2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 1/24 (pow k 2)) 1/2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/24 (* -1/720 (pow k 2)))) 1/2)))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 2))))
#s(approx (* k k) #s(hole binary64 (pow k 2)))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (* (+ (* (* k k) -1/3) 2) (* l l)) #s(hole binary64 (* 2 (pow l 2))))
#s(approx (* (+ (* (* k k) -1/3) 2) (* l l)) #s(hole binary64 (+ (* -1/3 (* (pow k 2) (pow l 2))) (* 2 (pow l 2)))))
#s(approx (+ (* (* k k) -1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* k k) -1/3) 2) #s(hole binary64 (+ 2 (* -1/3 (pow k 2)))))
#s(approx (* (* k k) -1/3) #s(hole binary64 (* -1/3 (pow k 2))))
#s(approx (pow k 4) #s(hole binary64 (pow k 4)))
#s(approx (* (/ (* k (* k t)) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (/ (* k (* k t)) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* k (* k t)) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* k (* k t)) (cos k)) (/ (* (sin k) (sin k)) (* l l))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* k (* k t)) (cos k)) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* k (* k t)) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* 1/2 (* (pow k 2) t))))))
#s(approx (/ (* k (* k t)) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/4 t) (* 1/24 t)))) (* -1/2 t)))))))
#s(approx (/ (* k (* k t)) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/720 t) (+ (* 1/48 t) (* 1/2 (+ (* -1/4 t) (* 1/24 t))))))) (+ (* -1/4 t) (* 1/24 t)))) (* -1/2 t)))))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (/ (pow k 2) (pow l 2))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (/ (pow k 2) (pow l 2))) (/ 1 (pow l 2))))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (* 2/45 (/ (pow k 2) (pow l 2))) (* 1/3 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (/ (* (sin k) (sin k)) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (* (pow k 2) (+ (* -1/315 (/ (pow k 2) (pow l 2))) (* 2/45 (/ 1 (pow l 2))))) (* 1/3 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (pow (sin k) 2)))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))) (pow k 2))))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) #s(hole binary64 (/ (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))) (pow k 2))))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) #s(hole binary64 (* -1/3 (/ (pow l 2) t))))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) #s(hole binary64 (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t))))))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) #s(hole binary64 (/ (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))) (pow k 2))))
#s(approx (* (+ (* (* k k) -1/3) 2) (* l l)) #s(hole binary64 (* -1/3 (* (pow k 2) (pow l 2)))))
#s(approx (* (+ (* (* k k) -1/3) 2) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (pow l 2)) (* 2 (/ (pow l 2) (pow k 2)))))))
#s(approx (+ (* (* k k) -1/3) 2) #s(hole binary64 (* -1/3 (pow k 2))))
#s(approx (+ (* (* k k) -1/3) 2) #s(hole binary64 (* (pow k 2) (- (* 2 (/ 1 (pow k 2))) 1/3))))
Outputs
(/.f64 #s(literal -2 binary64) (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k)))))))
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))))))
(+.f64 (/.f64 #s(literal 1 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k)))))) (/.f64 #s(literal 1 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k)))))))
#s(literal 2 binary64)
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k)))))
(*.f64 (/.f64 (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))) (neg.f64 l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (neg.f64 l)))
(*.f64 (/.f64 (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))) (fabs.f64 l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (fabs.f64 l)))
(*.f64 (/.f64 (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))) l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l))
(*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 l l)) (/.f64 (*.f64 k k) (cos.f64 k)))
(*.f64 (/.f64 (*.f64 k k) (cos.f64 k)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 l l)))
(*.f64 (/.f64 (*.f64 k k) (neg.f64 l)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))) (neg.f64 l)))
(*.f64 (/.f64 (*.f64 k k) (fabs.f64 l)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))) (fabs.f64 l)))
(*.f64 (/.f64 (*.f64 k k) l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))) l))
(*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))
(*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))))
(*.f64 (ratio-of-squares.f64 (sin.f64 k) l) (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))))
(*.f64 (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))) (ratio-of-squares.f64 (sin.f64 k) l))
(*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))) (ratio-of-squares.f64 k l))
(*.f64 (*.f64 k k) (*.f64 (/.f64 t (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) l) (/.f64 (*.f64 k k) l))) (neg.f64 (cos.f64 k)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (ratio-of-squares.f64 (sin.f64 k) l))) (neg.f64 (cos.f64 k)))
(/.f64 (neg.f64 (*.f64 (*.f64 k k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))))) (neg.f64 (*.f64 l l)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (neg.f64 (*.f64 l l)))
(/.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) (neg.f64 (cos.f64 k)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (*.f64 (cos.f64 k) (*.f64 l l)))))
(/.f64 (*.f64 (/.f64 (*.f64 k k) l) (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) (*.f64 l (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l (cos.f64 k)))
(/.f64 (*.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) (*.f64 (neg.f64 (*.f64 l l)) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (*.f64 k k) (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) (*.f64 (*.f64 l l) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l) (neg.f64 (*.f64 (*.f64 k k) t))) (*.f64 l (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l) (*.f64 (*.f64 k k) t)) (*.f64 l (cos.f64 k)))
(/.f64 (*.f64 (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 k k) t))) (*.f64 (neg.f64 (*.f64 l l)) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 (*.f64 k k) t)) (*.f64 (neg.f64 (*.f64 l l)) (cos.f64 k)))
(/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 k k) t))) (*.f64 (*.f64 l l) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k k) t)) (*.f64 (cos.f64 k) (*.f64 l l)))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 k k) t)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l)) (*.f64 (neg.f64 (cos.f64 k)) l))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 k k) t)) (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 k)) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 k k) t)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 k)) (*.f64 l l)))
(/.f64 (*.f64 (*.f64 (*.f64 k k) t) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l)) (*.f64 (cos.f64 k) l))
(/.f64 (*.f64 (*.f64 (*.f64 k k) t) (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (*.f64 (cos.f64 k) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (/.f64 (*.f64 k k) l)) (*.f64 (neg.f64 (cos.f64 k)) l))
(/.f64 (*.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (neg.f64 (*.f64 k k))) (*.f64 (neg.f64 (cos.f64 k)) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 k k)) (*.f64 (neg.f64 (cos.f64 k)) (*.f64 l l)))
(/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (/.f64 (*.f64 k k) l)) (*.f64 (cos.f64 k) l))
(/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (neg.f64 (*.f64 k k))) (*.f64 (cos.f64 k) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (neg.f64 (*.f64 k k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 (neg.f64 (*.f64 l l)) (cos.f64 k)))
(/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) l) (/.f64 (*.f64 k k) l)) (cos.f64 k))
(/.f64 (*.f64 (*.f64 (*.f64 k k) t) (ratio-of-squares.f64 (sin.f64 k) l)) (cos.f64 k))
(/.f64 (*.f64 (*.f64 k k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k)))) (*.f64 l l))
(/.f64 (*.f64 (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 l l))
(/.f64 (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (cos.f64 k))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (neg.f64 (*.f64 (cos.f64 k) (*.f64 l l))))
(/.f64 (*.f64 (*.f64 (*.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 (cos.f64 k) (*.f64 l l)))
(*.f64 (/.f64 (fabs.f64 k) (neg.f64 l)) (/.f64 (fabs.f64 k) (neg.f64 l)))
(*.f64 (/.f64 (fabs.f64 k) (fabs.f64 l)) (/.f64 (fabs.f64 k) (fabs.f64 l)))
(*.f64 (/.f64 (fabs.f64 k) l) (/.f64 (fabs.f64 k) l))
(*.f64 (/.f64 (neg.f64 k) (fabs.f64 l)) (/.f64 (neg.f64 k) (fabs.f64 l)))
(*.f64 (/.f64 (neg.f64 k) l) (/.f64 (neg.f64 k) l))
(*.f64 (/.f64 k (neg.f64 l)) (/.f64 k (neg.f64 l)))
(*.f64 (/.f64 k (fabs.f64 l)) (/.f64 k (fabs.f64 l)))
(*.f64 (neg.f64 (/.f64 k l)) (neg.f64 (/.f64 k l)))
(*.f64 (fabs.f64 (/.f64 k l)) (fabs.f64 (/.f64 k l)))
(*.f64 (/.f64 k l) (/.f64 k l))
(*.f64 k (/.f64 k (*.f64 l l)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 k)) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 k)) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 k)) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 k)) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 k)) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 k)) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 k)) l)
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 k)) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 k)) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 k)) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 k)) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 k)) (neg.f64 l))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 k)) (fabs.f64 l))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 k)) l)
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) (neg.f64 l))
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) (fabs.f64 l))
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) l)
(ratio-of-squares.f64 (neg.f64 (neg.f64 k)) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 k)) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 k)) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 k)) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 k)) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 (neg.f64 k)) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 (neg.f64 k)) l)
(ratio-of-squares.f64 (fabs.f64 k) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (fabs.f64 k) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (fabs.f64 k) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (fabs.f64 k) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (fabs.f64 k) (neg.f64 l))
(ratio-of-squares.f64 (fabs.f64 k) (fabs.f64 l))
(ratio-of-squares.f64 (fabs.f64 k) l)
(ratio-of-squares.f64 (neg.f64 k) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (neg.f64 k) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 k) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 k) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (neg.f64 k) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 k) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 k) l)
(ratio-of-squares.f64 k (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 k (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 k (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 k (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 k (neg.f64 l))
(ratio-of-squares.f64 k (fabs.f64 l))
(ratio-of-squares.f64 k l)
(pow.f64 (/.f64 k l) #s(literal 2 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 k k) l)) (neg.f64 l))
(/.f64 (neg.f64 (neg.f64 (*.f64 k k))) (neg.f64 (neg.f64 (*.f64 l l))))
(/.f64 (/.f64 (*.f64 k k) l) l)
(/.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 k k) (*.f64 l l))
(exp.f64 (-.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))
k
l
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k)))
(*.f64 t (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) (neg.f64 (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 k k)) (cos.f64 (+.f64 k k))) t) (*.f64 #s(literal 2 binary64) (cos.f64 k)))
(/.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (neg.f64 (cos.f64 k)))
(/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)
(*.f64 t (pow.f64 (sin.f64 k) #s(literal 2 binary64)))
(*.f64 (neg.f64 (neg.f64 (sin.f64 k))) (neg.f64 (neg.f64 (sin.f64 k))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 k))) (neg.f64 (fabs.f64 (sin.f64 k))))
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 k))) (fabs.f64 (fabs.f64 (sin.f64 k))))
(*.f64 (exp.f64 (log.f64 (sin.f64 k))) (exp.f64 (log.f64 (sin.f64 k))))
(*.f64 (neg.f64 (sin.f64 k)) (neg.f64 (sin.f64 k)))
(*.f64 (fabs.f64 (sin.f64 k)) (fabs.f64 (sin.f64 k)))
(*.f64 (sin.f64 k) (sin.f64 k))
(pow.f64 (exp.f64 (log.f64 (sin.f64 k))) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 k)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (sin.f64 k)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 k k)) (cos.f64 (+.f64 k k)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 k k)) (cos.f64 (+.f64 k k))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 k) #s(literal -2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 k k)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 k k)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))))
(fabs.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))
(pow.f64 (sin.f64 k) #s(literal 1 binary64))
(sin.f64 k)
(exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 1 binary64)))
t
(sin.f64 (+.f64 (neg.f64 k) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 k)))
(cos.f64 (neg.f64 k))
(cos.f64 k)
(+.f64 (*.f64 (sin.f64 k) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 k) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (*.f64 (/.f64 #s(literal -1/3 binary64) t) (ratio-of-squares.f64 l k))))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (*.f64 (/.f64 #s(literal -1/3 binary64) t) (ratio-of-squares.f64 l k)))
(*.f64 (/.f64 #s(literal -1/3 binary64) (*.f64 k t)) (/.f64 (*.f64 l l) k))
(*.f64 (/.f64 #s(literal -1/3 binary64) t) (ratio-of-squares.f64 l k))
(*.f64 (/.f64 #s(literal -1/3 binary64) (*.f64 k k)) (/.f64 (*.f64 l l) t))
(*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))
(*.f64 (/.f64 #s(literal -1/3 binary64) k) (/.f64 (*.f64 l l) (*.f64 k t)))
(*.f64 (/.f64 (*.f64 l l) k) (/.f64 #s(literal -1/3 binary64) (*.f64 k t)))
(*.f64 (/.f64 (*.f64 l l) t) (/.f64 #s(literal -1/3 binary64) (*.f64 k k)))
(*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))
(*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))
(*.f64 #s(literal -1/3 binary64) (/.f64 (ratio-of-squares.f64 l k) t))
(/.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64))) (neg.f64 t))
(/.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) (neg.f64 (*.f64 (*.f64 k k) t)))
(/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)
(/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))
(*.f64 (/.f64 (neg.f64 l) (*.f64 k t)) (/.f64 (neg.f64 l) k))
(*.f64 (/.f64 (fabs.f64 l) (*.f64 k t)) (/.f64 (fabs.f64 l) k))
(*.f64 (/.f64 (neg.f64 l) t) (/.f64 (neg.f64 l) (*.f64 k k)))
(*.f64 (/.f64 (fabs.f64 l) t) (/.f64 (fabs.f64 l) (*.f64 k k)))
(*.f64 (/.f64 (neg.f64 l) (*.f64 k k)) (/.f64 (neg.f64 l) t))
(*.f64 (/.f64 (fabs.f64 l) (*.f64 k k)) (/.f64 (fabs.f64 l) t))
(*.f64 (/.f64 (neg.f64 l) k) (/.f64 (neg.f64 l) (*.f64 k t)))
(*.f64 (/.f64 (fabs.f64 l) k) (/.f64 (fabs.f64 l) (*.f64 k t)))
(*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k))
(*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t))
(*.f64 (/.f64 l t) (/.f64 l (*.f64 k k)))
(*.f64 (/.f64 l k) (/.f64 l (*.f64 k t)))
(/.f64 (neg.f64 (neg.f64 (ratio-of-squares.f64 l k))) (neg.f64 (neg.f64 t)))
(/.f64 (neg.f64 (neg.f64 (*.f64 l l))) (neg.f64 (neg.f64 (*.f64 (*.f64 k k) t))))
(/.f64 (neg.f64 (ratio-of-squares.f64 l k)) (neg.f64 t))
(/.f64 (neg.f64 (*.f64 l l)) (neg.f64 (*.f64 (*.f64 k k) t)))
(/.f64 (ratio-of-squares.f64 l k) t)
(/.f64 (*.f64 l l) (*.f64 (*.f64 k k) t))
(*.f64 (/.f64 (neg.f64 l) (fabs.f64 k)) (/.f64 (neg.f64 l) (fabs.f64 k)))
(*.f64 (/.f64 (neg.f64 l) k) (/.f64 (neg.f64 l) k))
(*.f64 (/.f64 (fabs.f64 l) (fabs.f64 k)) (/.f64 (fabs.f64 l) (fabs.f64 k)))
(*.f64 (/.f64 (fabs.f64 l) (neg.f64 k)) (/.f64 (fabs.f64 l) (neg.f64 k)))
(*.f64 (/.f64 (fabs.f64 l) k) (/.f64 (fabs.f64 l) k))
(*.f64 (/.f64 l (fabs.f64 k)) (/.f64 l (fabs.f64 k)))
(*.f64 (/.f64 l (neg.f64 k)) (/.f64 l (neg.f64 k)))
(*.f64 (neg.f64 (/.f64 l k)) (neg.f64 (/.f64 l k)))
(*.f64 (fabs.f64 (/.f64 l k)) (fabs.f64 (/.f64 l k)))
(*.f64 (/.f64 l k) (/.f64 l k))
(*.f64 l (/.f64 l (*.f64 k k)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (fabs.f64 k))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (neg.f64 k))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) k)
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (fabs.f64 k))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (neg.f64 k))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) k)
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 k))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (neg.f64 k))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) k)
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (fabs.f64 k))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (neg.f64 k))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) k)
(ratio-of-squares.f64 (neg.f64 l) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 l) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 l) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (neg.f64 l) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (neg.f64 l) (fabs.f64 k))
(ratio-of-squares.f64 (neg.f64 l) (neg.f64 k))
(ratio-of-squares.f64 (neg.f64 l) k)
(ratio-of-squares.f64 (fabs.f64 l) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (fabs.f64 l) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (fabs.f64 l) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (fabs.f64 l) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (fabs.f64 l) (fabs.f64 k))
(ratio-of-squares.f64 (fabs.f64 l) (neg.f64 k))
(ratio-of-squares.f64 (fabs.f64 l) k)
(ratio-of-squares.f64 l (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 l (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 l (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 l (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 l (fabs.f64 k))
(ratio-of-squares.f64 l (neg.f64 k))
(ratio-of-squares.f64 l k)
(pow.f64 (/.f64 l k) #s(literal 2 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 l l) k)) (neg.f64 k))
(/.f64 (neg.f64 (neg.f64 (*.f64 l l))) (neg.f64 (neg.f64 (*.f64 k k))))
(/.f64 (/.f64 (*.f64 l l) k) k)
(/.f64 (neg.f64 (*.f64 l l)) (neg.f64 (*.f64 k k)))
(/.f64 (*.f64 l l) (*.f64 k k))
(exp.f64 (-.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)) (*.f64 (log.f64 k) #s(literal 2 binary64))))
#s(literal -1/3 binary64)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k)))
(/.f64 (neg.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) k)) (neg.f64 k))
(/.f64 (neg.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t))) (neg.f64 (neg.f64 (*.f64 k k))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)) (*.f64 k k)) (*.f64 (*.f64 k k) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)))) (pow.f64 k #s(literal 4 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)) (*.f64 k k)) (*.f64 (*.f64 k k) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)))) (pow.f64 k #s(literal 4 binary64)))
(/.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) k) k)
(/.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t)) (neg.f64 (*.f64 k k)))
(/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 l l) t) k) (/.f64 #s(literal -1/3 binary64) k)) (/.f64 (*.f64 #s(literal -2 binary64) (/.f64 (ratio-of-squares.f64 l k) t)) (*.f64 k k)))
(-.f64 (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)) (*.f64 k k)) (/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 l l) t)) #s(literal -1/3 binary64)) (*.f64 k k)))
(+.f64 (*.f64 (/.f64 (/.f64 (*.f64 l l) t) k) (/.f64 #s(literal -1/3 binary64) k)) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)) (*.f64 k k)))
(+.f64 (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)) (*.f64 k k)) (*.f64 (/.f64 (/.f64 (*.f64 l l) t) k) (/.f64 #s(literal -1/3 binary64) k)))
(/.f64 (neg.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t) (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64))) t)))
(/.f64 (neg.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t))) (neg.f64 (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t) (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (-.f64 (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))))) (neg.f64 (neg.f64 t)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t) (*.f64 t (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)))) (*.f64 t t))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t)) (*.f64 t (*.f64 (*.f64 l l) #s(literal 2 binary64)))) (*.f64 t (*.f64 (*.f64 k k) t)))
(/.f64 (+.f64 (*.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (*.f64 t (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (*.f64 t t))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) t) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (*.f64 (*.f64 (*.f64 k k) t) t))
(/.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t) (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t)) (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64))) t))
(/.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t)) (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)) #s(literal 3 binary64))) (+.f64 (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t) (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)) #s(literal 3 binary64))) (+.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (-.f64 (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k)))) (neg.f64 t))
(/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t)
(-.f64 (/.f64 (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t) (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64))) t)) (/.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64))) t)))
(-.f64 (/.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)) (/.f64 (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t) (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)))
(-.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (ratio-of-squares.f64 l k) t)))
(-.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k)) t))
(-.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)) (*.f64 (neg.f64 (/.f64 (*.f64 l l) t)) #s(literal -1/3 binary64)))
(+.f64 (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)) #s(literal 3 binary64)) (+.f64 (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t) (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)))))) (/.f64 (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)) #s(literal 3 binary64)) (+.f64 (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t) (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (*.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)))))))
(+.f64 (/.f64 (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)) #s(literal 3 binary64)) (+.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (-.f64 (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)))))) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)) #s(literal 3 binary64)) (+.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (-.f64 (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)))))))
(+.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)))
(+.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k t)) (/.f64 l k))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k k)) (/.f64 l t))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) t) (/.f64 l (*.f64 k k)))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k t)) (/.f64 (*.f64 l l) k))
(*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal 2 binary64) k))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) k) (/.f64 l (*.f64 k t)))
(*.f64 (/.f64 #s(literal 2 binary64) k) (/.f64 (*.f64 l l) (*.f64 k t)))
(*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))
(*.f64 (/.f64 (*.f64 l l) k) (/.f64 #s(literal 2 binary64) (*.f64 k t)))
(*.f64 (*.f64 (pow.f64 k #s(literal -2 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 l l) t))
(*.f64 (/.f64 (*.f64 l l) t) (*.f64 (pow.f64 k #s(literal -2 binary64)) #s(literal 2 binary64)))
(*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal 2 binary64) t))
(*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 (ratio-of-squares.f64 l k) t))
(/.f64 (+.f64 (neg.f64 (ratio-of-squares.f64 l k)) (neg.f64 (ratio-of-squares.f64 l k))) (neg.f64 t))
(/.f64 (+.f64 (neg.f64 (*.f64 l l)) (neg.f64 (*.f64 l l))) (neg.f64 (*.f64 (*.f64 k k) t)))
(/.f64 (*.f64 (neg.f64 (ratio-of-squares.f64 l k)) #s(literal 4 binary64)) (*.f64 (neg.f64 t) #s(literal 2 binary64)))
(/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 4 binary64)) (*.f64 t #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 4 binary64) (neg.f64 (ratio-of-squares.f64 l k))) (*.f64 #s(literal 2 binary64) (neg.f64 t)))
(/.f64 (*.f64 #s(literal 4 binary64) (ratio-of-squares.f64 l k)) (*.f64 #s(literal 2 binary64) t))
(/.f64 (*.f64 (neg.f64 (*.f64 l l)) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (*.f64 k k) t)) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 k k) t) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 4 binary64) (neg.f64 (*.f64 l l))) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 (*.f64 k k) t))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) t)))
(/.f64 (+.f64 (*.f64 (neg.f64 (ratio-of-squares.f64 l k)) (neg.f64 t)) (*.f64 (neg.f64 t) (neg.f64 (ratio-of-squares.f64 l k)))) (*.f64 t t))
(/.f64 (+.f64 (*.f64 (neg.f64 (ratio-of-squares.f64 l k)) (neg.f64 (*.f64 (*.f64 k k) t))) (*.f64 (neg.f64 t) (neg.f64 (*.f64 l l)))) (*.f64 (neg.f64 t) (neg.f64 (*.f64 (*.f64 k k) t))))
(/.f64 (+.f64 (*.f64 (neg.f64 (ratio-of-squares.f64 l k)) t) (*.f64 (neg.f64 t) (ratio-of-squares.f64 l k))) (*.f64 (neg.f64 t) t))
(/.f64 (+.f64 (*.f64 (neg.f64 (ratio-of-squares.f64 l k)) (*.f64 (*.f64 k k) t)) (*.f64 (neg.f64 t) (*.f64 l l))) (*.f64 (neg.f64 t) (*.f64 (*.f64 k k) t)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 l l)) (neg.f64 t)) (*.f64 (neg.f64 (*.f64 (*.f64 k k) t)) (neg.f64 (ratio-of-squares.f64 l k)))) (*.f64 (neg.f64 (*.f64 (*.f64 k k) t)) (neg.f64 t)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 l l)) (neg.f64 (*.f64 (*.f64 k k) t))) (*.f64 (neg.f64 (*.f64 (*.f64 k k) t)) (neg.f64 (*.f64 l l)))) (*.f64 (neg.f64 (*.f64 (*.f64 k k) t)) (neg.f64 (*.f64 (*.f64 k k) t))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 l l)) t) (*.f64 (neg.f64 (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l k))) (*.f64 (neg.f64 (*.f64 (*.f64 k k) t)) t))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 l l)) (*.f64 (*.f64 k k) t)) (*.f64 (neg.f64 (*.f64 (*.f64 k k) t)) (*.f64 l l))) (*.f64 (neg.f64 (*.f64 (*.f64 k k) t)) (*.f64 (*.f64 k k) t)))
(/.f64 (+.f64 (*.f64 (ratio-of-squares.f64 l k) (neg.f64 t)) (*.f64 t (neg.f64 (ratio-of-squares.f64 l k)))) (*.f64 t (neg.f64 t)))
(/.f64 (+.f64 (*.f64 (ratio-of-squares.f64 l k) (neg.f64 (*.f64 (*.f64 k k) t))) (*.f64 t (neg.f64 (*.f64 l l)))) (*.f64 t (neg.f64 (*.f64 (*.f64 k k) t))))
(/.f64 (+.f64 (*.f64 (ratio-of-squares.f64 l k) t) (*.f64 t (ratio-of-squares.f64 l k))) (*.f64 t t))
(/.f64 (+.f64 (*.f64 (ratio-of-squares.f64 l k) (*.f64 (*.f64 k k) t)) (*.f64 t (*.f64 l l))) (*.f64 t (*.f64 (*.f64 k k) t)))
(/.f64 (+.f64 (*.f64 (*.f64 l l) (neg.f64 t)) (*.f64 (*.f64 (*.f64 k k) t) (neg.f64 (ratio-of-squares.f64 l k)))) (*.f64 (*.f64 (*.f64 k k) t) (neg.f64 t)))
(/.f64 (+.f64 (*.f64 (*.f64 l l) (neg.f64 (*.f64 (*.f64 k k) t))) (*.f64 (*.f64 (*.f64 k k) t) (neg.f64 (*.f64 l l)))) (*.f64 (*.f64 (*.f64 k k) t) (neg.f64 (*.f64 (*.f64 k k) t))))
(/.f64 (+.f64 (*.f64 (*.f64 l l) t) (*.f64 (*.f64 (*.f64 k k) t) (ratio-of-squares.f64 l k))) (*.f64 (*.f64 (*.f64 k k) t) t))
(/.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 k k) t)) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 (*.f64 k k) t)))
(/.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 k k) t)))
(/.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64))) (neg.f64 t))
(/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t)
(/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 k k) t))
(+.f64 (/.f64 (ratio-of-squares.f64 l k) t) (/.f64 (ratio-of-squares.f64 l k) t))
(*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))
(*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) t))
(/.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) (neg.f64 t))
(/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t)
(*.f64 l (/.f64 l t))
(/.f64 (neg.f64 (neg.f64 (*.f64 l l))) (neg.f64 (neg.f64 t)))
(/.f64 (neg.f64 (*.f64 l l)) (neg.f64 t))
(/.f64 (*.f64 l l) t)
(*.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))
(/.f64 #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 (neg.f64 (fabs.f64 k)) (neg.f64 (fabs.f64 k)))
(*.f64 (fabs.f64 (fabs.f64 k)) (fabs.f64 (fabs.f64 k)))
(*.f64 (exp.f64 (log.f64 k)) (exp.f64 (log.f64 k)))
(*.f64 (neg.f64 (neg.f64 k)) (neg.f64 (neg.f64 k)))
(*.f64 (fabs.f64 k) (fabs.f64 k))
(*.f64 (neg.f64 k) (neg.f64 k))
(*.f64 k k)
(pow.f64 (exp.f64 (log.f64 k)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 k) #s(literal 2 binary64))
(pow.f64 (neg.f64 k) #s(literal 2 binary64))
(pow.f64 (*.f64 k k) #s(literal 1 binary64))
(pow.f64 k #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 k #s(literal -2 binary64)))
(fabs.f64 (*.f64 k k))
(exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) l) t) (/.f64 l (pow.f64 k #s(literal 4 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) t) (ratio-of-squares.f64 l (*.f64 k k)))
(*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) t))
(*.f64 (/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (pow.f64 k #s(literal 4 binary64))) (/.f64 (*.f64 l l) t))
(*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t))
(*.f64 (/.f64 (*.f64 l l) t) (/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (pow.f64 k #s(literal 4 binary64))))
(*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64)))) (neg.f64 t))
(/.f64 (neg.f64 (neg.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (*.f64 l l)))) (neg.f64 (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (*.f64 l l)) t))) (neg.f64 (neg.f64 (pow.f64 k #s(literal 4 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (neg.f64 (*.f64 l l))) (*.f64 (pow.f64 k #s(literal 4 binary64)) (neg.f64 t)))
(/.f64 (*.f64 (-.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64))) (ratio-of-squares.f64 l (*.f64 k k))) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) #s(literal -1/3 binary64))) t))
(/.f64 (*.f64 (-.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64))) (neg.f64 (*.f64 l l))) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) #s(literal -1/3 binary64))) (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t))))
(/.f64 (*.f64 (-.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) #s(literal -1/3 binary64))) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (ratio-of-squares.f64 l (*.f64 k k))) (*.f64 (-.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (neg.f64 (*.f64 l l))) (*.f64 (-.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 l l)) (*.f64 (-.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (*.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 3 binary64))) (ratio-of-squares.f64 l (*.f64 k k))) (*.f64 (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) #s(literal -1/3 binary64))))) t))
(/.f64 (*.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 3 binary64))) (neg.f64 (*.f64 l l))) (*.f64 (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) #s(literal -1/3 binary64))))) (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t))))
(/.f64 (*.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 3 binary64))) (*.f64 l l)) (*.f64 (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) #s(literal -1/3 binary64))))) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 3 binary64)) #s(literal 8 binary64)) (ratio-of-squares.f64 l (*.f64 k k))) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)))) t))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 3 binary64)) #s(literal 8 binary64)) (neg.f64 (*.f64 l l))) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 3 binary64)) #s(literal 8 binary64)) (*.f64 l l)) (*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)))) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)) (*.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t) (*.f64 (*.f64 l l) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) t) #s(literal -1/3 binary64)) (pow.f64 k #s(literal 4 binary64))) (*.f64 (pow.f64 k #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)))) (*.f64 (pow.f64 k #s(literal 4 binary64)) (pow.f64 k #s(literal 4 binary64))))
(/.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64))) t)
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (*.f64 l l))) (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (*.f64 l l)) t)) (neg.f64 (pow.f64 k #s(literal 4 binary64))))
(/.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (*.f64 l l)) t) (pow.f64 k #s(literal 4 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t))
(-.f64 (*.f64 (ratio-of-squares.f64 (*.f64 k l) (*.f64 k k)) (/.f64 #s(literal -1/3 binary64) t)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(-.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) t) #s(literal -1/3 binary64)) (pow.f64 k #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64))))
(-.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))) (/.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 k l) #s(literal 2 binary64))) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(+.f64 (*.f64 (ratio-of-squares.f64 (*.f64 k l) (*.f64 k k)) (/.f64 #s(literal -1/3 binary64) t)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
(+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) t) #s(literal -1/3 binary64)) (pow.f64 k #s(literal 4 binary64))) (/.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)) (pow.f64 k #s(literal 4 binary64))))
(+.f64 (/.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64)) (pow.f64 k #s(literal 4 binary64))) (/.f64 (*.f64 (/.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) t) #s(literal -1/3 binary64)) (pow.f64 k #s(literal 4 binary64))))
(+.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))) (/.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 k k) #s(literal -1/3 binary64))) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(+.f64 (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))) (*.f64 (ratio-of-squares.f64 (*.f64 k l) (*.f64 k k)) (/.f64 #s(literal -1/3 binary64) t)))
(*.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) l) l)
(*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (*.f64 l l))
(*.f64 (*.f64 l l) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)))))
(-.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 k l) #s(literal 2 binary64))))
(-.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 l l)))
(+.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64)))))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)))))))
(+.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 l l) (*.f64 (*.f64 k k) #s(literal -1/3 binary64))))
(+.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)))
(+.f64 (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)) (*.f64 (*.f64 l l) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) #s(literal -1/3 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64))) (neg.f64 (-.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) #s(literal -1/3 binary64)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 3 binary64)) #s(literal 8 binary64))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) #s(literal -1/3 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) #s(literal -1/3 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 4 binary64) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) #s(literal -1/3 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) #s(literal -1/3 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (-.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64))))
(-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k)))
(+.f64 (/.f64 #s(literal 8 binary64) (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) #s(literal -1/3 binary64)))))) (/.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) #s(literal -1/3 binary64)))))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64))))) (/.f64 #s(literal 8 binary64) (+.f64 (pow.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64))
(+.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) #s(literal -1/3 binary64)))
(*.f64 (*.f64 k k) #s(literal -1/3 binary64))
(*.f64 #s(literal -1/3 binary64) (*.f64 k k))
(*.f64 k (*.f64 k #s(literal -1/3 binary64)))
(*.f64 (pow.f64 k #s(literal 4 binary64)) t)
(*.f64 t (pow.f64 k #s(literal 4 binary64)))
(*.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 k k)))
(*.f64 (*.f64 k k) (*.f64 k k))
(pow.f64 (exp.f64 (log.f64 k)) #s(literal 4 binary64))
(pow.f64 (*.f64 k k) #s(literal 2 binary64))
(pow.f64 k #s(literal 4 binary64))
(exp.f64 (+.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)) (*.f64 (log.f64 k) #s(literal 2 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 k) #s(literal 4 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 k) #s(literal 4 binary64))) (sinh.f64 (*.f64 (log.f64 k) #s(literal 4 binary64))))
#s(literal 4 binary64)
(/.f64 #s(literal -2 binary64) (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k)))))))
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))))))
(+.f64 (/.f64 #s(literal 1 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k)))))) (/.f64 #s(literal 1 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k)))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k)))))
(*.f64 (/.f64 (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))) (neg.f64 l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (neg.f64 l)))
(*.f64 (/.f64 (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))) (fabs.f64 l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (fabs.f64 l)))
(*.f64 (/.f64 (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))) l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l))
(*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 l l)) (/.f64 (*.f64 k k) (cos.f64 k)))
(*.f64 (/.f64 (*.f64 k k) (cos.f64 k)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 l l)))
(*.f64 (/.f64 (*.f64 k k) (neg.f64 l)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))) (neg.f64 l)))
(*.f64 (/.f64 (*.f64 k k) (fabs.f64 l)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))) (fabs.f64 l)))
(*.f64 (/.f64 (*.f64 k k) l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))) l))
(*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))
(*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))))
(*.f64 (ratio-of-squares.f64 (sin.f64 k) l) (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))))
(*.f64 (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))) (ratio-of-squares.f64 (sin.f64 k) l))
(*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))) (ratio-of-squares.f64 k l))
(*.f64 (*.f64 k k) (*.f64 (/.f64 t (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) l) (/.f64 (*.f64 k k) l))) (neg.f64 (cos.f64 k)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (ratio-of-squares.f64 (sin.f64 k) l))) (neg.f64 (cos.f64 k)))
(/.f64 (neg.f64 (*.f64 (*.f64 k k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))))) (neg.f64 (*.f64 l l)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (neg.f64 (*.f64 l l)))
(/.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) (neg.f64 (cos.f64 k)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (*.f64 (cos.f64 k) (*.f64 l l)))))
(/.f64 (*.f64 (/.f64 (*.f64 k k) l) (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) (*.f64 l (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l (cos.f64 k)))
(/.f64 (*.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) (*.f64 (neg.f64 (*.f64 l l)) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (*.f64 k k) (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) (*.f64 (*.f64 l l) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l) (neg.f64 (*.f64 (*.f64 k k) t))) (*.f64 l (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l) (*.f64 (*.f64 k k) t)) (*.f64 l (cos.f64 k)))
(/.f64 (*.f64 (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 k k) t))) (*.f64 (neg.f64 (*.f64 l l)) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 (*.f64 k k) t)) (*.f64 (neg.f64 (*.f64 l l)) (cos.f64 k)))
(/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 k k) t))) (*.f64 (*.f64 l l) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k k) t)) (*.f64 (cos.f64 k) (*.f64 l l)))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 k k) t)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l)) (*.f64 (neg.f64 (cos.f64 k)) l))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 k k) t)) (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 k)) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 k k) t)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 k)) (*.f64 l l)))
(/.f64 (*.f64 (*.f64 (*.f64 k k) t) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l)) (*.f64 (cos.f64 k) l))
(/.f64 (*.f64 (*.f64 (*.f64 k k) t) (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (*.f64 (cos.f64 k) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (/.f64 (*.f64 k k) l)) (*.f64 (neg.f64 (cos.f64 k)) l))
(/.f64 (*.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (neg.f64 (*.f64 k k))) (*.f64 (neg.f64 (cos.f64 k)) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 k k)) (*.f64 (neg.f64 (cos.f64 k)) (*.f64 l l)))
(/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (/.f64 (*.f64 k k) l)) (*.f64 (cos.f64 k) l))
(/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (neg.f64 (*.f64 k k))) (*.f64 (cos.f64 k) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (neg.f64 (*.f64 k k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 (neg.f64 (*.f64 l l)) (cos.f64 k)))
(/.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) l) (/.f64 (*.f64 k k) l)) (cos.f64 k))
(/.f64 (*.f64 (*.f64 (*.f64 k k) t) (ratio-of-squares.f64 (sin.f64 k) l)) (cos.f64 k))
(/.f64 (*.f64 (*.f64 k k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k)))) (*.f64 l l))
(/.f64 (*.f64 (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 l l))
(/.f64 (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (cos.f64 k))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (neg.f64 (*.f64 (cos.f64 k) (*.f64 l l))))
(/.f64 (*.f64 (*.f64 (*.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 (cos.f64 k) (*.f64 l l)))
(*.f64 (*.f64 k k) (/.f64 t (cos.f64 k)))
(*.f64 k (/.f64 (*.f64 k t) (cos.f64 k)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 k k) t))) (neg.f64 (neg.f64 (cos.f64 k))))
(/.f64 (neg.f64 (*.f64 (*.f64 k k) t)) (neg.f64 (cos.f64 k)))
(/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k))
(*.f64 (*.f64 k t) k)
(*.f64 (*.f64 k k) t)
(*.f64 k (*.f64 k t))
(*.f64 t (*.f64 k k))
(*.f64 k t)
(*.f64 t k)
(*.f64 (/.f64 (neg.f64 (sin.f64 k)) (fabs.f64 l)) (/.f64 (neg.f64 (sin.f64 k)) (fabs.f64 l)))
(*.f64 (/.f64 (neg.f64 (sin.f64 k)) l) (/.f64 (neg.f64 (sin.f64 k)) l))
(*.f64 (/.f64 (fabs.f64 (sin.f64 k)) (neg.f64 l)) (/.f64 (fabs.f64 (sin.f64 k)) (neg.f64 l)))
(*.f64 (/.f64 (fabs.f64 (sin.f64 k)) (fabs.f64 l)) (/.f64 (fabs.f64 (sin.f64 k)) (fabs.f64 l)))
(*.f64 (/.f64 (fabs.f64 (sin.f64 k)) l) (/.f64 (fabs.f64 (sin.f64 k)) l))
(*.f64 (/.f64 (sin.f64 k) (neg.f64 l)) (/.f64 (sin.f64 k) (neg.f64 l)))
(*.f64 (/.f64 (sin.f64 k) (fabs.f64 l)) (/.f64 (sin.f64 k) (fabs.f64 l)))
(*.f64 (neg.f64 (/.f64 (sin.f64 k) l)) (neg.f64 (/.f64 (sin.f64 k) l)))
(*.f64 (fabs.f64 (/.f64 (sin.f64 k) l)) (fabs.f64 (/.f64 (sin.f64 k) l)))
(*.f64 (/.f64 (sin.f64 k) l) (/.f64 (sin.f64 k) l))
(*.f64 (sin.f64 k) (/.f64 (sin.f64 k) (*.f64 l l)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 (sin.f64 k))) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 (sin.f64 k))) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 (sin.f64 k))) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 (sin.f64 k))) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 (sin.f64 k))) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 (neg.f64 (sin.f64 k))) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 (neg.f64 (sin.f64 k))) l)
(ratio-of-squares.f64 (neg.f64 (fabs.f64 (sin.f64 k))) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 (sin.f64 k))) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 (sin.f64 k))) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 (sin.f64 k))) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 (sin.f64 k))) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 (sin.f64 k))) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 (sin.f64 k))) l)
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 (sin.f64 k))) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 (sin.f64 k))) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 (sin.f64 k))) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 (sin.f64 k))) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 (sin.f64 k))) (neg.f64 l))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 (sin.f64 k))) (fabs.f64 l))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 (sin.f64 k))) l)
(ratio-of-squares.f64 (exp.f64 (log.f64 (sin.f64 k))) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (exp.f64 (log.f64 (sin.f64 k))) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (exp.f64 (log.f64 (sin.f64 k))) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (exp.f64 (log.f64 (sin.f64 k))) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (exp.f64 (log.f64 (sin.f64 k))) (neg.f64 l))
(ratio-of-squares.f64 (exp.f64 (log.f64 (sin.f64 k))) (fabs.f64 l))
(ratio-of-squares.f64 (exp.f64 (log.f64 (sin.f64 k))) l)
(ratio-of-squares.f64 (neg.f64 (sin.f64 k)) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (neg.f64 (sin.f64 k)) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 (sin.f64 k)) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 (sin.f64 k)) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (neg.f64 (sin.f64 k)) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 (sin.f64 k)) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 (sin.f64 k)) l)
(ratio-of-squares.f64 (fabs.f64 (sin.f64 k)) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (sin.f64 k)) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (sin.f64 k)) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (sin.f64 k)) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (sin.f64 k)) (neg.f64 l))
(ratio-of-squares.f64 (fabs.f64 (sin.f64 k)) (fabs.f64 l))
(ratio-of-squares.f64 (fabs.f64 (sin.f64 k)) l)
(ratio-of-squares.f64 (sin.f64 k) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (sin.f64 k) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (sin.f64 k) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (sin.f64 k) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (sin.f64 k) (neg.f64 l))
(ratio-of-squares.f64 (sin.f64 k) (fabs.f64 l))
(ratio-of-squares.f64 (sin.f64 k) l)
(pow.f64 (/.f64 (sin.f64 k) l) #s(literal 2 binary64))
(/.f64 (neg.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l)) (neg.f64 l))
(/.f64 (neg.f64 (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 l l))))
(/.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l) l)
(/.f64 (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (neg.f64 (*.f64 l l)))
(/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 l l))
(-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 l l)) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k))) (*.f64 l l)))
(exp.f64 (-.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k)))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k)))))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))))
#s(approx (* (pow (sin k) 2) t) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))
#s(approx t t)
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)))
#s(approx (* (/ (/ (* l l) (* k k)) t) -1/3) (*.f64 (/.f64 #s(literal -1/3 binary64) t) (ratio-of-squares.f64 l k)))
#s(approx (/ (/ (* l l) (* k k)) t) (/.f64 (ratio-of-squares.f64 l k) t))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) (*.f64 (*.f64 k k) t)))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t))
#s(approx (* (/ (/ (* l l) (* k k)) t) 2) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)))
#s(approx (* (/ (* l l) t) -1/3) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)))
#s(approx (/ (* l l) t) (/.f64 (*.f64 l l) t))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)))
#s(approx (* (pow k 4) t) (*.f64 (pow.f64 k #s(literal 4 binary64)) t))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k)))))
#s(approx (/ (* k (* k t)) (cos k)) (*.f64 (*.f64 k k) (/.f64 t (cos.f64 k))))
#s(approx (* k (* k t)) (*.f64 (*.f64 k k) t))
#s(approx (* k t) (*.f64 k t))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) (*.f64 (*.f64 k k) t))))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)))
#s(approx (/ (* k k) (* l l)) (ratio-of-squares.f64 k l))
#s(approx l l)
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)))
#s(approx (/ (* l l) (* k k)) (ratio-of-squares.f64 l k))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) (/.f64 (*.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) t)) (/.f64 #s(literal 1/3 binary64) t)) (*.f64 l l)) (*.f64 k k)))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (-.f64 (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 k k) t)) (/.f64 #s(literal 1/3 binary64) t)) (*.f64 l l)))
#s(approx (* l l) (*.f64 l l))
#s(approx (* (+ (* (* k k) -1/3) 2) (* l l)) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (*.f64 l l)))
#s(approx (/ (* (sin k) (sin k)) (* l l)) (ratio-of-squares.f64 (sin.f64 k) l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 151/7560 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (+.f64 t (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 31/360 binary64) t) (*.f64 #s(literal 173/5040 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l)))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 t (*.f64 l l))))) (*.f64 k k)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/315 binary64) (/.f64 t (*.f64 l l))) (+.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 t (*.f64 l l))) (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 t (*.f64 l l))))) #s(literal -1/2 binary64)))) (*.f64 k k)) (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 t (*.f64 l l))))) (*.f64 k k)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx k k)
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (+.f64 (*.f64 (*.f64 t #s(literal 1/6 binary64)) (*.f64 k k)) t) (*.f64 k k)))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) t) (-.f64 (*.f64 (*.f64 t #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) t))) (*.f64 k k)) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 #s(literal -1/2 binary64) t)) (*.f64 k k)) t) (*.f64 k k)))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/315 binary64) t) (+.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) t) (*.f64 #s(literal -1/24 binary64) (*.f64 t #s(literal 1/6 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) t) (-.f64 (*.f64 (*.f64 t #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) t))) #s(literal -1/2 binary64)))) (*.f64 k k)) (*.f64 #s(literal 2/45 binary64) t)) (-.f64 (*.f64 (*.f64 t #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) t))) (*.f64 k k)) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 #s(literal -1/2 binary64) t)) (*.f64 k k)) t) (*.f64 k k)))
#s(approx (* (pow (sin k) 2) t) (*.f64 (*.f64 k k) t))
#s(approx (* (pow (sin k) 2) t) (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) t) t) (*.f64 k k)))
#s(approx (* (pow (sin k) 2) t) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/3 binary64) t) (*.f64 #s(literal -2/45 binary64) (*.f64 (*.f64 k k) t))) (*.f64 k k)) t) (*.f64 k k)))
#s(approx (* (pow (sin k) 2) t) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/315 binary64) (*.f64 (*.f64 k k) t)) (*.f64 #s(literal -2/45 binary64) t)) (*.f64 k k)) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k)) t) (*.f64 k k)))
#s(approx (pow (sin k) 2) (*.f64 k k))
#s(approx (pow (sin k) 2) (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (pow (sin k) 2) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (pow (sin k) 2) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/315 binary64) (*.f64 k k)) #s(literal 2/45 binary64)) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (sin k) k)
#s(approx (sin k) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) k))
#s(approx (sin k) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k)) #s(literal 1 binary64)) k))
#s(approx (sin k) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 k k)) #s(literal 1/120 binary64)) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k)) #s(literal 1 binary64)) k))
#s(approx (cos k) #s(literal 1 binary64))
#s(approx (cos k) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 k k)) #s(literal 1 binary64)))
#s(approx (cos k) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 k k)) #s(literal 1/2 binary64)) (*.f64 k k)) #s(literal 1 binary64)))
#s(approx (cos k) (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 k k)) #s(literal 1/24 binary64)) (*.f64 k k)) #s(literal 1/2 binary64)) (*.f64 k k)) #s(literal 1 binary64)))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k)))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (/.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (*.f64 l l)) t) (*.f64 k k)))
#s(approx (* k k) (*.f64 k k))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)))
#s(approx (* (+ (* (* k k) -1/3) 2) (* l l)) (*.f64 (*.f64 l l) #s(literal 2 binary64)))
#s(approx (* (+ (* (* k k) -1/3) 2) (* l l)) (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) (*.f64 l l)))
#s(approx (+ (* (* k k) -1/3) 2) #s(literal 2 binary64))
#s(approx (+ (* (* k k) -1/3) 2) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))))
#s(approx (* (* k k) -1/3) (*.f64 (*.f64 k k) #s(literal -1/3 binary64)))
#s(approx (pow k 4) (pow.f64 k #s(literal 4 binary64)))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l)))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 t (*.f64 l l))))) (*.f64 k k)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/315 binary64) (/.f64 t (*.f64 l l))) (+.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 t (*.f64 l l))) (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 t (*.f64 l l))))) #s(literal -1/2 binary64)))) (*.f64 k k)) (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 t (*.f64 l l))))) (*.f64 k k)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ (* k (* k t)) (cos k)) (*.f64 (*.f64 k k) t))
#s(approx (/ (* k (* k t)) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 k k) t)) t) (*.f64 k k)))
#s(approx (/ (* k (* k t)) (cos k)) (*.f64 (+.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (*.f64 t #s(literal -5/24 binary64)) (*.f64 k k))) (*.f64 #s(literal -1/2 binary64) t)) (*.f64 k k)) t) (*.f64 k k)))
#s(approx (/ (* k (* k t)) (cos k)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/48 binary64) t) (*.f64 #s(literal -1/2 binary64) (*.f64 t #s(literal -5/24 binary64)))) (*.f64 #s(literal -1/720 binary64) t)) (*.f64 k k))) (*.f64 t #s(literal -5/24 binary64))) (*.f64 k k)) (*.f64 #s(literal -1/2 binary64) t)) (*.f64 k k)) t) (*.f64 k k)))
#s(approx (/ (* (sin k) (sin k)) (* l l)) (ratio-of-squares.f64 k l))
#s(approx (/ (* (sin k) (sin k)) (* l l)) (*.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (*.f64 (ratio-of-squares.f64 k l) #s(literal -1/3 binary64))) (*.f64 k k)))
#s(approx (/ (* (sin k) (sin k)) (* l l)) (*.f64 (+.f64 (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 l l)) (*.f64 k k)) (pow.f64 l #s(literal -2 binary64))) (*.f64 k k)))
#s(approx (/ (* (sin k) (sin k)) (* l l)) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/315 binary64) (*.f64 k k)) #s(literal 2/45 binary64)) (*.f64 l l)) (*.f64 k k)) (*.f64 (pow.f64 l #s(literal -2 binary64)) #s(literal 1/3 binary64))) (*.f64 k k)) (pow.f64 l #s(literal -2 binary64))) (*.f64 k k)))
#s(approx (pow (sin k) 2) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))
#s(approx (sin k) (sin.f64 k))
#s(approx (cos k) (cos.f64 k))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (*.f64 (/.f64 #s(literal -1/3 binary64) t) (ratio-of-squares.f64 l k)))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k)))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) (*.f64 (/.f64 #s(literal -1/3 binary64) t) (ratio-of-squares.f64 l k)))
#s(approx (/ (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (* k k)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k)))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)))
#s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (*.f64 (/.f64 #s(literal -1/3 binary64) t) (ratio-of-squares.f64 l k)))
#s(approx (/ (* (+ (* (* k k) -1/3) 2) (* l l)) (* (pow k 4) t)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k)))
#s(approx (* (+ (* (* k k) -1/3) 2) (* l l)) (*.f64 (pow.f64 (*.f64 k l) #s(literal 2 binary64)) #s(literal -1/3 binary64)))
#s(approx (* (+ (* (* k k) -1/3) 2) (* l l)) (*.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) (*.f64 k k)))
#s(approx (+ (* (* k k) -1/3) 2) (*.f64 (*.f64 k k) #s(literal -1/3 binary64)))
#s(approx (+ (* (* k k) -1/3) 2) (*.f64 (-.f64 (*.f64 (pow.f64 k #s(literal -2 binary64)) #s(literal 2 binary64)) #s(literal 1/3 binary64)) (*.f64 k k)))

eval2.1s (11.9%)

Memory
73.0MiB live, 900.8MiB allocated; 195ms collecting garbage
Samples
1.4s38 956×0valid
46.0ms1 236×0invalid
Compiler

Compiled 46 432 to 4 048 computations (91.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 728.0ms
ival-mult: 481.0ms (66.1% of total)
ival-div: 207.0ms (28.4% of total)
ival-true: 20.0ms (2.7% of total)
ival-assert: 12.0ms (1.6% of total)
adjust: 8.0ms (1.1% of total)

prune892.0ms (5.1%)

Memory
-54.4MiB live, 409.3MiB allocated; 46ms collecting garbage
Pruning

46 alts after pruning (43 fresh and 3 done)

PrunedKeptTotal
New80830838
Fresh51318
Picked325
Done011
Total81646862
Accuracy
99.6%
Counts
862 → 46
Alt Table
Click to see full alt table
StatusAccuracyProgram
50.5%
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (tan.f64 k) (sin.f64 k)))) (+.f64 (ratio-of-squares.f64 k t) #s(literal 0 binary64)))
39.4%
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
50.5%
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (- (+ (/ (* k k) (* t t)) 1) 1) (ratio-of-squares.f64 k t)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
82.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l) (*.f64 (*.f64 k k) t)) (*.f64 l (cos.f64 k)))))
85.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l (cos.f64 k)))))
77.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 k k) t) (ratio-of-squares.f64 (sin.f64 k) l)) (cos.f64 k))))
72.9%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
80.6%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) t) (cos.f64 k)))))
89.9%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 t (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))))
70.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
67.4%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l))))
81.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
74.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 l l)))))
72.1%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) #s(approx (cos k) #s(literal 1 binary64))) (ratio-of-squares.f64 (sin.f64 k) l))))
93.2%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))))
81.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 (*.f64 k t) (cos.f64 k))) (ratio-of-squares.f64 (sin.f64 k) l))))
78.5%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 (/.f64 t (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))))
70.4%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (* k k) t) (cos k)) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 (sin.f64 k) l))))
39.4%
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
38.7%
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
89.5%
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
47.0%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
62.1%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
53.1%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
38.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
38.0%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))))
70.6%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
76.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
56.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) k) k)))
19.3%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t)) (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)) (*.f64 k k))))
55.3%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
23.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) t) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (*.f64 (*.f64 (*.f64 k k) t) t)) (*.f64 k k))))
55.0%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (*.f64 l (/.f64 l t)) #s(literal -1/3 binary64))) (*.f64 k k))))
52.4%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k t)) (/.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
51.4%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k k)) (/.f64 l t)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
28.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
27.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
70.6%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
28.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
28.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) t) #s(literal -1/3 binary64))))
28.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) t) #s(literal -1/3 binary64))))
28.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
28.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
28.0%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
28.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
28.5%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
Samples
546.0ms15 273×0valid
55.0ms1 367×0invalid
Compiler

Compiled 4 317 to 2 882 computations (33.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 293.0ms
ival-mult: 192.0ms (65.6% of total)
ival-div: 83.0ms (28.4% of total)
ival-true: 9.0ms (3.1% of total)
ival-assert: 5.0ms (1.7% of total)
adjust: 4.0ms (1.4% of total)

series68.0ms (0.4%)

Memory
-4.0MiB live, 42.4MiB allocated; 6ms collecting garbage
Counts
42 → 76
Calls
Call 1
Inputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))))
#s(literal 2 binary64)
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))
(*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))
(*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l))
(/.f64 (*.f64 k t) l)
(*.f64 k t)
k
t
l
(/.f64 k l)
(/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(sin.f64 k)
(cos.f64 k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t)))
(*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))
(ratio-of-squares.f64 l k)
(/.f64 #s(literal -1/3 binary64) t)
#s(literal -1/3 binary64)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64)))
(*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))
(/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t)
(*.f64 (/.f64 l k) (/.f64 l k))
(/.f64 l k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t))
(*.f64 (*.f64 l l) #s(literal 2 binary64))
(*.f64 l l)
(*.f64 (pow.f64 k #s(literal 4 binary64)) t)
(pow.f64 k #s(literal 4 binary64))
#s(literal 4 binary64)
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64)))))
(*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))
(ratio-of-squares.f64 k l)
(/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)
#s(approx (cos k) #s(literal 1 binary64))
#s(literal 1 binary64)
Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (/ (* k t) l) (/ k l)) #s(hole binary64 (/ (* (pow k 2) t) (pow l 2))))
#s(approx (/ (* k t) l) #s(hole binary64 (/ (* k t) l)))
#s(approx (* k t) #s(hole binary64 (* k t)))
#s(approx t #s(hole binary64 t))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (* (pow k 2) (pow l 2))) (* 2 (pow l 2))) (* (pow k 4) t))))
#s(approx (* (/ (* l l) (* k k)) (/ -1/3 t)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ -1/3 t) #s(hole binary64 (/ -1/3 t)))
#s(approx (* (/ (* (/ l k) (/ l k)) t) -1/3) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (* (/ l k) (/ l k)) t) #s(hole binary64 (/ (pow l 2) (* (pow k 2) t))))
#s(approx (/ (* (* l l) 2) (* (pow k 4) t)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (* (pow k 4) t) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (/ (* t (pow (sin k) 2)) (cos k))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* t (pow (sin k) 2))))
#s(approx l #s(hole binary64 l))
#s(approx (/ k l) #s(hole binary64 (/ k l)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (* (pow l 2) (+ 2 (* -1/3 (pow k 2)))) (* (pow k 4) t))))
#s(approx (/ (* l l) (* k k)) #s(hole binary64 (/ (pow l 2) (pow k 2))))
#s(approx (* (/ l k) (/ l k)) #s(hole binary64 (/ (pow l 2) (pow k 2))))
#s(approx (/ l k) #s(hole binary64 (/ l k)))
#s(approx (* (* l l) 2) #s(hole binary64 (* 2 (pow l 2))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (/ (* k k) (* l l)) #s(hole binary64 (/ (pow k 2) (pow l 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (pow l 2))))))
#s(approx (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx k #s(hole binary64 k))
#s(approx (/ (pow (sin k) 2) (cos k)) #s(hole binary64 (pow k 2)))
#s(approx (/ (pow (sin k) 2) (cos k)) #s(hole binary64 (* (pow k 2) (+ 1 (* 1/6 (pow k 2))))))
#s(approx (/ (pow (sin k) 2) (cos k)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (+ 1/6 (* 31/360 (pow k 2))))))))
#s(approx (/ (pow (sin k) 2) (cos k)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (+ 1/6 (* (pow k 2) (+ 31/360 (* 173/5040 (pow k 2))))))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (pow k 2)))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 2/45 (pow k 2)) 1/3))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/45 (* -1/315 (pow k 2)))) 1/3))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx (cos k) #s(hole binary64 1))
#s(approx (cos k) #s(hole binary64 (+ 1 (* -1/2 (pow k 2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 1/24 (pow k 2)) 1/2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/24 (* -1/720 (pow k 2)))) 1/2)))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (pow k 4) #s(hole binary64 (pow k 4)))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (* -1/3 t) (* -1/2 t)))))))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (+ (* -1/3 t) (* (pow k 2) (- (* 2/45 t) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t))))) (* -1/2 t)))))))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (+ (* -1/3 t) (* (pow k 2) (- (+ (* 2/45 t) (* (pow k 2) (- (* -1/315 t) (+ (* -1/2 (- (* 2/45 t) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t)))) (+ (* -1/720 t) (* 1/24 (- (* -1/3 t) (* -1/2 t)))))))) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t))))) (* -1/2 t)))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (/ (pow (sin k) 2) (cos k)) #s(hole binary64 (/ (pow (sin k) 2) (cos k))))
#s(approx (pow (sin k) 2) #s(hole binary64 (pow (sin k) 2)))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))) (pow k 2))))
Calls

9 calls:

TimeVariablePointExpression
13.0ms
l
@-inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) (* (/ (* k t) l) (/ k l)) (/ (* k t) l) (* k t) k t l (/ k l) (/ (pow (sin k) 2) (cos k)) (pow (sin k) 2) (sin k) (cos k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (* (/ (* l l) (* k k)) (/ -1/3 t)) (/ (* l l) (* k k)) (/ -1/3 t) -1/3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (* (/ (* (/ l k) (/ l k)) t) -1/3) (/ (* (/ l k) (/ l k)) t) (* (/ l k) (/ l k)) (/ l k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* (* l l) 2) (* (pow k 4) t)) (* (* l l) 2) (* l l) (* (pow k 4) t) (pow k 4) 4 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k)) (* (pow (sin k) 2) t) (cos k) 1)
8.0ms
t
@-inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) (* (/ (* k t) l) (/ k l)) (/ (* k t) l) (* k t) k t l (/ k l) (/ (pow (sin k) 2) (cos k)) (pow (sin k) 2) (sin k) (cos k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (* (/ (* l l) (* k k)) (/ -1/3 t)) (/ (* l l) (* k k)) (/ -1/3 t) -1/3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (* (/ (* (/ l k) (/ l k)) t) -1/3) (/ (* (/ l k) (/ l k)) t) (* (/ l k) (/ l k)) (/ l k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* (* l l) 2) (* (pow k 4) t)) (* (* l l) 2) (* l l) (* (pow k 4) t) (pow k 4) 4 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k)) (* (pow (sin k) 2) t) (cos k) 1)
7.0ms
k
@-inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) (* (/ (* k t) l) (/ k l)) (/ (* k t) l) (* k t) k t l (/ k l) (/ (pow (sin k) 2) (cos k)) (pow (sin k) 2) (sin k) (cos k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (* (/ (* l l) (* k k)) (/ -1/3 t)) (/ (* l l) (* k k)) (/ -1/3 t) -1/3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (* (/ (* (/ l k) (/ l k)) t) -1/3) (/ (* (/ l k) (/ l k)) t) (* (/ l k) (/ l k)) (/ l k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* (* l l) 2) (* (pow k 4) t)) (* (* l l) 2) (* l l) (* (pow k 4) t) (pow k 4) 4 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k)) (* (pow (sin k) 2) t) (cos k) 1)
7.0ms
t
@0
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) (* (/ (* k t) l) (/ k l)) (/ (* k t) l) (* k t) k t l (/ k l) (/ (pow (sin k) 2) (cos k)) (pow (sin k) 2) (sin k) (cos k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (* (/ (* l l) (* k k)) (/ -1/3 t)) (/ (* l l) (* k k)) (/ -1/3 t) -1/3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (* (/ (* (/ l k) (/ l k)) t) -1/3) (/ (* (/ l k) (/ l k)) t) (* (/ l k) (/ l k)) (/ l k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* (* l l) 2) (* (pow k 4) t)) (* (* l l) 2) (* l l) (* (pow k 4) t) (pow k 4) 4 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k)) (* (pow (sin k) 2) t) (cos k) 1)
7.0ms
t
@inf
((/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) (* (/ (* k t) l) (/ k l)) (/ (* k t) l) (* k t) k t l (/ k l) (/ (pow (sin k) 2) (cos k)) (pow (sin k) 2) (sin k) (cos k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (* (/ (* l l) (* k k)) (/ -1/3 t)) (/ (* l l) (* k k)) (/ -1/3 t) -1/3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (* (/ (* (/ l k) (/ l k)) t) -1/3) (/ (* (/ l k) (/ l k)) t) (* (/ l k) (/ l k)) (/ l k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/ (* (* l l) 2) (* (pow k 4) t)) (* (* l l) 2) (* l l) (* (pow k 4) t) (pow k 4) 4 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k)) (* (pow (sin k) 2) t) (cos k) 1)

rewrite156.0ms (0.9%)

Memory
0.3MiB live, 56.7MiB allocated; 3ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03932845
04382595
122372583
091492475
Stop Event
iter limit
node limit
iter limit
Counts
118 → 587
Calls
Call 1
Inputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))))
#s(literal 2 binary64)
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))
(*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))
(*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l))
(/.f64 (*.f64 k t) l)
(*.f64 k t)
k
t
l
(/.f64 k l)
(/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(sin.f64 k)
(cos.f64 k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t)))
(*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))
(ratio-of-squares.f64 l k)
(/.f64 #s(literal -1/3 binary64) t)
#s(literal -1/3 binary64)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64)))
(*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))
(/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t)
(*.f64 (/.f64 l k) (/.f64 l k))
(/.f64 l k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t))
(*.f64 (*.f64 l l) #s(literal 2 binary64))
(*.f64 l l)
(*.f64 (pow.f64 k #s(literal 4 binary64)) t)
(pow.f64 k #s(literal 4 binary64))
#s(literal 4 binary64)
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64)))))
(*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))
(ratio-of-squares.f64 k l)
(/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)
#s(approx (cos k) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (/ (* k t) l) (/ k l)) #s(hole binary64 (/ (* (pow k 2) t) (pow l 2))))
#s(approx (/ (* k t) l) #s(hole binary64 (/ (* k t) l)))
#s(approx (* k t) #s(hole binary64 (* k t)))
#s(approx t #s(hole binary64 t))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (* (pow k 2) (pow l 2))) (* 2 (pow l 2))) (* (pow k 4) t))))
#s(approx (* (/ (* l l) (* k k)) (/ -1/3 t)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ -1/3 t) #s(hole binary64 (/ -1/3 t)))
#s(approx (* (/ (* (/ l k) (/ l k)) t) -1/3) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (* (/ l k) (/ l k)) t) #s(hole binary64 (/ (pow l 2) (* (pow k 2) t))))
#s(approx (/ (* (* l l) 2) (* (pow k 4) t)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (* (pow k 4) t) #s(hole binary64 (* (pow k 4) t)))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (/ (* t (pow (sin k) 2)) (cos k))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* t (pow (sin k) 2))))
#s(approx l #s(hole binary64 l))
#s(approx (/ k l) #s(hole binary64 (/ k l)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (* (pow l 2) (+ 2 (* -1/3 (pow k 2)))) (* (pow k 4) t))))
#s(approx (/ (* l l) (* k k)) #s(hole binary64 (/ (pow l 2) (pow k 2))))
#s(approx (* (/ l k) (/ l k)) #s(hole binary64 (/ (pow l 2) (pow k 2))))
#s(approx (/ l k) #s(hole binary64 (/ l k)))
#s(approx (* (* l l) 2) #s(hole binary64 (* 2 (pow l 2))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (/ (* k k) (* l l)) #s(hole binary64 (/ (pow k 2) (pow l 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))) (* -1/3 (/ (pow l 2) t))))) (pow k 4))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* -1/3 (/ (pow l 2) t)) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/6 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t)))) (+ (* -31/2160 (/ (pow l 2) t)) (* 173/5040 (/ (pow l 2) t)))))) (* -2 (+ (* -1/36 (/ (pow l 2) t)) (* 31/360 (/ (pow l 2) t))))))))) (pow k 4))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* 1/6 (/ (* (pow k 2) t) (pow l 2))) (/ t (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 31/360 (/ (* (pow k 2) t) (pow l 2))) (* 1/6 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 1/6 (/ t (pow l 2))) (* (pow k 2) (+ (* 173/5040 (/ (* (pow k 2) t) (pow l 2))) (* 31/360 (/ t (pow l 2))))))) (/ t (pow l 2))))))
#s(approx (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx k #s(hole binary64 k))
#s(approx (/ (pow (sin k) 2) (cos k)) #s(hole binary64 (pow k 2)))
#s(approx (/ (pow (sin k) 2) (cos k)) #s(hole binary64 (* (pow k 2) (+ 1 (* 1/6 (pow k 2))))))
#s(approx (/ (pow (sin k) 2) (cos k)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (+ 1/6 (* 31/360 (pow k 2))))))))
#s(approx (/ (pow (sin k) 2) (cos k)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (+ 1/6 (* (pow k 2) (+ 31/360 (* 173/5040 (pow k 2))))))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (pow k 2)))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/3 (pow k 2))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 2/45 (pow k 2)) 1/3))))))
#s(approx (pow (sin k) 2) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 2/45 (* -1/315 (pow k 2)))) 1/3))))))
#s(approx (sin k) #s(hole binary64 k))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* -1/6 (pow k 2))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (sin k) #s(hole binary64 (* k (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/120 (* -1/5040 (pow k 2)))) 1/6))))))
#s(approx (cos k) #s(hole binary64 1))
#s(approx (cos k) #s(hole binary64 (+ 1 (* -1/2 (pow k 2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* 1/24 (pow k 2)) 1/2)))))
#s(approx (cos k) #s(hole binary64 (+ 1 (* (pow k 2) (- (* (pow k 2) (+ 1/24 (* -1/720 (pow k 2)))) 1/2)))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (/ (* (pow k 2) (pow l 2)) t)) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (pow k 4) #s(hole binary64 (pow k 4)))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (/ (* (pow k 4) t) (pow l 2))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (+ (* -1/3 (/ t (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ t (pow l 2))) (* (pow k 2) (- (* -1/315 (/ t (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ t (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2)))))) (+ (* -1/720 (/ t (pow l 2))) (* 1/24 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ t (pow l 2))) (* -1/2 (/ t (pow l 2))))) (* 1/24 (/ t (pow l 2))))))) (* -1/2 (/ t (pow l 2))))) (/ t (pow l 2))))))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (* -1/3 t) (* -1/2 t)))))))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (+ (* -1/3 t) (* (pow k 2) (- (* 2/45 t) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t))))) (* -1/2 t)))))))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (- (+ (* -1/3 t) (* (pow k 2) (- (+ (* 2/45 t) (* (pow k 2) (- (* -1/315 t) (+ (* -1/2 (- (* 2/45 t) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t)))) (+ (* -1/720 t) (* 1/24 (- (* -1/3 t) (* -1/2 t)))))))) (+ (* -1/2 (- (* -1/3 t) (* -1/2 t))) (* 1/24 t))))) (* -1/2 t)))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* 2/45 (* (pow k 2) t))))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* (pow k 2) (+ t (* (pow k 2) (+ (* -1/3 t) (* (pow k 2) (+ (* -1/315 (* (pow k 2) t)) (* 2/45 t)))))))))
#s(approx (/ (pow (sin k) 2) (cos k)) #s(hole binary64 (/ (pow (sin k) 2) (cos k))))
#s(approx (pow (sin k) 2) #s(hole binary64 (pow (sin k) 2)))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (* -1/3 (/ (pow l 2) (* (pow k 2) t)))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) #s(hole binary64 (/ (+ (* -1/3 (/ (pow l 2) t)) (* 2 (/ (pow l 2) (* (pow k 2) t)))) (pow k 2))))
Outputs
(/.f64 #s(literal -2 binary64) (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 (*.f64 k t) l))))))
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 (*.f64 k t) l)))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 (*.f64 k t) l)))))
(+.f64 (/.f64 #s(literal 1 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 (*.f64 k t) l))))) (/.f64 #s(literal 1 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 (*.f64 k t) l))))))
#s(literal 2 binary64)
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 (*.f64 k t) l))))
(*.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)) (*.f64 (/.f64 k l) (/.f64 (*.f64 k t) l)))
(*.f64 (*.f64 (/.f64 k l) (/.f64 (*.f64 k t) l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))
(*.f64 (/.f64 (*.f64 k t) l) (*.f64 (/.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 k l) (/.f64 (*.f64 k t) l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (neg.f64 (cos.f64 k)))
(/.f64 (*.f64 (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 (*.f64 k t) (/.f64 k l))) (*.f64 (neg.f64 (cos.f64 k)) l))
(/.f64 (*.f64 (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 k t) l) k)) (*.f64 (neg.f64 (cos.f64 k)) l))
(/.f64 (*.f64 (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 (*.f64 k t) k)) (*.f64 (neg.f64 (cos.f64 k)) (*.f64 l l)))
(/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k t) (/.f64 k l))) (*.f64 (cos.f64 k) l))
(/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 k t) l) k)) (*.f64 (cos.f64 k) l))
(/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k t) k)) (*.f64 (*.f64 l l) (cos.f64 k)))
(/.f64 (*.f64 (*.f64 (*.f64 k t) (/.f64 k l)) (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (*.f64 l (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (*.f64 (*.f64 k t) (/.f64 k l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 l (cos.f64 k)))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 k t) l) k) (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (*.f64 l (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (*.f64 (/.f64 (*.f64 k t) l) k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 l (cos.f64 k)))
(/.f64 (*.f64 (*.f64 (*.f64 k t) k) (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (*.f64 (*.f64 l l) (neg.f64 (cos.f64 k))))
(/.f64 (*.f64 (*.f64 (*.f64 k t) k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (*.f64 (*.f64 l l) (cos.f64 k)))
(/.f64 (*.f64 (*.f64 (/.f64 k l) (/.f64 (*.f64 k t) l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (cos.f64 k))
(*.f64 (/.f64 (*.f64 k t) (neg.f64 l)) (/.f64 k (neg.f64 l)))
(*.f64 (/.f64 (*.f64 k t) (fabs.f64 l)) (/.f64 k (fabs.f64 l)))
(*.f64 (/.f64 k l) (/.f64 (*.f64 k t) l))
(*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l))
(/.f64 (neg.f64 (*.f64 (*.f64 k t) (/.f64 k l))) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 k t) l) k)) (neg.f64 l))
(/.f64 (neg.f64 (*.f64 (*.f64 k t) k)) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 (neg.f64 k) (neg.f64 (*.f64 k t))) (*.f64 l l))
(/.f64 (*.f64 (neg.f64 k) (*.f64 k t)) (*.f64 (neg.f64 l) l))
(/.f64 (*.f64 k (neg.f64 (*.f64 k t))) (*.f64 l (neg.f64 l)))
(/.f64 (*.f64 k (*.f64 k t)) (*.f64 l l))
(/.f64 (*.f64 (neg.f64 (*.f64 k t)) (neg.f64 k)) (*.f64 l l))
(/.f64 (*.f64 (neg.f64 (*.f64 k t)) k) (*.f64 (neg.f64 l) l))
(/.f64 (*.f64 (*.f64 k t) (neg.f64 k)) (*.f64 l (neg.f64 l)))
(/.f64 (*.f64 (*.f64 k t) (/.f64 k l)) l)
(/.f64 (*.f64 (/.f64 (*.f64 k t) l) k) l)
(/.f64 (*.f64 (*.f64 k t) k) (*.f64 l l))
(*.f64 k (/.f64 t l))
(/.f64 (neg.f64 (neg.f64 (*.f64 k t))) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 (*.f64 k t)) (neg.f64 l))
(/.f64 (*.f64 k t) l)
(*.f64 k t)
(*.f64 t k)
k
t
l
(/.f64 (neg.f64 (neg.f64 k)) (neg.f64 (neg.f64 l)))
(/.f64 (neg.f64 k) (neg.f64 l))
(/.f64 k l)
(/.f64 (neg.f64 (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (cos.f64 k))))
(/.f64 (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (neg.f64 (cos.f64 k)))
(/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))
(*.f64 (neg.f64 (sin.f64 k)) (neg.f64 (sin.f64 k)))
(*.f64 (fabs.f64 (sin.f64 k)) (fabs.f64 (sin.f64 k)))
(*.f64 (exp.f64 (log.f64 (sin.f64 k))) (exp.f64 (log.f64 (sin.f64 k))))
(*.f64 (sin.f64 k) (sin.f64 k))
(pow.f64 (exp.f64 (log.f64 (sin.f64 k))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 k k)) (cos.f64 (+.f64 k k))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 k) #s(literal -2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k))))
(exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 2 binary64))))
(pow.f64 (sin.f64 k) #s(literal 1 binary64))
(sin.f64 k)
(exp.f64 (*.f64 (log.f64 (sin.f64 k)) #s(literal 1 binary64)))
(sin.f64 (+.f64 (neg.f64 k) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 k (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 k)))
(cos.f64 (neg.f64 k))
(cos.f64 k)
(+.f64 (*.f64 (sin.f64 k) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 k) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64)))
(*.f64 (/.f64 #s(literal -1/3 binary64) (*.f64 k k)) (/.f64 (*.f64 l l) t))
(*.f64 (/.f64 (*.f64 l l) (fabs.f64 k)) (/.f64 (/.f64 #s(literal -1/3 binary64) t) (fabs.f64 k)))
(*.f64 (/.f64 (*.f64 l l) (neg.f64 k)) (/.f64 (/.f64 #s(literal -1/3 binary64) t) (neg.f64 k)))
(*.f64 (/.f64 (*.f64 l l) k) (/.f64 (/.f64 #s(literal -1/3 binary64) t) k))
(*.f64 (/.f64 (*.f64 l l) t) (/.f64 #s(literal -1/3 binary64) (*.f64 k k)))
(*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))
(*.f64 (/.f64 #s(literal -1/3 binary64) t) (ratio-of-squares.f64 l k))
(*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))
(*.f64 #s(literal -1/3 binary64) (/.f64 (ratio-of-squares.f64 l k) t))
(/.f64 (neg.f64 (*.f64 (*.f64 l l) (/.f64 #s(literal -1/3 binary64) t))) (neg.f64 (*.f64 k k)))
(/.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64))) (neg.f64 t))
(/.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) (neg.f64 (*.f64 (*.f64 k k) t)))
(/.f64 (neg.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l))) (neg.f64 (*.f64 (*.f64 k k) t)))
(/.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) k)) (*.f64 (neg.f64 t) k))
(/.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l (/.f64 l k))) (*.f64 (neg.f64 t) k))
(/.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 l k) l)) (*.f64 (neg.f64 t) k))
(/.f64 (*.f64 #s(literal 1/3 binary64) (neg.f64 (*.f64 l l))) (*.f64 (neg.f64 t) (neg.f64 (*.f64 k k))))
(/.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 (neg.f64 t) (*.f64 k k)))
(/.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) k)) (*.f64 k t))
(/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l (/.f64 l k))) (*.f64 k t))
(/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (/.f64 l k) l)) (*.f64 k t))
(/.f64 (*.f64 #s(literal -1/3 binary64) (neg.f64 (*.f64 l l))) (*.f64 t (neg.f64 (*.f64 k k))))
(/.f64 (*.f64 (/.f64 (*.f64 l l) k) #s(literal 1/3 binary64)) (*.f64 k (neg.f64 t)))
(/.f64 (*.f64 (/.f64 (*.f64 l l) k) #s(literal -1/3 binary64)) (*.f64 k t))
(/.f64 (*.f64 (*.f64 l (/.f64 l k)) #s(literal 1/3 binary64)) (*.f64 k (neg.f64 t)))
(/.f64 (*.f64 (*.f64 l (/.f64 l k)) #s(literal -1/3 binary64)) (*.f64 k t))
(/.f64 (*.f64 (*.f64 (/.f64 l k) l) #s(literal 1/3 binary64)) (*.f64 k (neg.f64 t)))
(/.f64 (*.f64 (*.f64 (/.f64 l k) l) #s(literal -1/3 binary64)) (*.f64 k t))
(/.f64 (*.f64 (neg.f64 (*.f64 l l)) #s(literal 1/3 binary64)) (*.f64 (neg.f64 (*.f64 k k)) (neg.f64 t)))
(/.f64 (*.f64 (neg.f64 (*.f64 l l)) #s(literal -1/3 binary64)) (*.f64 (neg.f64 (*.f64 k k)) t))
(/.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 (*.f64 k k) (neg.f64 t)))
(/.f64 (*.f64 (*.f64 l l) (/.f64 #s(literal -1/3 binary64) t)) (*.f64 k k))
(/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)
(/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t))
(/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))
(*.f64 (/.f64 (neg.f64 l) (fabs.f64 k)) (/.f64 (neg.f64 l) (fabs.f64 k)))
(*.f64 (/.f64 (neg.f64 l) k) (/.f64 (neg.f64 l) k))
(*.f64 (/.f64 (fabs.f64 l) (neg.f64 k)) (/.f64 (fabs.f64 l) (neg.f64 k)))
(*.f64 (/.f64 (fabs.f64 l) k) (/.f64 (fabs.f64 l) k))
(*.f64 (/.f64 l (fabs.f64 k)) (/.f64 l (fabs.f64 k)))
(*.f64 (/.f64 l (neg.f64 k)) (/.f64 l (neg.f64 k)))
(*.f64 (neg.f64 (neg.f64 (/.f64 l k))) (neg.f64 (neg.f64 (/.f64 l k))))
(*.f64 (neg.f64 (sqrt.f64 (ratio-of-squares.f64 l k))) (neg.f64 (sqrt.f64 (ratio-of-squares.f64 l k))))
(*.f64 (fabs.f64 (sqrt.f64 (ratio-of-squares.f64 l k))) (fabs.f64 (sqrt.f64 (ratio-of-squares.f64 l k))))
(*.f64 (pow.f64 (/.f64 l k) #s(literal 1 binary64)) (pow.f64 (/.f64 l k) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 l k) #s(literal 1 binary64)) (/.f64 l k))
(*.f64 (neg.f64 (/.f64 l k)) (neg.f64 (/.f64 l k)))
(*.f64 (sqrt.f64 (ratio-of-squares.f64 l k)) (sqrt.f64 (ratio-of-squares.f64 l k)))
(*.f64 (/.f64 l k) (/.f64 l k))
(*.f64 l (/.f64 l (*.f64 k k)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (fabs.f64 k))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (neg.f64 k))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) k)
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (fabs.f64 k))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (neg.f64 k))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) k)
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 k))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (neg.f64 k))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) k)
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (fabs.f64 k))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (neg.f64 k))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) k)
(ratio-of-squares.f64 (neg.f64 l) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 l) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 l) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (neg.f64 l) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (neg.f64 l) (fabs.f64 k))
(ratio-of-squares.f64 (neg.f64 l) (neg.f64 k))
(ratio-of-squares.f64 (neg.f64 l) k)
(ratio-of-squares.f64 (fabs.f64 l) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (fabs.f64 l) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (fabs.f64 l) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (fabs.f64 l) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (fabs.f64 l) (fabs.f64 k))
(ratio-of-squares.f64 (fabs.f64 l) (neg.f64 k))
(ratio-of-squares.f64 (fabs.f64 l) k)
(ratio-of-squares.f64 l (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 l (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 l (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 l (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 l (fabs.f64 k))
(ratio-of-squares.f64 l (neg.f64 k))
(ratio-of-squares.f64 l k)
(pow.f64 (neg.f64 (/.f64 l k)) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (ratio-of-squares.f64 l k)) #s(literal 2 binary64))
(pow.f64 (/.f64 l k) #s(literal 2 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 l l) k)) (neg.f64 k))
(/.f64 (neg.f64 (*.f64 l (/.f64 l k))) (neg.f64 k))
(/.f64 (neg.f64 (*.f64 (/.f64 l k) l)) (neg.f64 k))
(/.f64 (neg.f64 (neg.f64 (*.f64 l l))) (neg.f64 (neg.f64 (*.f64 k k))))
(/.f64 (*.f64 (neg.f64 l) l) (*.f64 (neg.f64 k) k))
(/.f64 (*.f64 l (neg.f64 l)) (*.f64 k (neg.f64 k)))
(/.f64 (/.f64 (*.f64 l l) k) k)
(/.f64 (*.f64 l (/.f64 l k)) k)
(/.f64 (*.f64 (/.f64 l k) l) k)
(/.f64 (neg.f64 (*.f64 l l)) (neg.f64 (*.f64 k k)))
(/.f64 (*.f64 l l) (*.f64 k k))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 l k) #s(literal -2 binary64)))
(fabs.f64 (ratio-of-squares.f64 l k))
(exp.f64 (-.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)) (*.f64 (log.f64 k) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 l k)) #s(literal 2 binary64)))
(/.f64 #s(literal 1/3 binary64) (neg.f64 t))
(/.f64 #s(literal -1/3 binary64) (neg.f64 (neg.f64 t)))
(/.f64 #s(literal -1/3 binary64) t)
#s(literal -1/3 binary64)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64)))
(*.f64 (/.f64 #s(literal -1/3 binary64) (*.f64 k k)) (/.f64 (*.f64 l l) t))
(*.f64 (/.f64 (*.f64 l l) (fabs.f64 k)) (/.f64 (/.f64 #s(literal -1/3 binary64) t) (fabs.f64 k)))
(*.f64 (/.f64 (*.f64 l l) (neg.f64 k)) (/.f64 (/.f64 #s(literal -1/3 binary64) t) (neg.f64 k)))
(*.f64 (/.f64 (*.f64 l l) k) (/.f64 (/.f64 #s(literal -1/3 binary64) t) k))
(*.f64 (/.f64 (*.f64 l l) t) (/.f64 #s(literal -1/3 binary64) (*.f64 k k)))
(*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))
(*.f64 (/.f64 #s(literal -1/3 binary64) t) (ratio-of-squares.f64 l k))
(*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))
(*.f64 #s(literal -1/3 binary64) (/.f64 (ratio-of-squares.f64 l k) t))
(/.f64 (neg.f64 (*.f64 (*.f64 l l) (/.f64 #s(literal -1/3 binary64) t))) (neg.f64 (*.f64 k k)))
(/.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64))) (neg.f64 t))
(/.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) (neg.f64 (*.f64 (*.f64 k k) t)))
(/.f64 (neg.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l))) (neg.f64 (*.f64 (*.f64 k k) t)))
(/.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) k)) (*.f64 (neg.f64 t) k))
(/.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l (/.f64 l k))) (*.f64 (neg.f64 t) k))
(/.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 (/.f64 l k) l)) (*.f64 (neg.f64 t) k))
(/.f64 (*.f64 #s(literal 1/3 binary64) (neg.f64 (*.f64 l l))) (*.f64 (neg.f64 t) (neg.f64 (*.f64 k k))))
(/.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 l l)) (*.f64 (neg.f64 t) (*.f64 k k)))
(/.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) k)) (*.f64 k t))
(/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l (/.f64 l k))) (*.f64 k t))
(/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 (/.f64 l k) l)) (*.f64 k t))
(/.f64 (*.f64 #s(literal -1/3 binary64) (neg.f64 (*.f64 l l))) (*.f64 t (neg.f64 (*.f64 k k))))
(/.f64 (*.f64 (/.f64 (*.f64 l l) k) #s(literal 1/3 binary64)) (*.f64 k (neg.f64 t)))
(/.f64 (*.f64 (/.f64 (*.f64 l l) k) #s(literal -1/3 binary64)) (*.f64 k t))
(/.f64 (*.f64 (*.f64 l (/.f64 l k)) #s(literal 1/3 binary64)) (*.f64 k (neg.f64 t)))
(/.f64 (*.f64 (*.f64 l (/.f64 l k)) #s(literal -1/3 binary64)) (*.f64 k t))
(/.f64 (*.f64 (*.f64 (/.f64 l k) l) #s(literal 1/3 binary64)) (*.f64 k (neg.f64 t)))
(/.f64 (*.f64 (*.f64 (/.f64 l k) l) #s(literal -1/3 binary64)) (*.f64 k t))
(/.f64 (*.f64 (neg.f64 (*.f64 l l)) #s(literal 1/3 binary64)) (*.f64 (neg.f64 (*.f64 k k)) (neg.f64 t)))
(/.f64 (*.f64 (neg.f64 (*.f64 l l)) #s(literal -1/3 binary64)) (*.f64 (neg.f64 (*.f64 k k)) t))
(/.f64 (*.f64 (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 (*.f64 k k) (neg.f64 t)))
(/.f64 (*.f64 (*.f64 l l) (/.f64 #s(literal -1/3 binary64) t)) (*.f64 k k))
(/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)
(/.f64 (*.f64 #s(literal -1/3 binary64) (*.f64 l l)) (*.f64 (*.f64 k k) t))
(/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))
(*.f64 (/.f64 (neg.f64 l) (*.f64 k k)) (/.f64 (neg.f64 l) t))
(*.f64 (/.f64 (fabs.f64 l) (*.f64 k k)) (/.f64 (fabs.f64 l) t))
(*.f64 (/.f64 (neg.f64 l) t) (/.f64 (neg.f64 l) (*.f64 k k)))
(*.f64 (/.f64 (fabs.f64 l) t) (/.f64 (fabs.f64 l) (*.f64 k k)))
(*.f64 (/.f64 l t) (/.f64 l (*.f64 k k)))
(*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t))
(*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t))
(/.f64 (neg.f64 (neg.f64 (ratio-of-squares.f64 l k))) (neg.f64 (neg.f64 t)))
(/.f64 (neg.f64 (neg.f64 (*.f64 l l))) (neg.f64 (neg.f64 (*.f64 (*.f64 k k) t))))
(/.f64 (*.f64 (neg.f64 l) (/.f64 l k)) (*.f64 (neg.f64 k) t))
(/.f64 (*.f64 l (/.f64 l k)) (*.f64 k t))
(/.f64 (neg.f64 (ratio-of-squares.f64 l k)) (neg.f64 t))
(/.f64 (neg.f64 (*.f64 l l)) (neg.f64 (*.f64 (*.f64 k k) t)))
(/.f64 (*.f64 l l) (*.f64 (*.f64 k k) t))
(/.f64 (ratio-of-squares.f64 l k) t)
(*.f64 (/.f64 (neg.f64 l) (fabs.f64 k)) (/.f64 (neg.f64 l) (fabs.f64 k)))
(*.f64 (/.f64 (neg.f64 l) k) (/.f64 (neg.f64 l) k))
(*.f64 (/.f64 (fabs.f64 l) (neg.f64 k)) (/.f64 (fabs.f64 l) (neg.f64 k)))
(*.f64 (/.f64 (fabs.f64 l) k) (/.f64 (fabs.f64 l) k))
(*.f64 (/.f64 l (fabs.f64 k)) (/.f64 l (fabs.f64 k)))
(*.f64 (/.f64 l (neg.f64 k)) (/.f64 l (neg.f64 k)))
(*.f64 (neg.f64 (neg.f64 (/.f64 l k))) (neg.f64 (neg.f64 (/.f64 l k))))
(*.f64 (neg.f64 (sqrt.f64 (ratio-of-squares.f64 l k))) (neg.f64 (sqrt.f64 (ratio-of-squares.f64 l k))))
(*.f64 (fabs.f64 (sqrt.f64 (ratio-of-squares.f64 l k))) (fabs.f64 (sqrt.f64 (ratio-of-squares.f64 l k))))
(*.f64 (pow.f64 (/.f64 l k) #s(literal 1 binary64)) (pow.f64 (/.f64 l k) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 l k) #s(literal 1 binary64)) (/.f64 l k))
(*.f64 (neg.f64 (/.f64 l k)) (neg.f64 (/.f64 l k)))
(*.f64 (sqrt.f64 (ratio-of-squares.f64 l k)) (sqrt.f64 (ratio-of-squares.f64 l k)))
(*.f64 (/.f64 l k) (/.f64 l k))
(*.f64 l (/.f64 l (*.f64 k k)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (fabs.f64 k))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) (neg.f64 k))
(ratio-of-squares.f64 (neg.f64 (neg.f64 l)) k)
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (fabs.f64 k))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) (neg.f64 k))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 l)) k)
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 k))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) (neg.f64 k))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 l)) k)
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (fabs.f64 k))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) (neg.f64 k))
(ratio-of-squares.f64 (exp.f64 (log.f64 l)) k)
(ratio-of-squares.f64 (neg.f64 l) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 l) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (neg.f64 l) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (neg.f64 l) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (neg.f64 l) (fabs.f64 k))
(ratio-of-squares.f64 (neg.f64 l) (neg.f64 k))
(ratio-of-squares.f64 (neg.f64 l) k)
(ratio-of-squares.f64 (fabs.f64 l) (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (fabs.f64 l) (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 (fabs.f64 l) (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 (fabs.f64 l) (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 (fabs.f64 l) (fabs.f64 k))
(ratio-of-squares.f64 (fabs.f64 l) (neg.f64 k))
(ratio-of-squares.f64 (fabs.f64 l) k)
(ratio-of-squares.f64 l (neg.f64 (fabs.f64 k)))
(ratio-of-squares.f64 l (fabs.f64 (fabs.f64 k)))
(ratio-of-squares.f64 l (exp.f64 (log.f64 k)))
(ratio-of-squares.f64 l (neg.f64 (neg.f64 k)))
(ratio-of-squares.f64 l (fabs.f64 k))
(ratio-of-squares.f64 l (neg.f64 k))
(ratio-of-squares.f64 l k)
(pow.f64 (neg.f64 (/.f64 l k)) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (ratio-of-squares.f64 l k)) #s(literal 2 binary64))
(pow.f64 (/.f64 l k) #s(literal 2 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 l l) k)) (neg.f64 k))
(/.f64 (neg.f64 (*.f64 l (/.f64 l k))) (neg.f64 k))
(/.f64 (neg.f64 (*.f64 (/.f64 l k) l)) (neg.f64 k))
(/.f64 (neg.f64 (neg.f64 (*.f64 l l))) (neg.f64 (neg.f64 (*.f64 k k))))
(/.f64 (*.f64 (neg.f64 l) l) (*.f64 (neg.f64 k) k))
(/.f64 (*.f64 l (neg.f64 l)) (*.f64 k (neg.f64 k)))
(/.f64 (/.f64 (*.f64 l l) k) k)
(/.f64 (*.f64 l (/.f64 l k)) k)
(/.f64 (*.f64 (/.f64 l k) l) k)
(/.f64 (neg.f64 (*.f64 l l)) (neg.f64 (*.f64 k k)))
(/.f64 (*.f64 l l) (*.f64 k k))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 l k) #s(literal -2 binary64)))
(fabs.f64 (ratio-of-squares.f64 l k))
(exp.f64 (-.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)) (*.f64 (log.f64 k) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 l k)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 k)))
(/.f64 (neg.f64 l) (neg.f64 k))
(/.f64 l k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t))
(*.f64 (/.f64 #s(literal 2 binary64) (pow.f64 k #s(literal 4 binary64))) (/.f64 (*.f64 l l) t))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) t) (/.f64 l (pow.f64 k #s(literal 4 binary64))))
(*.f64 (/.f64 l (pow.f64 k #s(literal 4 binary64))) (/.f64 (*.f64 l #s(literal 2 binary64)) t))
(*.f64 (/.f64 l t) (/.f64 (*.f64 l #s(literal 2 binary64)) (pow.f64 k #s(literal 4 binary64))))
(*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k)))
(*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 #s(literal 2 binary64) t))
(*.f64 (/.f64 (*.f64 l l) t) (/.f64 #s(literal 2 binary64) (pow.f64 k #s(literal 4 binary64))))
(*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64))
(*.f64 (*.f64 l l) (/.f64 #s(literal 2 binary64) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(*.f64 #s(literal 2 binary64) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t))
(/.f64 (+.f64 (pow.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 3 binary64)) (pow.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)) (-.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)))))
(/.f64 (+.f64 (neg.f64 (*.f64 l l)) (neg.f64 (*.f64 l l))) (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k))) (neg.f64 t))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t))))
(/.f64 (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) #s(literal 4 binary64)) (*.f64 t #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 4 binary64) (ratio-of-squares.f64 l (*.f64 k k))) (*.f64 #s(literal 2 binary64) t))
(/.f64 (*.f64 (neg.f64 (*.f64 l l)) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t)) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 4 binary64) (neg.f64 (*.f64 l l))) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (+.f64 (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) (*.f64 t (ratio-of-squares.f64 l (*.f64 k k)))) (*.f64 t t))
(/.f64 (+.f64 (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t))) (*.f64 t (neg.f64 (*.f64 l l)))) (*.f64 t (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t))))
(/.f64 (+.f64 (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)) (*.f64 t (*.f64 l l))) (*.f64 t (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 l l)) t) (*.f64 (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t)) (ratio-of-squares.f64 l (*.f64 k k)))) (*.f64 (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t)) t))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 l l)) (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t))) (*.f64 (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t)) (neg.f64 (*.f64 l l)))) (*.f64 (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t)) (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)) (*.f64 (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t)) (*.f64 l l))) (*.f64 (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (+.f64 (*.f64 (*.f64 l l) t) (*.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t) (ratio-of-squares.f64 l (*.f64 k k)))) (*.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t) t))
(/.f64 (+.f64 (*.f64 (*.f64 l l) (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t))) (*.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t) (neg.f64 (*.f64 l l)))) (*.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t) (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t))))
(/.f64 (+.f64 (*.f64 (*.f64 l l) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)) (*.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t) (*.f64 l l))) (*.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t)
(/.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64))) (neg.f64 (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t))
(+.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t))
(*.f64 (*.f64 #s(literal 2 binary64) l) l)
(*.f64 (*.f64 l l) #s(literal 2 binary64))
(*.f64 l (*.f64 l #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 l l))
(/.f64 (+.f64 (pow.f64 (*.f64 l l) #s(literal 3 binary64)) (pow.f64 (*.f64 l l) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (-.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 l l) (*.f64 l l)))))
(+.f64 (*.f64 l l) (*.f64 l l))
(*.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))
(/.f64 #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 (pow.f64 k #s(literal 4 binary64)) t)
(*.f64 t (pow.f64 k #s(literal 4 binary64)))
(*.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 k k)))
(*.f64 (*.f64 k k) (*.f64 k k))
(pow.f64 (exp.f64 (log.f64 k)) #s(literal 4 binary64))
(pow.f64 (*.f64 k k) #s(literal 2 binary64))
(pow.f64 k #s(literal 4 binary64))
(exp.f64 (+.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)) (*.f64 (log.f64 k) #s(literal 2 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 k) #s(literal 4 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 k) #s(literal 4 binary64))) (sinh.f64 (*.f64 (log.f64 k) #s(literal 4 binary64))))
#s(literal 4 binary64)
(/.f64 #s(literal -2 binary64) (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t #s(approx (cos k) #s(literal 1 binary64)))) (ratio-of-squares.f64 k l)))))
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t #s(approx (cos k) #s(literal 1 binary64)))) (ratio-of-squares.f64 k l))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t #s(approx (cos k) #s(literal 1 binary64)))) (ratio-of-squares.f64 k l))))
(+.f64 (/.f64 #s(literal 1 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t #s(approx (cos k) #s(literal 1 binary64)))) (ratio-of-squares.f64 k l)))) (/.f64 #s(literal 1 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t #s(approx (cos k) #s(literal 1 binary64)))) (ratio-of-squares.f64 k l)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t #s(approx (cos k) #s(literal 1 binary64)))) (ratio-of-squares.f64 k l)))
(*.f64 (/.f64 (*.f64 k k) (neg.f64 l)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t #s(approx (cos k) #s(literal 1 binary64)))) (neg.f64 l)))
(*.f64 (/.f64 (*.f64 k k) (fabs.f64 l)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t #s(approx (cos k) #s(literal 1 binary64)))) (fabs.f64 l)))
(*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 l l)) (/.f64 (*.f64 k k) #s(approx (cos k) #s(literal 1 binary64))))
(*.f64 (/.f64 (*.f64 k k) l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t #s(approx (cos k) #s(literal 1 binary64)))) l))
(*.f64 (*.f64 (/.f64 t l) (/.f64 (*.f64 k k) l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) #s(approx (cos k) #s(literal 1 binary64))))
(*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t #s(approx (cos k) #s(literal 1 binary64)))) (ratio-of-squares.f64 k l))
(*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t #s(approx (cos k) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 k k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t #s(approx (cos k) #s(literal 1 binary64)))))) (neg.f64 (*.f64 l l)))
(/.f64 (neg.f64 (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) (neg.f64 #s(approx (cos k) #s(literal 1 binary64))))
(/.f64 (*.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (/.f64 (*.f64 k k) l)) (*.f64 (neg.f64 #s(approx (cos k) #s(literal 1 binary64))) l))
(/.f64 (*.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (neg.f64 (*.f64 k k))) (*.f64 (neg.f64 #s(approx (cos k) #s(literal 1 binary64))) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 k k)) (*.f64 (neg.f64 #s(approx (cos k) #s(literal 1 binary64))) (*.f64 l l)))
(/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (/.f64 (*.f64 k k) l)) (*.f64 #s(approx (cos k) #s(literal 1 binary64)) l))
(/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (neg.f64 (*.f64 k k))) (*.f64 #s(approx (cos k) #s(literal 1 binary64)) (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (/.f64 (*.f64 k k) l) (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) (*.f64 l (neg.f64 #s(approx (cos k) #s(literal 1 binary64)))))
(/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l #s(approx (cos k) #s(literal 1 binary64))))
(/.f64 (*.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) (*.f64 (neg.f64 (*.f64 l l)) (neg.f64 #s(approx (cos k) #s(literal 1 binary64)))))
(/.f64 (*.f64 (neg.f64 (*.f64 k k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 (neg.f64 (*.f64 l l)) #s(approx (cos k) #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 k k) (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) (*.f64 (*.f64 l l) (neg.f64 #s(approx (cos k) #s(literal 1 binary64)))))
(/.f64 (*.f64 (*.f64 k k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t #s(approx (cos k) #s(literal 1 binary64))))) (*.f64 l l))
(/.f64 (*.f64 (ratio-of-squares.f64 k l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(approx (cos k) #s(literal 1 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k))) (neg.f64 (*.f64 (*.f64 l l) #s(approx (cos k) #s(literal 1 binary64)))))
(/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k)) (*.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 l l)))
(/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (*.f64 k k)) (*.f64 (*.f64 l l) #s(approx (cos k) #s(literal 1 binary64))))
(*.f64 (/.f64 (fabs.f64 k) (neg.f64 l)) (/.f64 (fabs.f64 k) (neg.f64 l)))
(*.f64 (/.f64 (fabs.f64 k) (fabs.f64 l)) (/.f64 (fabs.f64 k) (fabs.f64 l)))
(*.f64 (/.f64 (fabs.f64 k) l) (/.f64 (fabs.f64 k) l))
(*.f64 (/.f64 (neg.f64 k) (fabs.f64 l)) (/.f64 (neg.f64 k) (fabs.f64 l)))
(*.f64 (/.f64 (neg.f64 k) l) (/.f64 (neg.f64 k) l))
(*.f64 (/.f64 k (neg.f64 l)) (/.f64 k (neg.f64 l)))
(*.f64 (/.f64 k (fabs.f64 l)) (/.f64 k (fabs.f64 l)))
(*.f64 (neg.f64 (/.f64 k l)) (neg.f64 (/.f64 k l)))
(*.f64 (fabs.f64 (/.f64 k l)) (fabs.f64 (/.f64 k l)))
(*.f64 (/.f64 k l) (/.f64 k l))
(*.f64 k (/.f64 k (*.f64 l l)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 k)) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 k)) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 k)) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 k)) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 k)) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 k)) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 (fabs.f64 k)) l)
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 k)) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 k)) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 k)) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 k)) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 k)) (neg.f64 l))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 k)) (fabs.f64 l))
(ratio-of-squares.f64 (fabs.f64 (fabs.f64 k)) l)
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) (neg.f64 l))
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) (fabs.f64 l))
(ratio-of-squares.f64 (exp.f64 (log.f64 k)) l)
(ratio-of-squares.f64 (neg.f64 (neg.f64 k)) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 k)) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 k)) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 k)) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (neg.f64 (neg.f64 k)) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 (neg.f64 k)) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 (neg.f64 k)) l)
(ratio-of-squares.f64 (fabs.f64 k) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (fabs.f64 k) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (fabs.f64 k) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (fabs.f64 k) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (fabs.f64 k) (neg.f64 l))
(ratio-of-squares.f64 (fabs.f64 k) (fabs.f64 l))
(ratio-of-squares.f64 (fabs.f64 k) l)
(ratio-of-squares.f64 (neg.f64 k) (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 (neg.f64 k) (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 k) (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 (neg.f64 k) (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 (neg.f64 k) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 k) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 k) l)
(ratio-of-squares.f64 k (neg.f64 (neg.f64 l)))
(ratio-of-squares.f64 k (neg.f64 (fabs.f64 l)))
(ratio-of-squares.f64 k (fabs.f64 (fabs.f64 l)))
(ratio-of-squares.f64 k (exp.f64 (log.f64 l)))
(ratio-of-squares.f64 k (neg.f64 l))
(ratio-of-squares.f64 k (fabs.f64 l))
(ratio-of-squares.f64 k l)
(pow.f64 (/.f64 k l) #s(literal 2 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 k k) l)) (neg.f64 l))
(/.f64 (neg.f64 (neg.f64 (*.f64 k k))) (neg.f64 (neg.f64 (*.f64 l l))))
(/.f64 (*.f64 (neg.f64 k) k) (*.f64 (neg.f64 l) l))
(/.f64 (*.f64 k (neg.f64 k)) (*.f64 l (neg.f64 l)))
(/.f64 (/.f64 (*.f64 k k) l) l)
(/.f64 (neg.f64 (*.f64 k k)) (neg.f64 (*.f64 l l)))
(/.f64 (*.f64 k k) (*.f64 l l))
(exp.f64 (-.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t #s(approx (cos k) #s(literal 1 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) (neg.f64 (neg.f64 #s(approx (cos k) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (neg.f64 #s(approx (cos k) #s(literal 1 binary64))))
(/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)
(*.f64 t (pow.f64 (sin.f64 k) #s(literal 2 binary64)))
#s(approx (cos k) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))) (ratio-of-squares.f64 k l)))
#s(approx (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))) (ratio-of-squares.f64 k l)))
#s(approx (* (/ (* k t) l) (/ k l)) (*.f64 (/.f64 t l) (/.f64 (*.f64 k k) l)))
#s(approx (/ (* k t) l) (/.f64 (*.f64 k t) l))
#s(approx (* k t) (*.f64 k t))
#s(approx t t)
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (* (/ (* (/ l k) (/ l k)) t) -1/3) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64)))
#s(approx (/ -1/3 t) (/.f64 #s(literal -1/3 binary64) t))
#s(approx (* (/ (* (/ l k) (/ l k)) t) -1/3) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64)))
#s(approx (/ (* (/ l k) (/ l k)) t) (/.f64 (ratio-of-squares.f64 l k) t))
#s(approx (/ (* (* l l) 2) (* (pow k 4) t)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (* (pow k 4) t) (*.f64 (pow.f64 k #s(literal 4 binary64)) t))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (*.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))) (ratio-of-squares.f64 k l)))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (/.f64 t (cos.f64 k))))
#s(approx (* (pow (sin k) 2) t) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))
#s(approx l l)
#s(approx (/ k l) (/.f64 k l))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (* (/ l k) (/ l k)) (ratio-of-squares.f64 l k))
#s(approx (* (/ l k) (/ l k)) (ratio-of-squares.f64 l k))
#s(approx (/ l k) (/.f64 l k))
#s(approx (* (* l l) 2) (*.f64 (*.f64 l l) #s(literal 2 binary64)))
#s(approx (* l l) (*.f64 l l))
#s(approx (/ (* k k) (* l l)) (ratio-of-squares.f64 k l))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (+.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal 151/7560 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64)))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (+.f64 t (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 31/360 binary64) t) (*.f64 #s(literal 173/5040 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l)))
#s(approx (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 t (*.f64 l l))))) (*.f64 k k)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (/ (* k t) l) (/ k l)) (/ (pow (sin k) 2) (cos k))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/315 binary64) (/.f64 t (*.f64 l l))) (+.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 t (*.f64 l l))) (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 t (*.f64 l l))))) #s(literal -1/2 binary64)))) (*.f64 k k)) (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 t (*.f64 l l))))) (*.f64 k k)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx k k)
#s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k))
#s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 31/360 binary64) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 173/5040 binary64) (*.f64 k k)) #s(literal 31/360 binary64)) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (pow (sin k) 2) (*.f64 k k))
#s(approx (pow (sin k) 2) (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (pow (sin k) 2) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (pow (sin k) 2) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/315 binary64) (*.f64 k k)) #s(literal 2/45 binary64)) (*.f64 k k)) #s(literal 1/3 binary64)) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (sin k) k)
#s(approx (sin k) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 k k))) k))
#s(approx (sin k) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k)) #s(literal 1 binary64)) k))
#s(approx (sin k) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 k k)) #s(literal 1/120 binary64)) (*.f64 k k)) #s(literal 1/6 binary64)) (*.f64 k k)) #s(literal 1 binary64)) k))
#s(approx (cos k) #s(literal 1 binary64))
#s(approx (cos k) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 k k)) #s(literal 1 binary64)))
#s(approx (cos k) (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 k k)) #s(literal 1/2 binary64)) (*.f64 k k)) #s(literal 1 binary64)))
#s(approx (cos k) (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 k k)) #s(literal 1/24 binary64)) (*.f64 k k)) #s(literal 1/2 binary64)) (*.f64 k k)) #s(literal 1 binary64)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (pow k 4) (pow.f64 k #s(literal 4 binary64)))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l)))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 t (*.f64 l l))))) (*.f64 k k)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* k k) (* l l)) (/ (* (pow (sin k) 2) t) (cos k))) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/315 binary64) (/.f64 t (*.f64 l l))) (+.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 t (*.f64 l l))) (*.f64 #s(literal -1/24 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 t (*.f64 l l))))) #s(literal -1/2 binary64)))) (*.f64 k k)) (*.f64 #s(literal 2/45 binary64) (/.f64 t (*.f64 l l)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 t (*.f64 l l)) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/24 binary64) (/.f64 t (*.f64 l l))))) (*.f64 k k)) (*.f64 (/.f64 t (*.f64 l l)) #s(literal -1/3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 t (*.f64 l l)))) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (+.f64 (*.f64 (*.f64 t #s(literal 1/6 binary64)) (*.f64 k k)) t) (*.f64 k k)))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) t) (-.f64 (*.f64 (*.f64 t #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) t))) (*.f64 k k)) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 #s(literal -1/2 binary64) t)) (*.f64 k k)) t) (*.f64 k k)))
#s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/315 binary64) t) (+.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) t) (*.f64 #s(literal -1/24 binary64) (*.f64 t #s(literal 1/6 binary64)))) (*.f64 (-.f64 (*.f64 #s(literal 2/45 binary64) t) (-.f64 (*.f64 (*.f64 t #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) t))) #s(literal -1/2 binary64)))) (*.f64 k k)) (*.f64 #s(literal 2/45 binary64) t)) (-.f64 (*.f64 (*.f64 t #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) t))) (*.f64 k k)) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 #s(literal -1/2 binary64) t)) (*.f64 k k)) t) (*.f64 k k)))
#s(approx (* (pow (sin k) 2) t) (*.f64 (*.f64 k k) t))
#s(approx (* (pow (sin k) 2) t) (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) t) t) (*.f64 k k)))
#s(approx (* (pow (sin k) 2) t) (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/3 binary64) t) (*.f64 #s(literal -2/45 binary64) (*.f64 (*.f64 k k) t))) (*.f64 k k)) t) (*.f64 k k)))
#s(approx (* (pow (sin k) 2) t) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/315 binary64) (*.f64 k k)) t) (*.f64 #s(literal -2/45 binary64) t)) (*.f64 k k)) (*.f64 #s(literal -1/3 binary64) t)) (*.f64 k k)) t) (*.f64 k k)))
#s(approx (/ (pow (sin k) 2) (cos k)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))
#s(approx (pow (sin k) 2) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))
#s(approx (sin k) (sin.f64 k))
#s(approx (cos k) (cos.f64 k))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64)))
#s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 (ratio-of-squares.f64 l k) t))) (*.f64 k k)))

eval1.3s (7.5%)

Memory
18.6MiB live, 575.4MiB allocated; 68ms collecting garbage
Samples
921.0ms25 487×0valid
4.0ms113×0invalid
Compiler

Compiled 26 761 to 2 402 computations (91% saved)

Precisions
Click to see histograms. Total time spent on operations: 484.0ms
ival-mult: 329.0ms (68% of total)
ival-div: 129.0ms (26.7% of total)
ival-true: 13.0ms (2.7% of total)
ival-assert: 8.0ms (1.7% of total)
adjust: 5.0ms (1% of total)

prune683.0ms (3.9%)

Memory
-12.3MiB live, 313.2MiB allocated; 33ms collecting garbage
Pruning

54 alts after pruning (48 fresh and 6 done)

PrunedKeptTotal
New51916535
Fresh63238
Picked235
Done033
Total52754581
Accuracy
99.6%
Counts
581 → 54
Alt Table
Click to see full alt table
StatusAccuracyProgram
50.5%
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (tan.f64 k) (sin.f64 k)))) (+.f64 (ratio-of-squares.f64 k t) #s(literal 0 binary64)))
39.4%
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
50.5%
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (- (+ (/ (* k k) (* t t)) 1) 1) (ratio-of-squares.f64 k t)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
92.5%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k t) (/.f64 k l))) (*.f64 (cos.f64 k) l))))
73.8%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k t) k)) (*.f64 (*.f64 l l) (cos.f64 k)))))
85.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l (cos.f64 k)))))
73.7%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l #s(approx (cos k) #s(literal 1 binary64))))))
77.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 k k) t) (ratio-of-squares.f64 (sin.f64 k) l)) (cos.f64 k))))
72.9%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
80.6%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) t) (cos.f64 k)))))
63.8%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) #s(approx (cos k) #s(literal 1 binary64))))))
89.9%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 t (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))))
70.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
81.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
72.1%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) #s(approx (cos k) #s(literal 1 binary64))) (ratio-of-squares.f64 (sin.f64 k) l))))
82.0%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) (cos.f64 k)))))
72.7%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
72.7%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k)))))
92.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (*.f64 k (/.f64 t l)) (/.f64 k l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))))
81.3%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 (*.f64 k t) (cos.f64 k))) (ratio-of-squares.f64 (sin.f64 k) l))))
65.7%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 k (*.f64 l l))) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
78.5%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 (/.f64 t (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))))
70.4%
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (* k k) t) (cos k)) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 (sin.f64 k) l))))
39.4%
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
38.7%
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
89.5%
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
69.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t))
62.1%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
53.1%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
68.4%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
38.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
70.6%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
76.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
56.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) k) k)))
19.3%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t)) (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)) (*.f64 k k))))
55.3%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
23.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) t) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (*.f64 (*.f64 (*.f64 k k) t) t)) (*.f64 k k))))
55.0%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (*.f64 l (/.f64 l t)) #s(literal -1/3 binary64))) (*.f64 k k))))
52.4%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k t)) (/.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
51.4%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k k)) (/.f64 l t)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
28.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
27.7%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
70.6%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
28.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) (/.f64 #s(literal -1/3 binary64) t))))
28.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) (/.f64 #s(literal -1/3 binary64) t))))
28.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
28.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) t) #s(literal -1/3 binary64))))
28.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
28.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
28.0%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
28.9%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
28.5%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
29.1%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
28.8%
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 l k)) #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) t))))
Samples
407.0ms11 239×0valid
38.0ms1 049×0invalid
Compiler

Compiled 6 402 to 2 273 computations (64.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 214.0ms
ival-mult: 139.0ms (65.1% of total)
ival-div: 62.0ms (29% of total)
ival-true: 7.0ms (3.3% of total)
ival-assert: 4.0ms (1.9% of total)
adjust: 3.0ms (1.4% of total)

regimes110.0ms (0.6%)

Memory
-6.5MiB live, 52.3MiB allocated; 2ms collecting garbage
Counts
83 → 2
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) k) k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (*.f64 l (/.f64 l t)) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k k)) (/.f64 l t)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k t)) (/.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) t) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (*.f64 (*.f64 (*.f64 k k) t) t)) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t)) (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (* k k) t) (cos k)) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) #s(approx (cos k) #s(literal 1 binary64))) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (+.f64 t (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) #s(approx (cos k) #s(literal 1 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 l k)) #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 (/.f64 t (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 (*.f64 k t) (cos.f64 k))) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 k k) t) (ratio-of-squares.f64 (sin.f64 k) l)) (cos.f64 k))))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) #s(approx (tan k) k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (pow.f64 k #s(literal 4 binary64))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) t) (cos.f64 k)))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 k (*.f64 l l))) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) (cos.f64 k)))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 t (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k)))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (- (+ (/ (* k k) (* t t)) 1) 1) (ratio-of-squares.f64 k t)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 #s(approx (+ 1 (pow (/ k t) 2)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k t) k)) (*.f64 (*.f64 l l) (cos.f64 k)))))
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (tan.f64 k) (sin.f64 k)))) (+.f64 (ratio-of-squares.f64 k t) #s(literal 0 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (ratio-of-squares.f64 k t))))
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))) (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 l l)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l (cos.f64 k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l) (*.f64 (*.f64 k k) t)) (*.f64 l (cos.f64 k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k t) (/.f64 k l))) (*.f64 (cos.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (*.f64 k (/.f64 t l)) (/.f64 k l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 k (/.f64 k (*.f64 t t))) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
Outputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k t) (/.f64 k l))) (*.f64 (cos.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (*.f64 k (/.f64 t l)) (/.f64 k l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))))
Calls

6 calls:

19.0ms
t
19.0ms
l
19.0ms
k
19.0ms
(*.f64 l l)
14.0ms
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
Results
AccuracySegmentsBranch
95.8%2(*.f64 l l)
93.2%1(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
93.2%1(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
94.8%2t
95.8%2l
95.7%2k
Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes103.0ms (0.6%)

Memory
2.5MiB live, 49.1MiB allocated; 1ms collecting garbage
Counts
77 → 2
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) k) k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (*.f64 l (/.f64 l t)) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k k)) (/.f64 l t)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k t)) (/.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) t) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (*.f64 (*.f64 (*.f64 k k) t) t)) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t)) (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (* k k) t) (cos k)) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) #s(approx (cos k) #s(literal 1 binary64))) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (+.f64 t (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) #s(approx (cos k) #s(literal 1 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 l k)) #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 (/.f64 t (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 (*.f64 k t) (cos.f64 k))) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 k k) t) (ratio-of-squares.f64 (sin.f64 k) l)) (cos.f64 k))))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) #s(approx (tan k) k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (pow.f64 k #s(literal 4 binary64))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) t) (cos.f64 k)))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 k (*.f64 l l))) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) (cos.f64 k)))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 t (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k)))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (- (+ (/ (* k k) (* t t)) 1) 1) (ratio-of-squares.f64 k t)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 #s(approx (+ 1 (pow (/ k t) 2)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k t) k)) (*.f64 (*.f64 l l) (cos.f64 k)))))
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (tan.f64 k) (sin.f64 k)))) (+.f64 (ratio-of-squares.f64 k t) #s(literal 0 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (ratio-of-squares.f64 k t))))
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))) (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 l l)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l (cos.f64 k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l) (*.f64 (*.f64 k k) t)) (*.f64 l (cos.f64 k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k t) (/.f64 k l))) (*.f64 (cos.f64 k) l))))
Outputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k t) (/.f64 k l))) (*.f64 (cos.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 t (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))))
Calls

6 calls:

18.0ms
l
18.0ms
t
18.0ms
k
16.0ms
(*.f64 l l)
15.0ms
(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
Results
AccuracySegmentsBranch
92.5%1(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
92.5%1(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
94.5%2t
94.3%2k
94.5%2(*.f64 l l)
94.5%2l
Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes100.0ms (0.6%)

Memory
2.0MiB live, 48.6MiB allocated; 1ms collecting garbage
Counts
76 → 2
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) k) k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (*.f64 l (/.f64 l t)) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k k)) (/.f64 l t)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k t)) (/.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) t) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (*.f64 (*.f64 (*.f64 k k) t) t)) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t)) (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (* k k) t) (cos k)) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) #s(approx (cos k) #s(literal 1 binary64))) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (+.f64 t (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) #s(approx (cos k) #s(literal 1 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 l k)) #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 (/.f64 t (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 (*.f64 k t) (cos.f64 k))) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 k k) t) (ratio-of-squares.f64 (sin.f64 k) l)) (cos.f64 k))))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) #s(approx (tan k) k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (pow.f64 k #s(literal 4 binary64))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) t) (cos.f64 k)))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 k (*.f64 l l))) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) (cos.f64 k)))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 t (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k)))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (- (+ (/ (* k k) (* t t)) 1) 1) (ratio-of-squares.f64 k t)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 #s(approx (+ 1 (pow (/ k t) 2)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k t) k)) (*.f64 (*.f64 l l) (cos.f64 k)))))
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (tan.f64 k) (sin.f64 k)))) (+.f64 (ratio-of-squares.f64 k t) #s(literal 0 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (ratio-of-squares.f64 k t))))
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))) (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 l l)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l (cos.f64 k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) l) (*.f64 (*.f64 k k) t)) (*.f64 l (cos.f64 k)))))
Outputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l (cos.f64 k)))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
Calls

6 calls:

18.0ms
l
18.0ms
t
17.0ms
k
16.0ms
(*.f64 l l)
15.0ms
(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
Results
AccuracySegmentsBranch
89.9%1(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
89.9%1(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
93.4%2k
92.8%2t
92.5%2(*.f64 l l)
94.3%3l
Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes21.0ms (0.1%)

Memory
11.5MiB live, 11.5MiB allocated; 0ms collecting garbage
Counts
74 → 2
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) k) k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (*.f64 l (/.f64 l t)) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k k)) (/.f64 l t)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k t)) (/.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) t) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (*.f64 (*.f64 (*.f64 k k) t) t)) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t)) (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (* k k) t) (cos k)) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) #s(approx (cos k) #s(literal 1 binary64))) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (+.f64 t (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) #s(approx (cos k) #s(literal 1 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 l k)) #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 (/.f64 t (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 (*.f64 k t) (cos.f64 k))) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 k k) t) (ratio-of-squares.f64 (sin.f64 k) l)) (cos.f64 k))))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) #s(approx (tan k) k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (pow.f64 k #s(literal 4 binary64))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) t) (cos.f64 k)))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 k (*.f64 l l))) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) (cos.f64 k)))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 t (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k)))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (- (+ (/ (* k k) (* t t)) 1) 1) (ratio-of-squares.f64 k t)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 #s(approx (+ 1 (pow (/ k t) 2)) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k t) k)) (*.f64 (*.f64 l l) (cos.f64 k)))))
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (tan.f64 k) (sin.f64 k)))) (+.f64 (ratio-of-squares.f64 k t) #s(literal 0 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) #s(approx (- (+ 1 (pow (/ k t) 2)) 1) (ratio-of-squares.f64 k t))))
(/.f64 (/.f64 #s(literal 2 binary64) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) (tan.f64 k)))) (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 l l)))))
Outputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) (cos.f64 k)))))
Calls

1 calls:

17.0ms
k
Results
AccuracySegmentsBranch
92.9%2k
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes60.0ms (0.3%)

Memory
29.1MiB live, 29.1MiB allocated; 0ms collecting garbage
Counts
62 → 2
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) k) k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (*.f64 l (/.f64 l t)) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k k)) (/.f64 l t)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k t)) (/.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) t) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (*.f64 (*.f64 (*.f64 k k) t) t)) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t)) (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (* k k) t) (cos k)) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) #s(approx (cos k) #s(literal 1 binary64))) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (+.f64 t (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) #s(approx (cos k) #s(literal 1 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 l k)) #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 (/.f64 t (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 (*.f64 k t) (cos.f64 k))) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 k k) t) (ratio-of-squares.f64 (sin.f64 k) l)) (cos.f64 k))))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) #s(approx (tan k) k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (pow.f64 k #s(literal 4 binary64))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) t) (cos.f64 k)))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 k (*.f64 l l))) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l #s(approx (cos k) #s(literal 1 binary64))))))
Outputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) t) (cos.f64 k)))))
Calls

4 calls:

15.0ms
t
15.0ms
l
14.0ms
k
13.0ms
(*.f64 l l)
Results
AccuracySegmentsBranch
91.7%2(*.f64 l l)
91.7%2l
85.4%3t
91.8%2k
Compiler

Compiled 6 to 13 computations (-116.7% saved)

regimes78.0ms (0.5%)

Memory
-8.4MiB live, 39.0MiB allocated; 1ms collecting garbage
Counts
58 → 1
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) k) k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (*.f64 l (/.f64 l t)) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k k)) (/.f64 l t)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k t)) (/.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) t) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (*.f64 (*.f64 (*.f64 k k) t) t)) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t)) (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (* k k) t) (cos k)) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) #s(approx (cos k) #s(literal 1 binary64))) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (+.f64 t (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) #s(approx (cos k) #s(literal 1 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 l k)) #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 (/.f64 t (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 (*.f64 k t) (cos.f64 k))) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 (*.f64 k k) t) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (*.f64 (*.f64 k k) t) (ratio-of-squares.f64 (sin.f64 k) l)) (cos.f64 k))))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (*.f64 (sin.f64 k) #s(approx (tan k) k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (pow.f64 k #s(literal 4 binary64))))
Outputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
Calls

6 calls:

14.0ms
k
14.0ms
l
14.0ms
t
12.0ms
(*.f64 l l)
10.0ms
(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
Results
AccuracySegmentsBranch
81.3%1t
81.3%1(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
81.3%1(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
81.3%1(*.f64 l l)
81.3%1l
81.3%1k
Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes74.0ms (0.4%)

Memory
-37.9MiB live, 36.3MiB allocated; 3ms collecting garbage
Counts
53 → 1
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) k) k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (*.f64 l (/.f64 l t)) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k k)) (/.f64 l t)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k t)) (/.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) t) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (*.f64 (*.f64 (*.f64 k k) t) t)) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t)) (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (* k k) t) (cos k)) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) #s(approx (cos k) #s(literal 1 binary64))) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (+.f64 t (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) #s(approx (cos k) #s(literal 1 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 l k)) #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 (/.f64 t (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 (*.f64 k t) (cos.f64 k))) (ratio-of-squares.f64 (sin.f64 k) l))))
Outputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 (*.f64 k t) (cos.f64 k))) (ratio-of-squares.f64 (sin.f64 k) l))))
Calls

6 calls:

15.0ms
k
13.0ms
l
13.0ms
t
11.0ms
(*.f64 l l)
10.0ms
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
Results
AccuracySegmentsBranch
81.3%1(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
81.3%1(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
81.3%1(*.f64 l l)
81.3%1l
81.3%1k
81.3%1t
Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes71.0ms (0.4%)

Memory
-11.6MiB live, 35.7MiB allocated; 1ms collecting garbage
Counts
52 → 3
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) k) k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (*.f64 l (/.f64 l t)) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k k)) (/.f64 l t)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k t)) (/.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) t) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (*.f64 (*.f64 (*.f64 k k) t) t)) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t)) (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (* k k) t) (cos k)) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) #s(approx (cos k) #s(literal 1 binary64))) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (+.f64 t (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) #s(approx (cos k) #s(literal 1 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 l k)) #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 (/.f64 t (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))))
Outputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 (/.f64 t (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
Calls

6 calls:

13.0ms
t
12.0ms
l
12.0ms
k
12.0ms
(*.f64 l l)
9.0ms
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
Results
AccuracySegmentsBranch
78.5%1(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
78.5%1(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
78.5%1(*.f64 l l)
78.5%1l
82.2%3k
78.5%1t
Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes69.0ms (0.4%)

Memory
-12.6MiB live, 35.1MiB allocated; 0ms collecting garbage
Counts
51 → 3
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) k) k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (*.f64 l (/.f64 l t)) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k k)) (/.f64 l t)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k t)) (/.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) t) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (*.f64 (*.f64 (*.f64 k k) t) t)) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t)) (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (* k k) t) (cos k)) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) #s(approx (cos k) #s(literal 1 binary64))) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (+.f64 t (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) #s(approx (cos k) #s(literal 1 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 l k)) #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
Outputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))
Calls

6 calls:

12.0ms
t
12.0ms
k
12.0ms
l
11.0ms
(*.f64 l l)
9.0ms
(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
Results
AccuracySegmentsBranch
76.7%1t
76.7%1(*.f64 l l)
76.7%1(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
76.7%1(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
76.7%1l
81.0%3k
Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes14.0ms (0.1%)

Memory
8.4MiB live, 8.4MiB allocated; 0ms collecting garbage
Counts
50 → 3
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) k) k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (*.f64 l (/.f64 l t)) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k k)) (/.f64 l t)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k t)) (/.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) t) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (*.f64 (*.f64 (*.f64 k k) t) t)) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t)) (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (* k k) t) (cos k)) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) #s(approx (cos k) #s(literal 1 binary64))) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (+.f64 t (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) #s(approx (cos k) #s(literal 1 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 l k)) #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
Outputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) #s(approx (cos k) #s(literal 1 binary64))))))
Calls

1 calls:

12.0ms
k
Results
AccuracySegmentsBranch
81.0%3k
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes66.0ms (0.4%)

Memory
34.1MiB live, 34.1MiB allocated; 0ms collecting garbage
Counts
49 → 2
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) k) k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (*.f64 l (/.f64 l t)) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k k)) (/.f64 l t)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 k t)) (/.f64 l k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) t) (*.f64 (*.f64 (*.f64 k k) t) (*.f64 (*.f64 l l) #s(literal -1/3 binary64)))) (*.f64 (*.f64 (*.f64 k k) t) t)) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (*.f64 (*.f64 (*.f64 k k) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (ratio-of-squares.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) t) (ratio-of-squares.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) t)) (/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal 2 binary64)) (*.f64 (*.f64 l l) #s(literal -1/3 binary64))) t)) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 #s(approx (/ (* (* k k) t) (cos k)) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (pow.f64 k #s(literal 4 binary64)) l) (/.f64 t l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) #s(approx (cos k) #s(literal 1 binary64))) (ratio-of-squares.f64 (sin.f64 k) l))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 k k))) l) (pow.f64 k #s(literal 4 binary64))) (/.f64 l t)))
(/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (+.f64 t (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (pow.f64 k #s(literal 4 binary64)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) #s(approx (cos k) #s(literal 1 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 l k) #s(literal 2 binary64)))) t) (*.f64 (*.f64 (*.f64 k k) k) k)))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) t) (*.f64 #s(literal 31/360 binary64) (*.f64 (*.f64 k k) t))) (*.f64 l l)) (*.f64 k k)) (/.f64 t (*.f64 l l))) (pow.f64 k #s(literal 4 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 7/120 binary64))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 l l) t))) (*.f64 k k)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l (exp.f64 (log.f64 k))) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 (exp.f64 (log.f64 l)) k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 l k)) #s(literal 2 binary64))) (/.f64 #s(literal -1/3 binary64) t))))
Outputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
Calls

6 calls:

12.0ms
l
12.0ms
t
12.0ms
k
10.0ms
(*.f64 l l)
9.0ms
(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
Results
AccuracySegmentsBranch
74.8%2(*.f64 l l)
74.8%2l
72.7%1(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
72.7%1(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
72.7%1t
75.3%2k
Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes8.0ms (0%)

Memory
4.8MiB live, 4.8MiB allocated; 0ms collecting garbage
Counts
24 → 2
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) k) k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (*.f64 l (/.f64 l t)) #s(literal -1/3 binary64))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (+.f64 (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l l) t) #s(literal -1/3 binary64))) (*.f64 k k))))
Outputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
Calls

1 calls:

6.0ms
k
Results
AccuracySegmentsBranch
75.2%2k
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes29.0ms (0.2%)

Memory
-30.2MiB live, 17.6MiB allocated; 0ms collecting garbage
Counts
19 → 2
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
Calls

6 calls:

5.0ms
t
5.0ms
l
5.0ms
k
4.0ms
(*.f64 l l)
4.0ms
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
Results
AccuracySegmentsBranch
70.6%1(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
70.6%1(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
70.6%1t
70.6%1(*.f64 l l)
70.6%1l
73.5%2k
Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes6.0ms (0%)

Memory
3.9MiB live, 3.9MiB allocated; 0ms collecting garbage
Counts
18 → 2
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 (/.f64 l k) (/.f64 l k)) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 #s(literal -2 binary64) (ratio-of-squares.f64 l k))) t) (*.f64 k k))))
Outputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64))))
Calls

1 calls:

5.0ms
k
Results
AccuracySegmentsBranch
73.2%2k
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes5.0ms (0%)

Memory
3.5MiB live, 3.5MiB allocated; 0ms collecting garbage
Counts
15 → 2
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l t)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l (*.f64 k t)) (/.f64 l k)) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (*.f64 l l) (*.f64 k t)) (/.f64 #s(literal -1/3 binary64) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 #s(approx (+ (* (/ (/ (* l l) (* k k)) t) 2) (* (/ (* l l) t) -1/3)) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l k))) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (/.f64 (ratio-of-squares.f64 l k) (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (*.f64 k k)) (ratio-of-squares.f64 l k)) t))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (ratio-of-squares.f64 l (*.f64 k k)) (/.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 2 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 k k) (*.f64 k k)) t)))
Outputs
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
Calls

1 calls:

4.0ms
k
Results
AccuracySegmentsBranch
73.0%2k
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes13.0ms (0.1%)

Memory
10.5MiB live, 10.5MiB allocated; 0ms collecting garbage
Counts
6 → 2
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (*.f64 l l) #s(literal -1/3 binary64)) (*.f64 (*.f64 k k) t))))
Outputs
#s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
Calls

6 calls:

2.0ms
t
2.0ms
l
2.0ms
k
2.0ms
(*.f64 l l)
2.0ms
(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
Results
AccuracySegmentsBranch
38.7%1t
48.1%4(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
48.6%2(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
41.7%2(*.f64 l l)
41.7%2l
56.8%2k
Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes2.0ms (0%)

Memory
2.0MiB live, 2.0MiB allocated; 0ms collecting garbage
Counts
4 → 2
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
Calls

1 calls:

2.0ms
k
Results
AccuracySegmentsBranch
56.8%2k
Compiler

Compiled 1 to 3 computations (-200% saved)

regimes9.0ms (0.1%)

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

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
3 → 1
Calls
Call 1
Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(literal -1/3 binary64) t))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(literal -1/3 binary64)) t)))
Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
Calls

6 calls:

1.0ms
t
1.0ms
k
1.0ms
l
1.0ms
(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
1.0ms
(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
Results
AccuracySegmentsBranch
28.8%1t
28.8%1(*.f64 l l)
28.8%1l
28.8%1(*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64)))
28.8%1(/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k)) (-.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
28.8%1k
Compiler

Compiled 54 to 50 computations (7.4% saved)

bsearch33.0ms (0.2%)

Memory
-39.5MiB live, 10.0MiB allocated; 1ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
30.0ms
1.237294742930361e+114
3.211804853994518e+115
Samples
10.0ms59×0valid
6.0ms21×2valid
6.0ms17×3valid
3.0ms15×1valid
Compiler

Compiled 630 to 459 computations (27.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 21.0ms
adjust: 5.0ms (24.1% of total)
ival-div: 3.0ms (14.5% of total)
ival-mult: 3.0ms (14.5% of total)
ival-pow2: 2.0ms (9.6% of total)
ival-tan: 2.0ms (9.6% of total)
ival-add: 2.0ms (9.6% of total)
ival-sin: 2.0ms (9.6% of total)
ival-sub: 1.0ms (4.8% of total)
ival-pow: 1.0ms (4.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch33.0ms (0.2%)

Memory
10.6MiB live, 10.6MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
29.0ms
4.303715594827866e+51
5.541178375099367e+52
Samples
11.0ms147×0valid
6.0ms16×3valid
5.0ms17×2valid
3.0ms12×1valid
Compiler

Compiled 520 to 385 computations (26% saved)

Precisions
Click to see histograms. Total time spent on operations: 19.0ms
adjust: 4.0ms (21.1% of total)
ival-mult: 4.0ms (21.1% of total)
ival-div: 3.0ms (15.8% of total)
ival-tan: 2.0ms (10.5% of total)
ival-sin: 2.0ms (10.5% of total)
ival-pow2: 1.0ms (5.3% of total)
ival-sub: 1.0ms (5.3% of total)
ival-add: 1.0ms (5.3% of total)
ival-pow: 1.0ms (5.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch21.0ms (0.1%)

Memory
6.9MiB live, 6.9MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
19.0ms
8.799099079552533e+95
1.2450854625416005e+96
Samples
9.0ms105×0valid
3.0ms10×2valid
3.0ms13×1valid
Compiler

Compiled 388 to 277 computations (28.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 12.0ms
adjust: 2.0ms (16.6% of total)
ival-div: 2.0ms (16.6% of total)
ival-tan: 2.0ms (16.6% of total)
ival-mult: 2.0ms (16.6% of total)
ival-sin: 2.0ms (16.6% of total)
ival-pow2: 1.0ms (8.3% of total)
ival-pow: 1.0ms (8.3% of total)
ival-assert: 0.0ms (0% of total)
ival-sub: 0.0ms (0% of total)
ival-add: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch35.0ms (0.2%)

Memory
10.9MiB live, 10.9MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
31.0ms
6.0821873554796213e-5
2.0650854960032325
Samples
12.0ms41×2valid
7.0ms62×0valid
3.0ms17×1valid
3.0ms3valid
Compiler

Compiled 844 to 593 computations (29.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 20.0ms
adjust: 5.0ms (24.8% of total)
ival-div: 3.0ms (14.9% of total)
ival-mult: 3.0ms (14.9% of total)
ival-pow2: 2.0ms (9.9% of total)
ival-sub: 1.0ms (5% of total)
ival-tan: 1.0ms (5% of total)
ival-add: 1.0ms (5% of total)
ival-pow: 1.0ms (5% of total)
ival-sin: 1.0ms (5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch46.0ms (0.3%)

Memory
-32.5MiB live, 14.1MiB allocated; 3ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
41.0ms
2.0650854960032325
7426.496230446812
Samples
18.0ms200×0valid
10.0ms31×2valid
5.0ms21×1valid
2.0ms3valid
Compiler

Compiled 812 to 577 computations (28.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 28.0ms
ival-div: 6.0ms (21.4% of total)
ival-mult: 5.0ms (17.9% of total)
adjust: 4.0ms (14.3% of total)
ival-sin: 4.0ms (14.3% of total)
ival-tan: 3.0ms (10.7% of total)
ival-pow2: 2.0ms (7.1% of total)
ival-sub: 1.0ms (3.6% of total)
ival-add: 1.0ms (3.6% of total)
ival-pow: 1.0ms (3.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch77.0ms (0.4%)

Memory
26.2MiB live, 26.2MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
41.0ms
2.59967102780491e+145
1.023831560567249e+148
28.0ms
6.0821873554796213e-5
2.0650854960032325
Samples
34.0ms527×0valid
12.0ms40×2valid
8.0ms37×1valid
1.0ms3valid
Compiler

Compiled 1 420 to 1 033 computations (27.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 41.0ms
ival-mult: 10.0ms (24.2% of total)
ival-div: 7.0ms (17% of total)
adjust: 6.0ms (14.5% of total)
ival-sin: 5.0ms (12.1% of total)
ival-tan: 4.0ms (9.7% of total)
ival-pow2: 3.0ms (7.3% of total)
ival-pow: 3.0ms (7.3% of total)
ival-add: 2.0ms (4.8% of total)
ival-sub: 1.0ms (2.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch34.0ms (0.2%)

Memory
13.0MiB live, 13.0MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
12.0ms
2.59967102780491e+145
1.023831560567249e+148
17.0ms
6.0821873554796213e-5
2.0650854960032325
Samples
17.0ms413×0valid
4.0ms15×2valid
1.0ms1valid
0.0ms3valid
Compiler

Compiled 1 452 to 1 049 computations (27.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 14.0ms
ival-mult: 6.0ms (43.9% of total)
ival-div: 3.0ms (22% of total)
adjust: 2.0ms (14.6% of total)
ival-pow2: 1.0ms (7.3% of total)
ival-pow: 1.0ms (7.3% of total)
ival-assert: 0.0ms (0% of total)
ival-sub: 0.0ms (0% of total)
ival-tan: 0.0ms (0% of total)
ival-add: 0.0ms (0% of total)
ival-sin: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch25.0ms (0.1%)

Memory
-37.1MiB live, 9.8MiB allocated; 3ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
15.0ms
2.59967102780491e+145
1.023831560567249e+148
7.0ms
6.0821873554796213e-5
2.0650854960032325
Samples
17.0ms384×0valid
Compiler

Compiled 1 484 to 1 073 computations (27.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 10.0ms
ival-div: 5.0ms (51.6% of total)
ival-mult: 4.0ms (41.2% of total)
ival-true: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch30.0ms (0.2%)

Memory
9.0MiB live, 9.0MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
27.0ms
2650854669100574.5
19554481804159910.0
Samples
8.0ms24×2valid
7.0ms45×0valid
5.0ms20×1valid
3.0ms3valid
Compiler

Compiled 700 to 469 computations (33% saved)

Precisions
Click to see histograms. Total time spent on operations: 19.0ms
adjust: 4.0ms (21.1% of total)
ival-tan: 3.0ms (15.8% of total)
ival-mult: 3.0ms (15.8% of total)
ival-sin: 3.0ms (15.8% of total)
ival-div: 2.0ms (10.6% of total)
ival-pow2: 1.0ms (5.3% of total)
ival-sub: 1.0ms (5.3% of total)
ival-add: 1.0ms (5.3% of total)
ival-pow: 1.0ms (5.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
2650854669100574.5
19554481804159910.0
Compiler

Compiled 652 to 439 computations (32.7% saved)

bsearch1.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
2650854669100574.5
19554481804159910.0
Compiler

Compiled 616 to 409 computations (33.6% saved)

bsearch6.0ms (0%)

Memory
2.7MiB live, 2.7MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
5.0ms
2650854669100574.5
19554481804159910.0
Samples
3.0ms96×0valid
Compiler

Compiled 640 to 433 computations (32.3% saved)

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

bsearch11.0ms (0.1%)

Memory
4.7MiB live, 4.7MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
9.0ms
2650854669100574.5
19554481804159910.0
Samples
7.0ms192×0valid
Compiler

Compiled 616 to 427 computations (30.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 3.0ms
ival-mult: 2.0ms (59.5% of total)
ival-div: 1.0ms (29.7% of total)
ival-true: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch11.0ms (0.1%)

Memory
4.6MiB live, 4.6MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
9.0ms
2650854669100574.5
19554481804159910.0
Samples
7.0ms192×0valid
Compiler

Compiled 592 to 409 computations (30.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 3.0ms
ival-mult: 2.0ms (59.5% of total)
ival-div: 1.0ms (29.8% of total)
ival-true: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

bsearch11.0ms (0.1%)

Memory
4.6MiB live, 4.6MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
9.0ms
2650854669100574.5
19554481804159910.0
Samples
7.0ms192×0valid
Compiler

Compiled 556 to 397 computations (28.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 3.0ms
ival-mult: 2.0ms (60% of total)
ival-div: 1.0ms (30% of total)
ival-true: 0.0ms (0% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

simplify60.0ms (0.3%)

Memory
-28.1MiB live, 18.4MiB allocated; 2ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
02081762
13111690
28181618
350841618
Stop Event
node limit
Calls
Call 1
Inputs
(if (<=.f64 l #s(literal 3300000000000000051346073227240581980085064609839502730120242915421751477843693820774451786719656577331480726863872 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k t) (/.f64 k l))) (*.f64 (cos.f64 k) l)))) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (*.f64 k (/.f64 t l)) (/.f64 k l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))))
(if (<=.f64 l #s(literal 47999999999999999674605536369358142870162005213315072 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k t) (/.f64 k l))) (*.f64 (cos.f64 k) l)))) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 t (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))))))
(if (<=.f64 k #s(literal 1119999999999999904074045243402876513468539233103663028325845781337026909193378002378696815542272 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l (cos.f64 k))))) #s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64))))
(if (<=.f64 k #s(literal 5764607523034235/2305843009213693952 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))))) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) (cos.f64 k))))))
(if (<=.f64 k #s(literal 4728779608739021/2251799813685248 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))))) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) t) (cos.f64 k))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 (*.f64 k t) (cos.f64 k))) (ratio-of-squares.f64 (sin.f64 k) l))))
(if (<=.f64 k #s(literal 8116567392432203/18446744073709551616 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))))) (if (<=.f64 k #s(literal 10199999999999999988504133046186714994143413014760399447795350487549205153229728213957562143589305091961670726636397788061797011364452009697926447104 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 (/.f64 t (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))))
(if (<=.f64 k #s(literal 5902958103587057/18446744073709551616 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))))) (if (<=.f64 k #s(literal 10199999999999999988504133046186714994143413014760399447795350487549205153229728213957562143589305091961670726636397788061797011364452009697926447104 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))))
(if (<=.f64 k #s(literal 5902958103587057/18446744073709551616 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))))) (if (<=.f64 k #s(literal 10199999999999999988504133046186714994143413014760399447795350487549205153229728213957562143589305091961670726636397788061797011364452009697926447104 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) #s(approx (cos k) #s(literal 1 binary64))))))))
(if (<=.f64 k #s(literal 13200000000000000 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64)))))
(if (<=.f64 k #s(literal 13200000000000000 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k))))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64)))))
(if (<=.f64 k #s(literal 13200000000000000 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k))))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64)))))
(if (<=.f64 k #s(literal 13200000000000000 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t))))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64)))))
(if (<=.f64 k #s(literal 13200000000000000 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t))))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64)))))
(if (<=.f64 k #s(literal 13200000000000000 binary64)) #s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64)))))
(if (<=.f64 k #s(literal 13200000000000000 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k)))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))
Outputs
(if (<=.f64 l #s(literal 3300000000000000051346073227240581980085064609839502730120242915421751477843693820774451786719656577331480726863872 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k t) (/.f64 k l))) (*.f64 (cos.f64 k) l)))) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (*.f64 k (/.f64 t l)) (/.f64 k l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))))
(if (<=.f64 l #s(literal 47999999999999999674605536369358142870162005213315072 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (*.f64 (*.f64 k t) (/.f64 k l))) (*.f64 (cos.f64 k) l)))) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (*.f64 t (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))))))
(if (<=.f64 k #s(literal 1119999999999999904074045243402876513468539233103663028325845781337026909193378002378696815542272 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (*.f64 (/.f64 (*.f64 k k) l) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (*.f64 l (cos.f64 k))))) #s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64))))
(if (<=.f64 k #s(literal 5764607523034235/2305843009213693952 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))))) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) (cos.f64 k))))))
(if (<=.f64 k #s(literal 4728779608739021/2251799813685248 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))))) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 k k)))) t) (cos.f64 k))))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (/.f64 (*.f64 k (*.f64 k t)) (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))
(/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k (/.f64 (*.f64 k t) (cos.f64 k))) (ratio-of-squares.f64 (sin.f64 k) l))))
(if (<=.f64 k #s(literal 8116567392432203/18446744073709551616 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))))) (if (<=.f64 k #s(literal 10199999999999999988504133046186714994143413014760399447795350487549205153229728213957562143589305091961670726636397788061797011364452009697926447104 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 k k) (*.f64 (/.f64 t (cos.f64 k)) (ratio-of-squares.f64 (sin.f64 k) l))))) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))))
(if (<=.f64 k #s(literal 5902958103587057/18446744073709551616 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))))) (if (<=.f64 k #s(literal 10199999999999999988504133046186714994143413014760399447795350487549205153229728213957562143589305091961670726636397788061797011364452009697926447104 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) #s(approx (cos k) #s(literal 1 binary64))))))))
(if (<=.f64 k #s(literal 5902958103587057/18446744073709551616 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))))) (if (<=.f64 k #s(literal 10199999999999999988504133046186714994143413014760399447795350487549205153229728213957562143589305091961670726636397788061797011364452009697926447104 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (/.f64 (cos.f64 k) (*.f64 (*.f64 k k) t)) (ratio-of-squares.f64 l (sin.f64 k))) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t) #s(approx (cos k) #s(literal 1 binary64))))))))
(if (<=.f64 k #s(literal 13200000000000000 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64)))))
(if (<=.f64 k #s(literal 13200000000000000 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (*.f64 (/.f64 (*.f64 k t) l) (/.f64 k l)) #s(approx (/ (pow (sin k) 2) (cos k)) (*.f64 k k))))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64)))))
(if (<=.f64 k #s(literal 13200000000000000 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k))))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64)))))
(if (<=.f64 k #s(literal 13200000000000000 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t))))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (*.f64 (/.f64 l k) (/.f64 (/.f64 l k) t)) #s(literal -1/3 binary64)))))
(if (<=.f64 k #s(literal 13200000000000000 binary64)) (/.f64 #s(literal 2 binary64) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1)) (*.f64 (ratio-of-squares.f64 k l) #s(approx (/ (* (pow (sin k) 2) t) (cos k)) (*.f64 (*.f64 k k) t))))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64)))))
(if (<=.f64 k #s(literal 13200000000000000 binary64)) #s(approx (/ 2 (* (- (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (*.f64 (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t) #s(literal 2 binary64))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64)))))
(if (<=.f64 k #s(literal 13200000000000000 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 #s(literal 2 binary64) t) (ratio-of-squares.f64 l (*.f64 k k)))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))) #s(approx (/ (/ (+ (* 2 (* l l)) (* -1/3 (pow (* l k) 2))) t) (pow k 4)) (*.f64 (/.f64 (ratio-of-squares.f64 l k) t) #s(literal -1/3 binary64))))

derivations444.0ms (2.6%)

Memory
37.8MiB live, 37.8MiB allocated; 0ms collecting garbage
Stop Event
fuel
Samples
41.0ms1 167×0valid
4.0ms113×0invalid
Compiler

Compiled 1 770 to 211 computations (88.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 22.0ms
ival-mult: 14.0ms (63.8% of total)
ival-div: 6.0ms (27.3% of total)
ival-true: 1.0ms (4.6% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

preprocess2.2s (12.5%)

Memory
50.8MiB live, 920.5MiB allocated; 157ms collecting garbage
Remove

(negabs t)

(abs k)

Samples
1.3s37 296×0valid
184.0ms3 984×0invalid
Compiler

Compiled 4 310 to 780 computations (81.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 729.0ms
ival-mult: 479.0ms (65.7% of total)
ival-div: 207.0ms (28.4% of total)
ival-true: 21.0ms (2.9% of total)
ival-assert: 13.0ms (1.8% of total)
adjust: 9.0ms (1.2% of total)

end0.0ms (0%)

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

Profiling

Loading profile data...