Metrics for Toniolo and Linder, Equation (10+)

start0.0ms (0%)

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

analyze610.0ms (2.6%)

Memory

16.4MiB live, 877.4MiB allocated; 153ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
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
4.7%	4.7%	95.2%	0.1%	0%	0%	0%	7
5.5%	5.5%	94.4%	0.1%	0%	0%	0%	8
13.7%	13.7%	86.2%	0.1%	0%	0%	0%	9
20.5%	20.5%	79.4%	0.1%	0%	0%	0%	10
22%	21.9%	77.9%	0.1%	0%	0%	0%	11
28.6%	28.5%	71.3%	0.1%	0%	0%	0%	12

Compiler

Compiled 27 to 21 computations (22.2% saved)

sample1.9s (8.3%)

Memory

25.3MiB live, 2 821.4MiB allocated; 387ms collecting garbage

Samples

1.5s

8 256×

valid

Precisions

Click to see histograms. Total time spent on operations: 1.3s

ival-sin: 286.0ms (22.8% of total)

ival-mult: 238.0ms (18.9% of total)

ival-pow: 199.0ms (15.8% of total)

ival-div: 175.0ms (13.9% of total)

ival-tan: 169.0ms (13.4% of total)

ival-add: 91.0ms (7.2% of total)

ival-pow2: 78.0ms (6.2% of total)

exact: 15.0ms (1.2% of total)

adjust: 3.0ms (0.2% of total)

ival-assert: 3.0ms (0.2% of total)

Bogosity

explain256.0ms (1.1%)

Memory

20.7MiB live, 399.3MiB allocated; 25ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
72	-	2	(-6.006044347560856e-106 7.251798409139768e-65 -7077537477845711.0)	`(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))`
45	-	1	(2.2341684206266948e-141 -1.442864725522751e-175 3.0352534579407196e-122)	`(.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)))`
12	-	0	-	`(.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k))`
6	-	0	-	`(.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))`
3	-	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))))`
0	-	0	-	`k`
0	-	0	-	`(/.f64 k t)`
0	-	0	-	`t`
0	-	0	-	`#s(literal 1 binary64)`
0	-	0	-	`#s(literal 3 binary64)`
0	-	0	-	`(tan.f64 k)`
0	-	0	-	`(pow.f64 (/.f64 k t) #s(literal 2 binary64))`
0	-	0	-	`(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64)))`
0	-	0	-	`(*.f64 l l)`
0	-	0	-	`(sin.f64 k)`
0	-	0	-	`(pow.f64 t #s(literal 3 binary64))`
0	-	0	-	`(+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))`
0	-	0	-	`#s(literal 2 binary64)`
0	-	0	-	`l`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`*.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)))`	*uo**	35	0
↳	`(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))`	underflow	63
↳	`(.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))`	underflow	84
↳	`(.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k))`	underflow	69
↳	`(pow.f64 t #s(literal 3 binary64))`	underflow	72
↳	`(*.f64 l l)`	underflow	72
↳	`(/.f64 k t)`	overflow	26
↳	`(+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))`	overflow	72
↳	`(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64)))`	overflow	72
↳	`(pow.f64 (/.f64 k t) #s(literal 2 binary64))`	overflow	72
`/.f64`	`(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))`	o/o	28	0
↳	`(pow.f64 t #s(literal 3 binary64))`	overflow	87
↳	`(*.f64 l l)`	overflow	63
`/.f64`	`(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))`	u/u	17	0
↳	`(pow.f64 t #s(literal 3 binary64))`	underflow	72
↳	`(*.f64 l l)`	underflow	72
`*.f64`	`(.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k))`	*no**	12	0
`/.f64`	`(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))`	u/n	9	0
↳	`(pow.f64 t #s(literal 3 binary64))`	underflow	72
`*.f64`	`(.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))`	*no**	6	0
`/.f64`	`(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))`	n/u	6	0
↳	`(*.f64 l l)`	underflow	72
`/.f64`	`(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))`	o/n	5	0
↳	`(pow.f64 t #s(literal 3 binary64))`	overflow	87
`/.f64`	`(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))`	n/o	5	0
↳	`(*.f64 l l)`	overflow	63
`*.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)))`	*nu**	5	0
`*.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)))`	*no**	4	0
`/.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/o	3	0
↳	`(.f64 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l)) (sin.f64 k)) (tan.f64 k))`	overflow	73
↳	`(.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k))`	overflow	79
↳	`(+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))`	overflow	72
↳	`(pow.f64 t #s(literal 3 binary64))`	overflow	87
↳	`(.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)))`	overflow	108
↳	`(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64)))`	overflow	72
↳	`(/.f64 k t)`	overflow	26
↳	`(/.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 l l))`	overflow	91
↳	`(*.f64 l l)`	overflow	63
↳	`(pow.f64 (/.f64 k t) #s(literal 2 binary64))`	overflow	72

Confusion

	Predicted +	Predicted -
+	120	2
-	7	127

Precision

0.9448818897637795

Recall

0.9836065573770492

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	120	0	2
-	7	0	127

Precision?

0.9448818897637795

Recall?

0.9836065573770492

Freqs

test

number	freq
0	129
1	119
2	8

Total Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	1	0	0
-	0	0	0

Precision?

1.0

Recall?

1.0

Samples

92.0ms

512×

valid

Compiler

Compiled 265 to 61 computations (77% saved)

Precisions

Click to see histograms. Total time spent on operations: 68.0ms

ival-div: 13.0ms (19.1% of total)

ival-mult: 12.0ms (17.6% of total)

ival-sin: 11.0ms (16.1% of total)

ival-tan: 11.0ms (16.1% of total)

ival-pow: 9.0ms (13.2% of total)

ival-add: 5.0ms (7.3% of total)

ival-pow2: 5.0ms (7.3% of total)

ival-true: 1.0ms (1.5% of total)

exact: 1.0ms (1.5% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

preprocess129.0ms (0.6%)

Memory

20.3MiB live, 159.4MiB allocated; 20ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	86	256
1	296	230
2	1467	230
0	19	25
0	32	25
1	68	23
2	249	23
3	1889	23
0	8567	21

Stop Event

1×	iter limit
1×	node limit
1×	iter limit
1×	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) (-.f64 (pow.f64 (/.f64 k t) #s(literal 2 binary64)) #s(literal -2 binary64))) (*.f64 (tan.f64 k) (*.f64 (*.f64 (sin.f64 k) t) (ratio-of-squares.f64 t l))))

Symmetry

(abs l)

(abs k)

(negabs t)

Compiler

Compiled 25 to 19 computations (24% saved)

eval0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated; 0ms collecting garbage
Compiler: Compiled 0 to 3 computations (-∞% saved)

prune1.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated; 0ms collecting garbage

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	53.9%	(/.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))))

Status

Accuracy

Program

▶

53.9%

(/.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)

series89.0ms (0.4%)

Memory

-19.7MiB live, 130.5MiB allocated; 35ms collecting garbage

Counts

19 → 68

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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#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)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (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)) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 2))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))))) (pow t 3)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (* -1 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos 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 t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (* (pow l 2) (cos k)))))
#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 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (/ (* (pow k 2) (* (pow t 3) (+ 1/3 (/ 1 (pow t 2))))) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))))) (pow l 2)) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))))) (pow l 2)) (/ (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow l 2)))) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow 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) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#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)) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))

Calls

9 calls:

Time	Variable		Point	Expression
25.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))
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)) (* (* (/ (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))
12.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))
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))
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)) (* (* (/ (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))

rewrite168.0ms (0.7%)

Memory

20.0MiB live, 208.3MiB allocated; 18ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	430	3239
0	452	3116
1	2588	2995
0	8107	2694

Stop Event

1×	iter limit
1×	node limit
1×	iter limit

Counts

87 → 231

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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#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)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (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)) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 2))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))))) (pow t 3)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (* -1 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos 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 t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (* (pow l 2) (cos k)))))
#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 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (/ (* (pow k 2) (* (pow t 3) (+ 1/3 (/ 1 (pow t 2))))) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))))) (pow l 2)) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))))) (pow l 2)) (/ (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow l 2)))) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow 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) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#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)) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))
#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)))))
#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 (.f64 (+.f64 (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)))) (.f64 #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 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (tan.f64 k))) (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (tan.f64 k))) #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 (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)) (/.f64 (sin.f64 k) (.f64 l 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))
(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
(pow.f64 (sin.f64 k) #s(literal 1 binary64))
(/.f64 #s(literal 1 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 (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 (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (ratio-of-squares.f64 k t))))
(/.f64 (+.f64 (.f64 #s(literal 2 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 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) (pow.f64 (ratio-of-squares.f64 k t) #s(literal 3 binary64))))) (.f64 #s(literal 2 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 (-.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 (/.f64 (pow.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 2 binary64)) (-.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 (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 (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)) #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 (.f64 t t) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 k k))) (.f64 (.f64 t t) #s(literal 2 binary64)))
(/.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 #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-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))))
(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 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal -1 binary64)))
(/.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 (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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #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 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -8 binary64) (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 t t)) (.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 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 (+.f64 (.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 4 binary64))) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -16 binary64)) (.f64 #s(literal -8 binary64) (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 t t)) (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64))) (.f64 t t)) (.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) t))
#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(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (+.f64 (/.f64 (ratio-of-squares.f64 (.f64 k (sin.f64 k)) l) (cos.f64 k)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t))
#s(approx (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (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)) 1) (/.f64 (+.f64 (.f64 (.f64 t t) #s(literal 2 binary64)) (.f64 k k)) (.f64 t 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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.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 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (+.f64 (.f64 (.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 1/4 binary64)) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (.f64 (.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 3 binary64)) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/8 binary64))) (+.f64 (.f64 (.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 1/4 binary64)) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (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 (ratio-of-squares.f64 (.f64 k (sin.f64 k)) l) (.f64 (.f64 t t) (cos.f64 k))) (*.f64 (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)) #s(literal 2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))
#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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (+.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (neg.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (+.f64 (+.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 3 binary64)) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (neg.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (neg.f64 (.f64 (+.f64 (neg.f64 (/.f64 (ratio-of-squares.f64 (.f64 k (sin.f64 k)) l) (.f64 (.f64 t t) (cos.f64 k)))) (*.f64 #s(literal -2 binary64) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #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 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (cos.f64 k))))
#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 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (+.f64 (.f64 l l) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (.f64 k l) #s(literal 2 binary64)) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))))) (pow.f64 t #s(literal 3 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 (-.f64 (.f64 (.f64 #s(literal -2 binary64) (.f64 k k)) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l))) (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) l) #s(literal 2 binary64)))) (pow.f64 t #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 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 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (+.f64 (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (+.f64 #s(literal 271/2520 binary64) (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 #s(literal -2/15 binary64) (pow.f64 t #s(literal -2 binary64))))) (.f64 l l))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)))) (pow.f64 t #s(literal 3 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l))) (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) l) #s(literal 2 binary64)))) (pow.f64 t #s(literal 3 binary64))))) (.f64 k k)) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l))) (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) l) #s(literal 2 binary64)))) (pow.f64 t #s(literal 3 binary64))))) (.f64 k k)) (.f64 (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) 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 (+.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 t #s(literal 3 binary64))) t) (.f64 k k)) (.f64 #s(literal 2 binary64) (pow.f64 t #s(literal 3 binary64)))) (.f64 l l)) (*.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (+.f64 (.f64 (/.f64 (+.f64 (+.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 t #s(literal 3 binary64))) t) (.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 t #s(literal 3 binary64))) (.f64 k k))) (.f64 l l)) (.f64 k k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (.f64 k k)))
#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 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 t #s(literal 3 binary64))) (.f64 (.f64 (+.f64 (+.f64 #s(literal 271/2520 binary64) (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 #s(literal -2/15 binary64) (pow.f64 t #s(literal -2 binary64))))) (pow.f64 t #s(literal 3 binary64))) (.f64 k k))) (.f64 l l)) (.f64 k k)) (/.f64 (+.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 t #s(literal 3 binary64))) t) (.f64 l l))) (.f64 k k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (.f64 k k)))
#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 #s(literal 1/6 binary64) (.f64 (.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (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 #s(literal 31/360 binary64) (.f64 (.f64 k k) (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)) (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 #s(literal 173/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)) (*.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 (.f64 (.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal 1/120 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)) 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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 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 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (cos.f64 k) (pow.f64 t #s(literal 3 binary64))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 8 binary64)) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 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 (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -16 binary64)) (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (cos.f64 k) (pow.f64 t #s(literal 3 binary64))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 8 binary64)) (.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)))) (*.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (+.f64 (.f64 t (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (sin k) (sin.f64 k))
#s(approx (tan k) (tan.f64 k))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (.f64 (+.f64 (.f64 (pow.f64 k #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 t #s(literal -2 binary64))) (*.f64 k k)))
#s(approx (+ 1 (pow (/ k t) 2)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) (.f64 k k))))

eval786.0ms (3.4%)

Memory

32.1MiB live, 1 064.3MiB allocated; 126ms collecting garbage

Samples

491.0ms	10 471×	0	valid
73.0ms	1 561×	0	invalid

Compiler

Compiled 8 328 to 1 396 computations (83.2% saved)

Precisions

Click to see histograms. Total time spent on operations: 297.0ms

ival-mult: 215.0ms (72.5% of total)

ival-div: 68.0ms (22.9% of total)

ival-true: 7.0ms (2.4% of total)

ival-assert: 5.0ms (1.7% of total)

adjust: 3.0ms (1% of total)

prune693.0ms (3%)

Memory

-62.6MiB live, 922.8MiB allocated; 183ms collecting garbage

Pruning

18 alts after pruning (18 fresh and 0 done)

	Pruned	Kept	Total
New	222	18	240
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	223	18	241

Accuracy

97.7%

Counts

241 → 18

Alt Table

Click to see full alt table

Status	Accuracy	Program
	53.3%	(/.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)))
▶	53.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) (*.f64 (sin.f64 k) (tan.f64 k)))))
	59.0%	(/.f64 #s(literal 2 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)))))
	55.3%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 (.f64 (sin.f64 k) (pow.f64 t #s(literal 3 binary64))) (.f64 l l)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 k t) #s(literal 2 binary64))) #s(literal 1 binary64))))
	44.5%	(/.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) (/.f64 (.f64 k k) (.f64 t t))) #s(literal 1 binary64))))
	52.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)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
	73.3%	(/.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))))
	45.3%	(/.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 (ratio-of-squares.f64 k l) (/.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k)))))
	55.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 (+.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 t #s(literal 3 binary64))) t) (.f64 k k)) (.f64 #s(literal 2 binary64) (pow.f64 t #s(literal 3 binary64)))) (.f64 l l)) (*.f64 k k))))
▶	94.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 (ratio-of-squares.f64 (.f64 k (sin.f64 k)) l) (cos.f64 k)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t)))
	48.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 t (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64))) (*.f64 k k))))
	56.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 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64))))
	45.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 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal 2 binary64))))
▶	60.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
	20.5%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) t))
▶	35.5%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))
▶	67.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.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)))

Samples

398.0ms	8 776×	0	valid
41.0ms	952×	0	invalid

Compiler

Compiled 1 298 to 924 computations (28.8% saved)

Precisions

Click to see histograms. Total time spent on operations: 247.0ms

ival-mult: 164.0ms (66.4% of total)

ival-div: 71.0ms (28.8% of total)

ival-true: 6.0ms (2.4% of total)

ival-assert: 4.0ms (1.6% of total)

adjust: 2.0ms (0.8% of total)

series148.0ms (0.6%)

Memory

-3.0MiB live, 242.9MiB allocated; 31ms collecting garbage

Counts

44 → 203

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 (ratio-of-squares.f64 (.f64 k (sin.f64 k)) l) (cos.f64 k)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t)))
#s(literal 2 binary64)
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (+.f64 (/.f64 (ratio-of-squares.f64 (.f64 k (sin.f64 k)) l) (cos.f64 k)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t))
(.f64 (+.f64 (/.f64 (ratio-of-squares.f64 (.f64 k (sin.f64 k)) l) (cos.f64 k)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t)
(+.f64 (/.f64 (ratio-of-squares.f64 (.f64 k (sin.f64 k)) l) (cos.f64 k)) (.f64 (/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64)))
(/.f64 (ratio-of-squares.f64 (*.f64 k (sin.f64 k)) l) (cos.f64 k))
(ratio-of-squares.f64 (*.f64 k (sin.f64 k)) l)
(*.f64 k (sin.f64 k))
k
(sin.f64 k)
l
(cos.f64 k)
(.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))
(/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k))
(ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l)
(*.f64 t (sin.f64 k))
t
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
(/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64)))
(ratio-of-squares.f64 l k)
(pow.f64 t #s(literal 3 binary64))
#s(literal 3 binary64)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.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 (.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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)))
(/.f64 (cos.f64 k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)
(pow.f64 (sin.f64 k) #s(literal 2 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 (+.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))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))
(*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))
(ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))
(/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#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)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (/ (* (pow t 2) (pow (sin k) 2)) (pow l 2))))
#s(approx (* t (sin k)) #s(hole binary64 (* t (sin k))))
#s(approx t #s(hole binary64 t))
#s(approx (/ (/ (* l l) (* k k)) (pow t 3)) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (pow t 3) #s(hole binary64 (pow t 3)))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2))))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (cos k) (* t (pow (sin k) 2)))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* t (pow (sin k) 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) (cos k)) (* (pow k 2) (* t (pow (sin k) 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 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#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) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (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) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (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 (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) #s(hole binary64 (/ (pow l 2) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#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 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 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 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#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/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#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/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#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 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#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 t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (+ (+ (/ (* k k) (* t t)) 1) 1) #s(hole binary64 2))
#s(approx (+ (+ (/ (* k k) (* t t)) 1) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))))) (pow t 3)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (* -1 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (* -1 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))))
#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 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (pow (sqrt -1) 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 (* -1 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2)))) (pow t 3)))))
#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 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (pow t 3)))))
#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 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2)))))) (pow t 3)))))
#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 (* -2 (/ (* (pow t 3) (* (pow (sin k) 2) (pow (sqrt -1) 2))) (* (pow l 2) (cos k))))))
#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 t 3) (+ (* 2 (/ (* (pow (sin k) 2) (pow (sqrt -1) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))) (* (pow l 2) (* (pow t 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 (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (* -1 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (pow (sqrt -1) 2)))))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) #s(hole binary64 (* -1 (/ (pow l 2) (* (pow t 3) (pow (sqrt -1) 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) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (* (pow l 2) (cos k)))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (/ (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (pow (sin k) 2)) (cos k)))) (pow l 2))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (pow (sin k) 2)) (cos k))) (pow l 2))))
#s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) #s(hole binary64 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (/ (* (* k (sin k)) (* k (sin k))) (* l l)) #s(hole binary64 (/ (* (pow k 2) (pow (sin k) 2)) (pow l 2))))
#s(approx l #s(hole binary64 l))
#s(approx (/ (* l l) (* k k)) #s(hole binary64 (/ (pow l 2) (pow k 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) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 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 t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (* (pow l 2) (cos k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (/ (* (pow k 2) (* (pow t 3) (+ 1/3 (/ 1 (pow t 2))))) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))))) (pow l 2)) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))))) (pow l 2)) (/ (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow l 2)))) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (pow l 2)))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (* t (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ 1 (pow l 2)))))))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* t (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ 1 (pow l 2)))) (* (pow k 2) (* t (+ (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (* 1/6 (/ 1 (pow l 2))))))))))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* t (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ 1 (pow l 2)))) (* (pow k 2) (+ (* t (+ (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (* 1/6 (/ 1 (pow l 2))))) (* (pow k 2) (* t (+ (* 2 (- (* -1/315 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (+ (* -1/720 (/ (pow t 2) (pow l 2))) (* 1/24 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))))))) (* 31/360 (/ 1 (pow l 2))))))))))))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 2)) (pow l 2)))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ 1 (pow l 2))))))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (+ (* (pow k 2) (+ (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (* 1/6 (/ 1 (pow l 2))))) (/ 1 (pow l 2)))))))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (+ (* (pow k 2) (+ (* 1/6 (/ 1 (pow l 2))) (+ (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (* (pow k 2) (+ (* 2 (- (* -1/315 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (+ (* -1/720 (/ (pow t 2) (pow l 2))) (* 1/24 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))))))) (* 31/360 (/ 1 (pow l 2)))))))) (/ 1 (pow l 2)))))))))
#s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) #s(hole binary64 (/ (pow k 4) (pow l 2))))
#s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 4) (+ (* 1/6 (/ (pow k 2) (pow l 2))) (/ 1 (pow l 2))))))
#s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 31/360 (/ (pow k 2) (pow l 2))) (* 1/6 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* (pow k 2) (+ (* 173/5040 (/ (pow k 2) (pow l 2))) (* 31/360 (/ 1 (pow l 2))))) (* 1/6 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (/ (* (* k (sin k)) (* k (sin k))) (* l l)) #s(hole binary64 (/ (pow k 4) (pow l 2))))
#s(approx (/ (* (* k (sin k)) (* k (sin k))) (* l l)) #s(hole binary64 (* (pow k 4) (+ (* -1/3 (/ (pow k 2) (pow l 2))) (/ 1 (pow l 2))))))
#s(approx (/ (* (* k (sin k)) (* k (sin k))) (* l l)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* 2/45 (/ (pow k 2) (pow l 2))) (* 1/3 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (/ (* (* k (sin k)) (* k (sin k))) (* l l)) #s(hole binary64 (* (pow k 4) (+ (* (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 (* k (sin k)) #s(hole binary64 (pow k 2)))
#s(approx (* k (sin k)) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/6 (pow k 2))))))
#s(approx (* k (sin k)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (* k (sin k)) #s(hole binary64 (* (pow k 2) (+ 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 (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 (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 2)) (pow l 2)))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2)))))) (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2))))))) (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/315 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (+ (* -1/720 (/ (pow t 2) (pow l 2))) (* 1/24 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2)))))))))) (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (/ (* (pow k 2) (pow t 2)) (pow l 2))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (+ (* -1/3 (/ (pow t 2) (pow l 2))) (* (pow k 2) (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2))))))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (+ (* -1/3 (/ (pow t 2) (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ (pow t 2) (pow l 2))) (* (pow k 2) (- (* -1/315 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (+ (* -1/720 (/ (pow t 2) (pow l 2))) (* 1/24 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2))))))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (/ (* (pow k 2) (pow t 2)) (pow l 2))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (/ (* (pow k 2) (pow t 2)) (pow l 2))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* -1/3 (/ (pow t 2) (pow l 2))) (* 2/45 (/ (* (pow k 2) (pow t 2)) (pow l 2))))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* -1/3 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* -1/315 (/ (* (pow k 2) (pow t 2)) (pow l 2))) (* 2/45 (/ (pow t 2) (pow l 2))))))) (/ (pow t 2) (pow l 2))))))
#s(approx (* t (sin k)) #s(hole binary64 (* k t)))
#s(approx (* t (sin k)) #s(hole binary64 (* k (+ t (* -1/6 (* (pow k 2) t))))))
#s(approx (* t (sin k)) #s(hole binary64 (* k (+ t (* (pow k 2) (+ (* -1/6 t) (* 1/120 (* (pow k 2) t))))))))
#s(approx (* t (sin k)) #s(hole binary64 (* k (+ t (* (pow k 2) (+ (* -1/6 t) (* (pow k 2) (+ (* -1/5040 (* (pow k 2) t)) (* 1/120 t)))))))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))) (pow k 4))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (* 2 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))))))) (pow k 4))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (pow l 2) (* (pow k 4) t))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) t)) (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) t)) (* (pow k 2) (- (+ (* 1/24 (/ (pow l 2) t)) (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ 1 (* (pow k 2) t))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t)) (pow k 2))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -7/120 (/ (pow k 2) t)) (* 1/6 (/ 1 t)))) (/ 1 t)) (pow k 2))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* (pow k 2) (- (* (pow k 2) (- (* -31/3024 (/ (pow k 2) t)) (* 7/120 (/ 1 t)))) (* 1/6 (/ 1 t)))) (/ 1 t)) (pow k 2))))
#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 (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#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/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 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 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 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 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow 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 (* 2 (/ (* (pow k 2) (pow t 3)) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (/ (* (pow k 2) (* (pow t 3) (+ 1/3 (/ 1 (pow t 2))))) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))))) (pow l 2)) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))))) (pow l 2)) (/ (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow l 2)))) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (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 (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* 1/24 (/ (pow l 2) (pow t 3))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3))))) (* 2/45 (/ (pow l 2) (pow t 3))))))) (* -1/3 (/ (pow l 2) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* 1/24 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1/720 (/ (pow l 2) (pow t 3))) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) (pow t 3))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3))))) (* 2/45 (/ (pow l 2) (pow t 3)))))) (+ (* -1/315 (/ (pow l 2) (pow t 3))) (* 2/45 (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3)))))))))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3))))) (* 2/45 (/ (pow l 2) (pow t 3))))))) (* -1/3 (/ (pow l 2) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ 1 (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ (+ 1 (* -1/6 (pow k 2))) (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ (+ 1 (* (pow k 2) (- (* -7/120 (pow k 2)) 1/6))) (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ (+ 1 (* (pow k 2) (- (* (pow k 2) (- (* -31/3024 (pow k 2)) 7/120)) 1/6))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow 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) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (pow (sin k) 2) (* (pow l 2) (cos k)))))))
#s(approx (* k (sin k)) #s(hole binary64 (* k (sin k))))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (pow (sin k) 2) #s(hole binary64 (pow (sin k) 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 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 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 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 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 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow 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) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (+ (+ (/ (* k k) (* t t)) 1) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 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))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ (cos k) (pow (sin k) 2))))

Calls

9 calls:

Time	Variable		Point	Expression
30.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (* k (sin k)) k (sin k) l (cos k) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (* t (sin k)) t (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (* l l) (* k k)) (pow t 3)) (/ (* l l) (* k k)) (pow t 3) 3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (cos k) (* (pow (sin k) 2) t)) (* (pow (sin k) 2) t) (pow (sin k) 2) (/ 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) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2)))
18.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (* k (sin k)) k (sin k) l (cos k) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (* t (sin k)) t (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (* l l) (* k k)) (pow t 3)) (/ (* l l) (* k k)) (pow t 3) 3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (cos k) (* (pow (sin k) 2) t)) (* (pow (sin k) 2) t) (pow (sin k) 2) (/ 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) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2)))
17.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (* k (sin k)) k (sin k) l (cos k) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (* t (sin k)) t (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (* l l) (* k k)) (pow t 3)) (/ (* l l) (* k k)) (pow t 3) 3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (cos k) (* (pow (sin k) 2) t)) (* (pow (sin k) 2) t) (pow (sin k) 2) (/ 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) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2)))
15.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (* k (sin k)) k (sin k) l (cos k) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (* t (sin k)) t (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (* l l) (* k k)) (pow t 3)) (/ (* l l) (* k k)) (pow t 3) 3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (cos k) (* (pow (sin k) 2) t)) (* (pow (sin k) 2) t) (pow (sin k) 2) (/ 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) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2)))
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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (* k (sin k)) k (sin k) l (cos k) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (* t (sin k)) t (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (* l l) (* k k)) (pow t 3)) (/ (* l l) (* k k)) (pow t 3) 3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (cos k) (* (pow (sin k) 2) t)) (* (pow (sin k) 2) t) (pow (sin k) 2) (/ 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) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2)))

rewrite224.0ms (1%)

Memory

34.6MiB live, 273.1MiB allocated; 40ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1019	10593
0	1085	9139
1	6107	9139
0	8409	8617

Stop Event

1×	iter limit
1×	node limit
1×	iter limit

Counts

247 → 483

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 (ratio-of-squares.f64 (.f64 k (sin.f64 k)) l) (cos.f64 k)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t)))
#s(literal 2 binary64)
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (+.f64 (/.f64 (ratio-of-squares.f64 (.f64 k (sin.f64 k)) l) (cos.f64 k)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t))
(.f64 (+.f64 (/.f64 (ratio-of-squares.f64 (.f64 k (sin.f64 k)) l) (cos.f64 k)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t)
(+.f64 (/.f64 (ratio-of-squares.f64 (.f64 k (sin.f64 k)) l) (cos.f64 k)) (.f64 (/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64)))
(/.f64 (ratio-of-squares.f64 (*.f64 k (sin.f64 k)) l) (cos.f64 k))
(ratio-of-squares.f64 (*.f64 k (sin.f64 k)) l)
(*.f64 k (sin.f64 k))
k
(sin.f64 k)
l
(cos.f64 k)
(.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))
(/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k))
(ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l)
(*.f64 t (sin.f64 k))
t
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
(/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64)))
(ratio-of-squares.f64 l k)
(pow.f64 t #s(literal 3 binary64))
#s(literal 3 binary64)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.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 (.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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)))
(/.f64 (cos.f64 k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)
(pow.f64 (sin.f64 k) #s(literal 2 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 (+.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))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))
(*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))
(ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))
(/.f64 (cos.f64 k) (pow.f64 (sin.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(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#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)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (/ (* (pow t 2) (pow (sin k) 2)) (pow l 2))))
#s(approx (* t (sin k)) #s(hole binary64 (* t (sin k))))
#s(approx t #s(hole binary64 t))
#s(approx (/ (/ (* l l) (* k k)) (pow t 3)) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (pow t 3) #s(hole binary64 (pow t 3)))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2))))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (cos k) (* t (pow (sin k) 2)))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* t (pow (sin k) 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) (cos k)) (* (pow k 2) (* t (pow (sin k) 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 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#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) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k)))) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (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) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (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 (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) #s(hole binary64 (/ (pow l 2) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#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 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 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 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#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/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#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/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#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 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#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 t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (+ (+ (/ (* k k) (* t t)) 1) 1) #s(hole binary64 2))
#s(approx (+ (+ (/ (* k k) (* t t)) 1) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))))) (pow t 3)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (* -1 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (* -1 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))))
#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 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (pow (sqrt -1) 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 (* -1 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2)))) (pow t 3)))))
#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 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (pow t 3)))))
#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 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2)))))) (pow t 3)))))
#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 (* -2 (/ (* (pow t 3) (* (pow (sin k) 2) (pow (sqrt -1) 2))) (* (pow l 2) (cos k))))))
#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 t 3) (+ (* 2 (/ (* (pow (sin k) 2) (pow (sqrt -1) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))) (* (pow l 2) (* (pow t 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 (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (* -1 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (pow (sqrt -1) 2)))))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) #s(hole binary64 (* -1 (/ (pow l 2) (* (pow t 3) (pow (sqrt -1) 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) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (* (pow l 2) (cos k)))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (/ (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (pow (sin k) 2)) (cos k)))) (pow l 2))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (pow (sin k) 2)) (cos k))) (pow l 2))))
#s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) #s(hole binary64 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (/ (* (* k (sin k)) (* k (sin k))) (* l l)) #s(hole binary64 (/ (* (pow k 2) (pow (sin k) 2)) (pow l 2))))
#s(approx l #s(hole binary64 l))
#s(approx (/ (* l l) (* k k)) #s(hole binary64 (/ (pow l 2) (pow k 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) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 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 t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (* (pow l 2) (cos k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (/ (* (pow k 2) (* (pow t 3) (+ 1/3 (/ 1 (pow t 2))))) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))))) (pow l 2)) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))))) (pow l 2)) (/ (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow l 2)))) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (pow l 2)))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (* t (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ 1 (pow l 2)))))))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* t (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ 1 (pow l 2)))) (* (pow k 2) (* t (+ (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (* 1/6 (/ 1 (pow l 2))))))))))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* t (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ 1 (pow l 2)))) (* (pow k 2) (+ (* t (+ (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (* 1/6 (/ 1 (pow l 2))))) (* (pow k 2) (* t (+ (* 2 (- (* -1/315 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (+ (* -1/720 (/ (pow t 2) (pow l 2))) (* 1/24 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))))))) (* 31/360 (/ 1 (pow l 2))))))))))))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 2)) (pow l 2)))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ 1 (pow l 2))))))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (+ (* (pow k 2) (+ (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (* 1/6 (/ 1 (pow l 2))))) (/ 1 (pow l 2)))))))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (+ (* (pow k 2) (+ (* 1/6 (/ 1 (pow l 2))) (+ (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (* (pow k 2) (+ (* 2 (- (* -1/315 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (+ (* -1/720 (/ (pow t 2) (pow l 2))) (* 1/24 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))))))) (* 31/360 (/ 1 (pow l 2)))))))) (/ 1 (pow l 2)))))))))
#s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) #s(hole binary64 (/ (pow k 4) (pow l 2))))
#s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 4) (+ (* 1/6 (/ (pow k 2) (pow l 2))) (/ 1 (pow l 2))))))
#s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 31/360 (/ (pow k 2) (pow l 2))) (* 1/6 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* (pow k 2) (+ (* 173/5040 (/ (pow k 2) (pow l 2))) (* 31/360 (/ 1 (pow l 2))))) (* 1/6 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (/ (* (* k (sin k)) (* k (sin k))) (* l l)) #s(hole binary64 (/ (pow k 4) (pow l 2))))
#s(approx (/ (* (* k (sin k)) (* k (sin k))) (* l l)) #s(hole binary64 (* (pow k 4) (+ (* -1/3 (/ (pow k 2) (pow l 2))) (/ 1 (pow l 2))))))
#s(approx (/ (* (* k (sin k)) (* k (sin k))) (* l l)) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (- (* 2/45 (/ (pow k 2) (pow l 2))) (* 1/3 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (/ (* (* k (sin k)) (* k (sin k))) (* l l)) #s(hole binary64 (* (pow k 4) (+ (* (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 (* k (sin k)) #s(hole binary64 (pow k 2)))
#s(approx (* k (sin k)) #s(hole binary64 (* (pow k 2) (+ 1 (* -1/6 (pow k 2))))))
#s(approx (* k (sin k)) #s(hole binary64 (* (pow k 2) (+ 1 (* (pow k 2) (- (* 1/120 (pow k 2)) 1/6))))))
#s(approx (* k (sin k)) #s(hole binary64 (* (pow k 2) (+ 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 (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 (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 2)) (pow l 2)))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2)))))) (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2))))))) (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/315 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (+ (* -1/720 (/ (pow t 2) (pow l 2))) (* 1/24 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2)))))))))) (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (/ (* (pow k 2) (pow t 2)) (pow l 2))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (+ (* -1/3 (/ (pow t 2) (pow l 2))) (* (pow k 2) (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2))))))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (+ (* -1/3 (/ (pow t 2) (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ (pow t 2) (pow l 2))) (* (pow k 2) (- (* -1/315 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (+ (* -1/720 (/ (pow t 2) (pow l 2))) (* 1/24 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2))))))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (/ (* (pow k 2) (pow t 2)) (pow l 2))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (/ (* (pow k 2) (pow t 2)) (pow l 2))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* -1/3 (/ (pow t 2) (pow l 2))) (* 2/45 (/ (* (pow k 2) (pow t 2)) (pow l 2))))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* -1/3 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* -1/315 (/ (* (pow k 2) (pow t 2)) (pow l 2))) (* 2/45 (/ (pow t 2) (pow l 2))))))) (/ (pow t 2) (pow l 2))))))
#s(approx (* t (sin k)) #s(hole binary64 (* k t)))
#s(approx (* t (sin k)) #s(hole binary64 (* k (+ t (* -1/6 (* (pow k 2) t))))))
#s(approx (* t (sin k)) #s(hole binary64 (* k (+ t (* (pow k 2) (+ (* -1/6 t) (* 1/120 (* (pow k 2) t))))))))
#s(approx (* t (sin k)) #s(hole binary64 (* k (+ t (* (pow k 2) (+ (* -1/6 t) (* (pow k 2) (+ (* -1/5040 (* (pow k 2) t)) (* 1/120 t)))))))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))) (pow k 4))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (* 2 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))))))) (pow k 4))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (pow l 2) (* (pow k 4) t))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) t)) (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) t)) (* (pow k 2) (- (+ (* 1/24 (/ (pow l 2) t)) (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ 1 (* (pow k 2) t))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t)) (pow k 2))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -7/120 (/ (pow k 2) t)) (* 1/6 (/ 1 t)))) (/ 1 t)) (pow k 2))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* (pow k 2) (- (* (pow k 2) (- (* -31/3024 (/ (pow k 2) t)) (* 7/120 (/ 1 t)))) (* 1/6 (/ 1 t)))) (/ 1 t)) (pow k 2))))
#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 (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#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/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 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 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 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 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow 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 (* 2 (/ (* (pow k 2) (pow t 3)) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (/ (* (pow k 2) (* (pow t 3) (+ 1/3 (/ 1 (pow t 2))))) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))))) (pow l 2)) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))))) (pow l 2)) (/ (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow l 2)))) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (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 (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* 1/24 (/ (pow l 2) (pow t 3))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3))))) (* 2/45 (/ (pow l 2) (pow t 3))))))) (* -1/3 (/ (pow l 2) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* 1/24 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1/720 (/ (pow l 2) (pow t 3))) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) (pow t 3))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3))))) (* 2/45 (/ (pow l 2) (pow t 3)))))) (+ (* -1/315 (/ (pow l 2) (pow t 3))) (* 2/45 (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3)))))))))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3))))) (* 2/45 (/ (pow l 2) (pow t 3))))))) (* -1/3 (/ (pow l 2) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ 1 (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ (+ 1 (* -1/6 (pow k 2))) (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ (+ 1 (* (pow k 2) (- (* -7/120 (pow k 2)) 1/6))) (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ (+ 1 (* (pow k 2) (- (* (pow k 2) (- (* -31/3024 (pow k 2)) 7/120)) 1/6))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow 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) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (pow (sin k) 2) (* (pow l 2) (cos k)))))))
#s(approx (* k (sin k)) #s(hole binary64 (* k (sin k))))
#s(approx (sin k) #s(hole binary64 (sin k)))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (pow (sin k) 2) #s(hole binary64 (pow (sin k) 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 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 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 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 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 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow 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) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (+ (+ (/ (* k k) (* t t)) 1) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 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))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ (cos k) (pow (sin k) 2))))

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 (+.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))) t))))
(/.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 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))) 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 (+.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))) t))
(.f64 (+.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))) t)
(.f64 t (+.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))))
(+.f64 (.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) t) (.f64 (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k)) t))
(+.f64 (.f64 t (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) (.f64 t (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)))) (-.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))))
(/.f64 (-.f64 (.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)))) (-.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) #s(literal 3 binary64)) (pow.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) (-.f64 (.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))) (-.f64 (.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))))))
(-.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) (.f64 (neg.f64 (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l) (cos.f64 k))) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k)))
(+.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)))
(*.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))
(.f64 (.f64 k k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)))
(/.f64 (neg.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l)) (neg.f64 (cos.f64 k)))
(/.f64 (neg.f64 (pow.f64 (.f64 (sin.f64 k) k) #s(literal 2 binary64))) (neg.f64 (.f64 (cos.f64 k) (*.f64 l l))))
(/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))
(/.f64 (pow.f64 (.f64 (sin.f64 k) k) #s(literal 2 binary64)) (.f64 (cos.f64 k) (*.f64 l l)))
(.f64 (/.f64 (.f64 (sin.f64 k) k) l) (/.f64 (*.f64 (sin.f64 k) k) l))
(.f64 (.f64 (sin.f64 k) k) (/.f64 (.f64 (sin.f64 k) k) (.f64 l l)))
(.f64 (.f64 k k) (ratio-of-squares.f64 (sin.f64 k) l))
(ratio-of-squares.f64 (pow.f64 (*.f64 (sin.f64 k) k) #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 (*.f64 (sin.f64 k) k) #s(literal 1 binary64)) (neg.f64 l))
(ratio-of-squares.f64 (pow.f64 (*.f64 (sin.f64 k) k) #s(literal 1 binary64)) (fabs.f64 l))
(ratio-of-squares.f64 (pow.f64 (*.f64 (sin.f64 k) k) #s(literal 1 binary64)) l)
(ratio-of-squares.f64 (neg.f64 (*.f64 (sin.f64 k) k)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (neg.f64 (*.f64 (sin.f64 k) k)) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 (*.f64 (sin.f64 k) k)) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 (*.f64 (sin.f64 k) k)) l)
(ratio-of-squares.f64 (fabs.f64 (*.f64 (sin.f64 k) k)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (fabs.f64 (*.f64 (sin.f64 k) k)) (neg.f64 l))
(ratio-of-squares.f64 (fabs.f64 (*.f64 (sin.f64 k) k)) (fabs.f64 l))
(ratio-of-squares.f64 (fabs.f64 (*.f64 (sin.f64 k) k)) l)
(ratio-of-squares.f64 (*.f64 (sin.f64 k) k) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (*.f64 (sin.f64 k) k) (neg.f64 l))
(ratio-of-squares.f64 (*.f64 (sin.f64 k) k) (fabs.f64 l))
(ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l)
(/.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 k) k) #s(literal 2 binary64)) l) l)
(/.f64 (neg.f64 (pow.f64 (.f64 (sin.f64 k) k) #s(literal 2 binary64))) (neg.f64 (.f64 l l)))
(/.f64 (pow.f64 (.f64 (sin.f64 k) k) #s(literal 2 binary64)) (.f64 l l))
(*.f64 (sin.f64 k) k)
(*.f64 k (sin.f64 k))
k
(sin.f64 k)
l
(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)))))
(.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) (cos.f64 k)) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) (cos.f64 k)))
(/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))
(/.f64 (.f64 #s(literal 2 binary64) (pow.f64 (.f64 (sin.f64 k) t) #s(literal 2 binary64))) (.f64 (cos.f64 k) (.f64 l l)))
(+.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) (cos.f64 k)))
(*.f64 (ratio-of-squares.f64 t l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))
(.f64 (.f64 t t) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)))
(/.f64 (neg.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l)) (neg.f64 (cos.f64 k)))
(/.f64 (neg.f64 (pow.f64 (.f64 (sin.f64 k) t) #s(literal 2 binary64))) (neg.f64 (.f64 (cos.f64 k) (*.f64 l l))))
(/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l) (cos.f64 k))
(/.f64 (pow.f64 (.f64 (sin.f64 k) t) #s(literal 2 binary64)) (.f64 (cos.f64 k) (*.f64 l l)))
(.f64 (/.f64 (.f64 (sin.f64 k) t) l) (/.f64 (*.f64 (sin.f64 k) t) l))
(.f64 (.f64 (sin.f64 k) t) (/.f64 (.f64 (sin.f64 k) t) (.f64 l l)))
(.f64 (.f64 t t) (ratio-of-squares.f64 (sin.f64 k) l))
(ratio-of-squares.f64 (pow.f64 (*.f64 (sin.f64 k) t) #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 (*.f64 (sin.f64 k) t) #s(literal 1 binary64)) (neg.f64 l))
(ratio-of-squares.f64 (pow.f64 (*.f64 (sin.f64 k) t) #s(literal 1 binary64)) (fabs.f64 l))
(ratio-of-squares.f64 (pow.f64 (*.f64 (sin.f64 k) t) #s(literal 1 binary64)) l)
(ratio-of-squares.f64 (neg.f64 (*.f64 (sin.f64 k) t)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (neg.f64 (*.f64 (sin.f64 k) t)) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 (*.f64 (sin.f64 k) t)) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 (*.f64 (sin.f64 k) t)) l)
(ratio-of-squares.f64 (fabs.f64 (*.f64 (sin.f64 k) t)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (fabs.f64 (*.f64 (sin.f64 k) t)) (neg.f64 l))
(ratio-of-squares.f64 (fabs.f64 (*.f64 (sin.f64 k) t)) (fabs.f64 l))
(ratio-of-squares.f64 (fabs.f64 (*.f64 (sin.f64 k) t)) l)
(ratio-of-squares.f64 (*.f64 (sin.f64 k) t) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (*.f64 (sin.f64 k) t) (neg.f64 l))
(ratio-of-squares.f64 (*.f64 (sin.f64 k) t) (fabs.f64 l))
(ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l)
(/.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 k) t) #s(literal 2 binary64)) l) l)
(/.f64 (neg.f64 (pow.f64 (.f64 (sin.f64 k) t) #s(literal 2 binary64))) (neg.f64 (.f64 l l)))
(/.f64 (pow.f64 (.f64 (sin.f64 k) t) #s(literal 2 binary64)) (.f64 l l))
(*.f64 (sin.f64 k) t)
(*.f64 t (sin.f64 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))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (/.f64 l k) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (/.f64 l k) (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64)))
(/.f64 (neg.f64 (.f64 l l)) (neg.f64 (.f64 (*.f64 k k) (pow.f64 t #s(literal 3 binary64)))))
(/.f64 (neg.f64 (ratio-of-squares.f64 l k)) (neg.f64 (pow.f64 t #s(literal 3 binary64))))
(/.f64 (.f64 l l) (.f64 (*.f64 k k) (pow.f64 t #s(literal 3 binary64))))
(/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64)))
(*.f64 (/.f64 l k) (/.f64 l k))
(.f64 l (/.f64 l (.f64 k k)))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 k #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (fabs.f64 k))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (neg.f64 k))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) k)
(ratio-of-squares.f64 (neg.f64 l) (pow.f64 k #s(literal 1 binary64)))
(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) (pow.f64 k #s(literal 1 binary64)))
(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 (pow.f64 k #s(literal 1 binary64)))
(ratio-of-squares.f64 l (fabs.f64 k))
(ratio-of-squares.f64 l (neg.f64 k))
(ratio-of-squares.f64 l 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))
(*.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 (pow.f64 t #s(literal 3/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 t t) #s(literal 3/2 binary64))
(pow.f64 (pow.f64 t #s(literal 3 binary64)) #s(literal 1 binary64))
(pow.f64 t #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (pow.f64 t #s(literal 3/2 binary64))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 t t)) #s(literal 3/2 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))))
#s(literal 3 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 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (ratio-of-squares.f64 l k)) #s(literal 2 binary64)))
(.f64 (.f64 (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (ratio-of-squares.f64 l k)) #s(literal 2 binary64))
(.f64 (ratio-of-squares.f64 l k) (.f64 (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) #s(literal 2 binary64)))
(.f64 #s(literal 2 binary64) (.f64 (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (ratio-of-squares.f64 l k)))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 k) (.f64 l l))) (.f64 (.f64 (.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))
(+.f64 (.f64 (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (ratio-of-squares.f64 l k)) (.f64 (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (ratio-of-squares.f64 l k)))
(*.f64 (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (ratio-of-squares.f64 l k))
(.f64 (.f64 l l) (/.f64 (cos.f64 k) (.f64 (.f64 (*.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))
(*.f64 (ratio-of-squares.f64 l k) (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))
(/.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 k k)) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))
(/.f64 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))
(/.f64 (neg.f64 (.f64 (cos.f64 k) (.f64 l l))) (neg.f64 (.f64 (.f64 (*.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))
(/.f64 (.f64 (/.f64 (.f64 l l) t) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (*.f64 k k))
(/.f64 (.f64 (cos.f64 k) (.f64 l l)) (.f64 (.f64 (*.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))
(/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))
(/.f64 (neg.f64 (cos.f64 k)) (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)))
(/.f64 (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) t)
(/.f64 (cos.f64 k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)
(*.f64 t (pow.f64 (sin.f64 k) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 1 binary64)) (pow.f64 (sin.f64 k) #s(literal 1 binary64)))
(*.f64 (sin.f64 k) (sin.f64 k))
(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/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))))
(/.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 2 binary64)))
(/.f64 (/.f64 #s(literal 2 binary64) (+.f64 (ratio-of-squares.f64 k t) #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 #s(literal -2 binary64) (neg.f64 (.f64 (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (*.f64 (tan.f64 k) (sin.f64 k)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (*.f64 (tan.f64 k) (sin.f64 k))))
(.f64 (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 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 2 binary64)))
(.f64 (+.f64 (ratio-of-squares.f64 k t) #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 (.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 2 binary64))))
(+.f64 (.f64 (+.f64 (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 (tan.f64 k) (sin.f64 k)))) (.f64 #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 (.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 1 binary64))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (tan.f64 k) (sin.f64 k))) #s(literal 1 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 #s(literal 4 binary64) (*.f64 (ratio-of-squares.f64 k t) (ratio-of-squares.f64 k t))) (-.f64 #s(literal 2 binary64) (ratio-of-squares.f64 k t)))
(/.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 #s(literal 8 binary64) (pow.f64 (ratio-of-squares.f64 k t) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (.f64 (ratio-of-squares.f64 k t) (ratio-of-squares.f64 k t)) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 k t)))))
(+.f64 (ratio-of-squares.f64 k t) #s(literal 2 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 #s(literal 2 binary64) (ratio-of-squares.f64 k t))
(/.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 (ratio-of-squares.f64 k t) #s(literal 1 binary64))
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 k k)) (neg.f64 (.f64 t t)))
(/.f64 (/.f64 (*.f64 k k) t) t)
(/.f64 (.f64 k k) (.f64 t t))
(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))))
#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/2 binary64)) #s(literal 1 binary64))
(pow.f64 (*.f64 t 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 (pow.f64 t #s(literal 3 binary64))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 t) #s(literal 3/2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 t) #s(literal 3/2 binary64))) (sinh.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 (+.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)
#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 (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))
(*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))))
(.f64 (.f64 l l) (/.f64 (cos.f64 k) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (pow.f64 t #s(literal 3 binary64)))))
(/.f64 (/.f64 (.f64 (cos.f64 k) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))
(/.f64 (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))
(/.f64 (neg.f64 (.f64 (cos.f64 k) (.f64 l l))) (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (pow.f64 t #s(literal 3 binary64)))))
(/.f64 (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (pow.f64 t #s(literal 3 binary64)))
(/.f64 (.f64 (cos.f64 k) (.f64 l l)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (pow.f64 t #s(literal 3 binary64))))
(*.f64 (/.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 l (pow.f64 t #s(literal 3/2 binary64))))
(*.f64 l (/.f64 l (pow.f64 t #s(literal 3 binary64))))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 t #s(literal 3/2 binary64)))
(ratio-of-squares.f64 (neg.f64 l) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (neg.f64 l) (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (neg.f64 l) (pow.f64 t #s(literal 3/2 binary64)))
(ratio-of-squares.f64 (fabs.f64 l) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (fabs.f64 l) (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (fabs.f64 l) (pow.f64 t #s(literal 3/2 binary64)))
(ratio-of-squares.f64 l (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 l (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))
(/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/4 binary64))) (pow.f64 t #s(literal 3/2 binary64)))
(/.f64 (neg.f64 (*.f64 l l)) (neg.f64 (pow.f64 t #s(literal 3 binary64))))
(/.f64 (*.f64 l l) (pow.f64 t #s(literal 3 binary64)))
(/.f64 (neg.f64 (cos.f64 k)) (neg.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64))))
(/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #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 (.f64 (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (ratio-of-squares.f64 l k)) #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 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #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 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -8 binary64) (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 t t)) (.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 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 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 4 binary64))) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -16 binary64)) (.f64 #s(literal -8 binary64) (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 t t)) (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64))) (.f64 t t)) (.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) t))
#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 k l) (/.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k))))
#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 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))) t))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (ratio-of-squares.f64 k l) (/.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (+.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))) t))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k)))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (+.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l) (cos.f64 k)))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l))
#s(approx (* t (sin k)) (*.f64 (sin.f64 k) t))
#s(approx t t)
#s(approx (/ (/ (* l l) (* k k)) (pow t 3)) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (pow t 3) (pow.f64 t #s(literal 3 binary64)))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (.f64 (.f64 (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (ratio-of-squares.f64 l k)) #s(literal 2 binary64)))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (*.f64 (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (ratio-of-squares.f64 l k)))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))
#s(approx (* (pow (sin k) 2) t) (*.f64 (pow.f64 (sin.f64 k) #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 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (ratio-of-squares.f64 l k)) #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 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #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 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -8 binary64) (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 t t)) (.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 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 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 4 binary64))) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -16 binary64)) (.f64 #s(literal -8 binary64) (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 t t)) (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64))) (.f64 t t)) (.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) t))
#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 k l) (/.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k))))
#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 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))) t))
#s(approx (+ (+ (/ (* k k) (* t t)) 1) 1) (ratio-of-squares.f64 k t))
#s(approx (+ (+ (/ (* k k) (* t t)) 1) 1) (/.f64 (+.f64 (.f64 (.f64 t t) #s(literal 2 binary64)) (.f64 k k)) (.f64 t 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 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (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 (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/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 (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #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 (+.f64 (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 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 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 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 (ratio-of-squares.f64 (pow.f64 k #s(literal 3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/8 binary64)) (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 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 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (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 (+.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (.f64 (.f64 t t) (cos.f64 k))) (*.f64 (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)) #s(literal 2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64)))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (+.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (.f64 (.f64 t t) (cos.f64 k))) (*.f64 (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)) #s(literal 2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (.f64 (.f64 t t) (cos.f64 k))) (.f64 (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)) #s(literal 2 binary64))) (.f64 t 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 (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #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 (+.f64 (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 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 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 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 (ratio-of-squares.f64 (pow.f64 k #s(literal 3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/8 binary64)) (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 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 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (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 (+.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (.f64 (.f64 t t) (cos.f64 k))) (*.f64 (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)) #s(literal 2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (+ (+ (/ (* k k) (* t t)) 1) 1) #s(literal 2 binary64))
#s(approx (+ (+ (/ (* k k) (* t t)) 1) 1) (+.f64 (ratio-of-squares.f64 k t) #s(literal 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 (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (neg.f64 (/.f64 (-.f64 (neg.f64 (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (neg.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (neg.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 k #s(literal 3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (pow.f64 t #s(literal 3 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 (+.f64 (neg.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (.f64 (.f64 t t) (cos.f64 k)))) (*.f64 #s(literal -2 binary64) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (neg.f64 (.f64 (+.f64 (neg.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (.f64 (.f64 t t) (cos.f64 k)))) (*.f64 #s(literal -2 binary64) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (/ 2 (* (+ (+ (/ (* 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 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 k) #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))))) (neg.f64 (/.f64 (+.f64 (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal 1/4 binary64)) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) (.f64 (.f64 (ratio-of-squares.f64 k t) (*.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 k #s(literal 3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal -1/8 binary64)) (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal 1/4 binary64)) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 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 (pow.f64 t #s(literal 3 binary64)) (*.f64 (ratio-of-squares.f64 (sin.f64 k) l) (/.f64 #s(literal -1 binary64) (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)))) (neg.f64 (.f64 (+.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (.f64 (.f64 t t) (cos.f64 k)))) (.f64 (*.f64 (ratio-of-squares.f64 (sin.f64 k) l) (/.f64 #s(literal -1 binary64) (cos.f64 k))) #s(literal 2 binary64))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))) (neg.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (ratio-of-squares.f64 (sin.f64 k) l) (/.f64 #s(literal -1 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 (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (neg.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (neg.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1 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 (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #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 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (cos.f64 k))))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 t (/.f64 (+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 k) k) #s(literal 2 binary64)) (cos.f64 k)) (.f64 (/.f64 (pow.f64 (.f64 (sin.f64 k) t) #s(literal 2 binary64)) (cos.f64 k)) #s(literal 2 binary64))) (*.f64 l l))))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (.f64 (sin.f64 k) k) #s(literal 2 binary64)) (cos.f64 k)) (.f64 (/.f64 (pow.f64 (.f64 (sin.f64 k) t) #s(literal 2 binary64)) (cos.f64 k)) #s(literal 2 binary64))) (.f64 l l)))
#s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k)))
#s(approx (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l))
#s(approx l l)
#s(approx (/ (* l l) (* k k)) (ratio-of-squares.f64 l 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 (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #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 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (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))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/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 (+.f64 (.f64 (/.f64 (.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.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 (.f64 (-.f64 (.f64 (.f64 #s(literal -2 binary64) (.f64 k k)) (-.f64 (.f64 (ratio-of-squares.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 1 binary64)) (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.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 (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 271/2520 binary64) (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 #s(literal -2/15 binary64) (pow.f64 t #s(literal -2 binary64))))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (-.f64 (.f64 (ratio-of-squares.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 1 binary64)) (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))))) (.f64 k k)) (-.f64 (.f64 (ratio-of-squares.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 1 binary64)) (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))))) (.f64 k k)) (.f64 (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.f64 k k)))
#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 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #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 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 k k)) (.f64 l l)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (*.f64 k k)))
#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 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 t #s(literal 3 binary64))) (.f64 k k)) (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 t #s(literal 3 binary64)))) (.f64 l l)) (.f64 k k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (.f64 k k)))
#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 (.f64 (+.f64 (+.f64 #s(literal 271/2520 binary64) (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 #s(literal -2/15 binary64) (pow.f64 t #s(literal -2 binary64))))) (pow.f64 t #s(literal 3 binary64))) (.f64 k k)) (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 t #s(literal 3 binary64)))) (.f64 l l)) (.f64 k k)) (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 l l))) (.f64 k k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal 2 binary64)))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64)))) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) (-.f64 (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) #s(literal 2 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 l #s(literal -2 binary64))))) (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) t)) (.f64 k k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/315 binary64) (ratio-of-squares.f64 t l)) (+.f64 (-.f64 (.f64 #s(literal -1/720 binary64) (ratio-of-squares.f64 t l)) (.f64 #s(literal -1/24 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)))) (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal -31/360 binary64) (pow.f64 l #s(literal -2 binary64))))) (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) #s(literal 2 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 l #s(literal -2 binary64)))) t)) (.f64 k k)) (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) t)) (.f64 k k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #s(literal 2 binary64)))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) #s(literal 2 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 l #s(literal -2 binary64)))) (.f64 k k))) (pow.f64 l #s(literal -2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (.f64 (+.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) #s(literal 2 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 l #s(literal -2 binary64)))) (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/315 binary64) (ratio-of-squares.f64 t l)) (+.f64 (-.f64 (.f64 #s(literal -1/720 binary64) (ratio-of-squares.f64 t l)) (.f64 #s(literal -1/24 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)))) (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal -31/360 binary64) (pow.f64 l #s(literal -2 binary64)))) (.f64 k k))) (.f64 k k))) (pow.f64 l #s(literal -2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (ratio-of-squares.f64 (*.f64 k k) l))
#s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (.f64 (+.f64 (.f64 (ratio-of-squares.f64 k l) #s(literal 1/6 binary64)) (pow.f64 l #s(literal -2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (ratio-of-squares.f64 k l) #s(literal 31/360 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 l #s(literal -2 binary64)))) (*.f64 k k)) (pow.f64 l #s(literal -2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 173/5040 binary64) (ratio-of-squares.f64 k l)) (.f64 #s(literal -31/360 binary64) (pow.f64 l #s(literal -2 binary64)))) (.f64 k k)) (.f64 #s(literal -1/6 binary64) (pow.f64 l #s(literal -2 binary64)))) (.f64 k k)) (pow.f64 l #s(literal -2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (ratio-of-squares.f64 (*.f64 k k) l))
#s(approx (/ (* (* k (sin k)) (* 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))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (ratio-of-squares.f64 k l) #s(literal 2/45 binary64)) (.f64 (pow.f64 l #s(literal -2 binary64)) #s(literal 1/3 binary64))) (*.f64 k k)) (pow.f64 l #s(literal -2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ (* (* k (sin k)) (* 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 (pow.f64 l #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 k k)) (pow.f64 l #s(literal -2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* k (sin k)) (*.f64 k k))
#s(approx (* k (sin k)) (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) #s(literal 1 binary64)) (.f64 k k)))
#s(approx (* k (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)) (.f64 k k)))
#s(approx (* k (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)) (.f64 k k)))
#s(approx 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 (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #s(literal 2 binary64)))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) (.f64 k k)) (ratio-of-squares.f64 t l))) (.f64 k k)))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (.f64 (+.f64 (.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (-.f64 (.f64 #s(literal -1/315 binary64) (ratio-of-squares.f64 t l)) (+.f64 (-.f64 (.f64 #s(literal -1/720 binary64) (ratio-of-squares.f64 t l)) (.f64 #s(literal -1/24 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)))) (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) #s(literal -1/2 binary64)))) (.f64 k k)) (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))))) (.f64 k k)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (.f64 (.f64 k k) (ratio-of-squares.f64 t l)))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) (.f64 k k)) (ratio-of-squares.f64 t l)) (*.f64 k k)))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal -1/3 binary64))) (.f64 (ratio-of-squares.f64 t l) #s(literal -1/2 binary64))) (.f64 k k)) (ratio-of-squares.f64 t l)) (.f64 k k)))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -1/315 binary64) (ratio-of-squares.f64 t l)) (+.f64 (-.f64 (.f64 #s(literal -1/720 binary64) (ratio-of-squares.f64 t l)) (.f64 #s(literal -1/24 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)))) (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) #s(literal -1/2 binary64)))) (.f64 k k)) (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l))) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal -1/3 binary64))) (.f64 (ratio-of-squares.f64 t l) #s(literal -1/2 binary64))) (.f64 k k)) (ratio-of-squares.f64 t l)) (*.f64 k k)))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (.f64 (.f64 k k) (ratio-of-squares.f64 t l)))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) (ratio-of-squares.f64 t l)) #s(literal -1/3 binary64)) (ratio-of-squares.f64 t l)) (*.f64 k k)))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (.f64 (.f64 k k) (ratio-of-squares.f64 t l)))) (.f64 k k)) (ratio-of-squares.f64 t l)) (.f64 k k)))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 k k) (ratio-of-squares.f64 t l)) #s(literal -1/315 binary64)) (.f64 #s(literal -2/45 binary64) (ratio-of-squares.f64 t l))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal -1/3 binary64))) (.f64 k k)) (ratio-of-squares.f64 t l)) (*.f64 k k)))
#s(approx (* t (sin k)) (*.f64 k t))
#s(approx (* t (sin k)) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/6 binary64)) t) k))
#s(approx (* t (sin k)) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) t) (.f64 #s(literal -1/120 binary64) (.f64 (.f64 k k) t))) (*.f64 k k)) t) k))
#s(approx (* t (sin k)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/5040 binary64)) (.f64 #s(literal -1/120 binary64) t)) (.f64 k k)) (.f64 #s(literal -1/6 binary64) t)) (.f64 k k)) t) k))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (.f64 (/.f64 (ratio-of-squares.f64 l (.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (/.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) (.f64 k k)) (/.f64 (.f64 l l) t))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (/.f64 (+.f64 (.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/720 binary64)) (+.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/315 binary64)) (.f64 #s(literal -2/45 binary64) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)))) (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))) #s(literal -1/3 binary64)))) (.f64 k k)) (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))))) (.f64 k k)) (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) (.f64 k k)) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/2 binary64))) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/3 binary64))) (.f64 k k)) (/.f64 (.f64 l l) t)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/720 binary64)) (+.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/315 binary64)) (.f64 #s(literal -2/45 binary64) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)))) (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))) #s(literal -1/3 binary64)))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64))) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/2 binary64))) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/3 binary64))) (.f64 k k)) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (pow.f64 k #s(literal -2 binary64)) t))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (pow.f64 t #s(literal -1 binary64)) (.f64 (/.f64 (.f64 k k) t) #s(literal -1/6 binary64))) (*.f64 k k)))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -7/120 binary64) (/.f64 (.f64 k k) t)) (/.f64 #s(literal 1/6 binary64) t)) (.f64 k k)) (pow.f64 t #s(literal -1 binary64))) (*.f64 k k)))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -31/3024 binary64) (/.f64 (.f64 k k) t)) (/.f64 #s(literal 7/120 binary64) t)) (.f64 k k)) (/.f64 #s(literal 1/6 binary64) t)) (.f64 k k)) (pow.f64 t #s(literal -1 binary64))) (*.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) t) #s(literal -1/3 binary64)) 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 (.f64 k k) t) #s(literal -1/315 binary64)) (.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 #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 #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 (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/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 (+.f64 (.f64 (/.f64 (.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.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 (.f64 (-.f64 (.f64 (.f64 #s(literal -2 binary64) (.f64 k k)) (-.f64 (.f64 (ratio-of-squares.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 1 binary64)) (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.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 (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 271/2520 binary64) (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 #s(literal -2/15 binary64) (pow.f64 t #s(literal -2 binary64))))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (-.f64 (.f64 (ratio-of-squares.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 1 binary64)) (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))))) (.f64 k k)) (-.f64 (.f64 (ratio-of-squares.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 1 binary64)) (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))))) (.f64 k k)) (.f64 (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.f64 k k)))
#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 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #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 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 k k)) (.f64 l l)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (*.f64 k k)))
#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 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 t #s(literal 3 binary64))) (.f64 k k)) (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 t #s(literal 3 binary64)))) (.f64 l l)) (.f64 k k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (.f64 k k)))
#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 (.f64 (+.f64 (+.f64 #s(literal 271/2520 binary64) (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 #s(literal -2/15 binary64) (pow.f64 t #s(literal -2 binary64))))) (pow.f64 t #s(literal 3 binary64))) (.f64 k k)) (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 t #s(literal 3 binary64)))) (.f64 l l)) (.f64 k k)) (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 l l))) (.f64 k k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (.f64 k k)))
#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 #s(literal 1/6 binary64) (.f64 (.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (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 #s(literal 31/360 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)) (.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 #s(literal 173/5040 binary64) (.f64 (.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (.f64 #s(literal -31/360 binary64) (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)) (*.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 #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 (* (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 #s(literal -1/3 binary64) (*.f64 k k))) 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 (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (/.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/6 binary64)) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.f64 k k)))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (/.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))))) (.f64 k k)) (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))))) (.f64 #s(literal -1/3 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (*.f64 k k)))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (/.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -1/720 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (+.f64 (-.f64 (.f64 #s(literal -1/315 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.f64 #s(literal -2/45 binary64) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/6 binary64)))) (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))))) #s(literal -1/3 binary64)))) (.f64 k k)) (.f64 #s(literal 1/24 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))))) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))))) (.f64 k k)) (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))))) (.f64 #s(literal -1/3 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.f64 k k)))
#s(approx (/ (cos k) (pow (sin k) 2)) (pow.f64 k #s(literal -2 binary64)))
#s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -7/120 binary64) (.f64 k k)) #s(literal 1/6 binary64)) (.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -31/3024 binary64) (.f64 k k)) #s(literal 7/120 binary64)) (.f64 k k)) #s(literal 1/6 binary64)) (.f64 k k)) #s(literal 1 binary64)) (*.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 (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 (.f64 l l) t) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (*.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 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (cos.f64 k) (pow.f64 t #s(literal 3 binary64))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 8 binary64)) (.f64 (.f64 (/.f64 (.f64 l l) t) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64))) (*.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 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -16 binary64)) (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (cos.f64 k) (pow.f64 t #s(literal 3 binary64))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 8 binary64)) (.f64 (.f64 (/.f64 (.f64 l l) t) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)))) (.f64 k k)))
#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 t (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (+.f64 (.f64 t (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 t k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.f64 k k)))
#s(approx (* k (sin k)) (*.f64 (sin.f64 k) k))
#s(approx (sin k) (sin.f64 k))
#s(approx (cos k) (cos.f64 k))
#s(approx (pow (sin k) 2) (pow.f64 (sin.f64 k) #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 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 (.f64 l l) t) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (*.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 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (cos.f64 k) (pow.f64 t #s(literal 3 binary64))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 8 binary64)) (.f64 (.f64 (/.f64 (.f64 l l) t) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64))) (*.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 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -16 binary64)) (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (cos.f64 k) (pow.f64 t #s(literal 3 binary64))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 8 binary64)) (.f64 (.f64 (/.f64 (.f64 l l) t) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)))) (.f64 k k)))
#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 t (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (+ (+ (/ (* k k) (* t t)) 1) 1) (.f64 (+.f64 (.f64 (pow.f64 k #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 t #s(literal -2 binary64))) (*.f64 k k)))
#s(approx (+ (/ (* k k) (* t t)) 1) (.f64 (+.f64 (pow.f64 k #s(literal -2 binary64)) (pow.f64 t #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))
#s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))

eval2.2s (9.6%)

Memory

63.1MiB live, 4 076.2MiB allocated; 573ms collecting garbage

Samples

1.3s	30 364×	0	valid
236.0ms	5 732×	0	invalid

Compiler

Compiled 29 636 to 3 153 computations (89.4% saved)

Precisions

Click to see histograms. Total time spent on operations: 843.0ms

ival-mult: 542.0ms (64.3% of total)

ival-div: 258.0ms (30.6% of total)

ival-true: 20.0ms (2.4% of total)

ival-assert: 15.0ms (1.8% of total)

adjust: 9.0ms (1.1% of total)

prune2.2s (9.3%)

Memory

51.4MiB live, 3 760.2MiB allocated; 668ms collecting garbage

Pruning

45 alts after pruning (44 fresh and 1 done)

	Pruned	Kept	Total
New	568	43	611
Fresh	12	1	13
Picked	4	1	5
Done	0	0	0
Total	584	45	629

Accuracy

98.7%

Counts

629 → 45

Alt Table

Click to see full alt table

Status	Accuracy	Program
	53.6%	(/.f64 (/.f64 #s(literal 2 binary64) (+.f64 (ratio-of-squares.f64 k t) #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))))
	53.4%	(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (ratio-of-squares.f64 k t) #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)))))
	45.2%	(/.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) (.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))))))
	45.0%	(/.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)))))
	45.0%	(/.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 (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 k k))) (.f64 k k))))))
	45.2%	(/.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 (+.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))))))
	45.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) #s(approx (* (sin k) (tan 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))))))
	45.3%	(/.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)))))
	63.8%	(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (.f64 (pow.f64 t #s(literal 3/2 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/4 binary64)) l)) (.f64 (sin.f64 k) (tan.f64 k)))))
	44.8%	(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (+.f64 (/.f64 (.f64 k 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)))))
▶	59.0%	(/.f64 #s(literal 2 binary64) (.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 2 binary64)))))
	73.3%	(/.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))))
	44.7%	(/.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)))))
	43.8%	(/.f64 #s(literal 2 binary64) (.f64 #s(approx (+ (+ (/ ( k k) (* t t)) 1) 1) #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)))))
	48.1%	(/.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 t (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64))) (*.f64 k k))))
	16.9%	(/.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 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))) (-.f64 (.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)))))) t)))
▶	94.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 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t)))
	53.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 #s(approx (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (ratio-of-squares.f64 (.f64 k k) l)) (.f64 (/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t)))
	68.5%	(/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))) t)))
	69.9%	(/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) t)))
	62.2%	(/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k))) t)))
	61.5%	(/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #s(literal 2 binary64))) t)))
	47.0%	#s(approx (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
	20.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 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) t))
	60.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 (pow.f64 t #s(literal 3/2 binary64)) #s(literal 2 binary64))))
	60.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 (*.f64 t t) #s(literal 3/2 binary64))))
✓	60.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
	60.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
	60.3%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))))
	40.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (pow.f64 k #s(literal -2 binary64)))))
	23.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -7/120 binary64) (.f64 k k)) #s(literal 1/6 binary64)) (.f64 k k)) #s(literal 1 binary64)) (.f64 k k)))))
	25.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) #s(literal 1 binary64)) (.f64 k k)))))
	55.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/4 binary64))) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))
	67.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
	67.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) t)) #s(literal 2 binary64)))
	64.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t))) #s(literal 2 binary64)))
	57.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) t))) #s(literal 2 binary64)))
▶	52.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
▶	54.5%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
	54.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (pow.f64 k #s(literal -2 binary64)) t))) #s(literal 2 binary64)))
	31.5%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (pow.f64 t #s(literal -1 binary64)) (.f64 (/.f64 (.f64 k k) t) #s(literal -1/6 binary64))) (*.f64 k k)))) #s(literal 2 binary64)))
	67.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (.f64 (/.f64 l k) (/.f64 l k)) (/.f64 (cos.f64 k) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
	57.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (.f64 l l) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 2 binary64)))
▶	24.3%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)) #s(literal 2 binary64)))
	20.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) (.f64 k k)) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64)))) #s(literal 2 binary64)))

Samples

1.3s	26 474×	0	valid
162.0ms	2 454×	0	invalid

Compiler

Compiled 4 085 to 2 604 computations (36.3% saved)

Precisions

Click to see histograms. Total time spent on operations: 701.0ms

ival-mult: 471.0ms (67.2% of total)

ival-div: 194.0ms (27.7% of total)

ival-true: 17.0ms (2.4% of total)

ival-assert: 12.0ms (1.7% of total)

adjust: 7.0ms (1% of total)

series144.0ms (0.6%)

Memory

-90.5MiB live, 247.3MiB allocated; 84ms collecting garbage

Counts

52 → 200

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 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t)))
#s(literal 2 binary64)
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (+.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t))
(.f64 (+.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t)
(+.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64)))
(*.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))
(ratio-of-squares.f64 k l)
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)
(.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))
(/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k))
(ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l)
(*.f64 t (sin.f64 k))
t
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)) #s(literal 2 binary64)))
(.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)) #s(literal 2 binary64))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t))
(/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)
(ratio-of-squares.f64 l (*.f64 k k))
(*.f64 k k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
(.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64))
(.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx ( (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k)))))
(ratio-of-squares.f64 l k)
(/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))
#s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k)))
(.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))
(+.f64 (.f64 (.f64 (*.f64 k k) t) #s(literal -1/3 binary64)) t)
(.f64 (.f64 (*.f64 k k) t) #s(literal -1/3 binary64))
(.f64 (.f64 k 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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
(.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64))
(.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)))
(/.f64 #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)
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)
(/.f64 #s(literal 2 binary64) (.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 2 binary64)))))
(.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 2 binary64))))
(*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.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 (tan.f64 k) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))
(tan.f64 k)
(+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64))
(ratio-of-squares.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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#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)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #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) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (/ (* (pow t 2) (pow (sin k) 2)) (pow l 2))))
#s(approx (* t (sin k)) #s(hole binary64 (* t (sin k))))
#s(approx t #s(hole binary64 t))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2))))))
#s(approx (/ (/ (* l l) (* (* k k) (* k k))) t) #s(hole binary64 (/ (pow l 2) (* (pow k 4) t))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (cos k) (* t (pow (sin k) 2)))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* t (pow (sin k) 2))))
#s(approx (* (+ (* (* (* k k) t) -1/3) t) (* k k)) #s(hole binary64 (* (pow k 2) (* t (+ 1 (* -1/3 (pow k 2)))))))
#s(approx (+ (* (* (* k k) t) -1/3) t) #s(hole binary64 (* t (+ 1 (* -1/3 (pow k 2))))))
#s(approx (* (* (* k k) t) -1/3) #s(hole binary64 (* -1/3 (* (pow k 2) t))))
#s(approx (* (* k k) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) t)))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) t)))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) #s(hole binary64 (/ (* (pow t 3) (sin k)) (pow l 2))))
#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 (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (/ (* (pow k 2) (sin k)) (* (pow t 2) (cos k)))))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (sin k)) (cos k))) (/ (* (pow k 2) (sin k)) (cos k))) (pow t 2))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (/ (* k k) (* t t)) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (* 2 (/ (sin k) (cos k)))))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (+ (* 2 (/ (sin k) (cos k))) (/ (* (pow k 2) (sin k)) (* (pow t 2) (cos k))))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 2))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))))) (pow t 3)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (* -1 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (* -1 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))))
#s(approx (* (+ (* (* (* k k) t) -1/3) t) (* k k)) #s(hole binary64 (* -1 (* (pow k 2) (* t (- (* 1/3 (pow k 2)) 1))))))
#s(approx (+ (* (* (* k k) t) -1/3) t) #s(hole binary64 (* -1 (* t (- (* 1/3 (pow k 2)) 1)))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (* -1 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (pow (sqrt -1) 2)))))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2)))) (pow t 3)))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2)))))) (pow t 3)))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* -2 (/ (* (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)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* 2 (/ (* (pow (sin k) 2) (pow (sqrt -1) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))) (* (pow l 2) (* (pow t 2) (cos k)))))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) #s(hole binary64 (* -1 (/ (* (pow t 3) (* (sin k) (pow (sqrt -1) 2))) (pow l 2)))))
#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 (/ 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 t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (* (pow l 2) (cos k)))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (/ (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (pow (sin k) 2)) (cos k)))) (pow l 2))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (pow (sin k) 2)) (cos k))) (pow l 2))))
#s(approx (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (/ (* k k) (* l l)) #s(hole binary64 (/ (pow 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 (/ (* l l) (* k k)) #s(hole binary64 (/ (pow l 2) (pow k 2))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (/ (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (* (pow l 2) (cos k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (/ (* (pow k 2) (* (pow t 3) (+ 1/3 (/ 1 (pow t 2))))) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))))) (pow l 2)) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))))) (pow l 2)) (/ (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow l 2)))) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (pow l 2)))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (* t (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ 1 (pow l 2)))))))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* t (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ 1 (pow l 2)))) (* (pow k 2) (* t (+ (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (* 1/6 (/ 1 (pow l 2))))))))))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* t (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ 1 (pow l 2)))) (* (pow k 2) (+ (* t (+ (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (* 1/6 (/ 1 (pow l 2))))) (* (pow k 2) (* t (+ (* 2 (- (* -1/315 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (+ (* -1/720 (/ (pow t 2) (pow l 2))) (* 1/24 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))))))) (* 31/360 (/ 1 (pow l 2))))))))))))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 2)) (pow l 2)))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ 1 (pow l 2))))))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (+ (* (pow k 2) (+ (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (* 1/6 (/ 1 (pow l 2))))) (/ 1 (pow l 2)))))))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (+ (* (pow k 2) (+ (* 1/6 (/ 1 (pow l 2))) (+ (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (* (pow k 2) (+ (* 2 (- (* -1/315 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (+ (* -1/720 (/ (pow t 2) (pow l 2))) (* 1/24 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))))))) (* 31/360 (/ 1 (pow l 2)))))))) (/ 1 (pow l 2)))))))))
#s(approx (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (/ (pow k 4) (pow l 2))))
#s(approx (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* 1/6 (/ (pow k 2) (pow l 2))) (/ 1 (pow l 2))))))
#s(approx (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 31/360 (/ (pow k 2) (pow l 2))) (* 1/6 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* (pow k 2) (+ (* 173/5040 (/ (pow k 2) (pow l 2))) (* 31/360 (/ 1 (pow l 2))))) (* 1/6 (/ 1 (pow l 2))))) (/ 1 (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 (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 2)) (pow l 2)))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2)))))) (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2))))))) (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/315 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (+ (* -1/720 (/ (pow t 2) (pow l 2))) (* 1/24 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2)))))))))) (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (/ (* (pow k 2) (pow t 2)) (pow l 2))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (+ (* -1/3 (/ (pow t 2) (pow l 2))) (* (pow k 2) (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2))))))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (+ (* -1/3 (/ (pow t 2) (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ (pow t 2) (pow l 2))) (* (pow k 2) (- (* -1/315 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (+ (* -1/720 (/ (pow t 2) (pow l 2))) (* 1/24 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2))))))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (/ (* (pow k 2) (pow t 2)) (pow l 2))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (/ (* (pow k 2) (pow t 2)) (pow l 2))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* -1/3 (/ (pow t 2) (pow l 2))) (* 2/45 (/ (* (pow k 2) (pow t 2)) (pow l 2))))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* -1/3 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* -1/315 (/ (* (pow k 2) (pow t 2)) (pow l 2))) (* 2/45 (/ (pow t 2) (pow l 2))))))) (/ (pow t 2) (pow l 2))))))
#s(approx (* t (sin k)) #s(hole binary64 (* k t)))
#s(approx (* t (sin k)) #s(hole binary64 (* k (+ t (* -1/6 (* (pow k 2) t))))))
#s(approx (* t (sin k)) #s(hole binary64 (* k (+ t (* (pow k 2) (+ (* -1/6 t) (* 1/120 (* (pow k 2) t))))))))
#s(approx (* t (sin k)) #s(hole binary64 (* k (+ t (* (pow k 2) (+ (* -1/6 t) (* (pow k 2) (+ (* -1/5040 (* (pow k 2) t)) (* 1/120 t)))))))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))) (pow k 4))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (* 2 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))))))) (pow k 4))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (pow l 2) (* (pow k 4) t))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) t)) (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) t)) (* (pow k 2) (- (+ (* 1/24 (/ (pow l 2) t)) (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (* k k) #s(hole binary64 (pow k 2)))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ 1 (* (pow k 2) t))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t)) (pow k 2))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -7/120 (/ (pow k 2) t)) (* 1/6 (/ 1 t)))) (/ 1 t)) (pow k 2))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* (pow k 2) (- (* (pow k 2) (- (* -31/3024 (/ (pow k 2) t)) (* 7/120 (/ 1 t)))) (* 1/6 (/ 1 t)))) (/ 1 t)) (pow k 2))))
#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 (* (+ (* (* (* k k) t) -1/3) t) (* k k)) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (+ (* (* (* k k) t) -1/3) t) (* k k)) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (+ (* (* (* k k) t) -1/3) t) #s(hole binary64 t))
#s(approx (+ (* (* (* k k) t) -1/3) t) #s(hole binary64 (+ t (* -1/3 (* (pow k 2) t)))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* 2 (/ (* (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) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (/ (* (pow k 2) (* (pow t 3) (+ 1/3 (/ 1 (pow t 2))))) (pow l 2))))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))))) (pow l 2)) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))))) (pow l 2)) (/ (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow l 2)))) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) #s(hole binary64 (/ (* k (pow t 3)) (pow l 2))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* 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/2) (pow t 3/2)) (* 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/2) (pow t 3/2)) (* 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 (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (* 2 k)))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (* k (+ 2 (* (pow k 2) (+ 2/3 (/ 1 (pow t 2))))))))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (* k (+ 2 (* (pow k 2) (+ 2/3 (+ (* (pow k 2) (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (/ 1 (pow t 2)))))))))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (* k (+ 2 (* (pow k 2) (+ 2/3 (+ (* (pow k 2) (+ 4/15 (+ (* 1/3 (/ 1 (pow t 2))) (* (pow k 2) (+ 34/315 (* 2/15 (/ 1 (pow t 2)))))))) (/ 1 (pow t 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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow 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) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (pow (sin k) 2) (* (pow l 2) (cos k)))))))
#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 (* (+ (* (* (* k k) t) -1/3) t) (* k k)) #s(hole binary64 (* -1/3 (* (pow k 4) t))))
#s(approx (* (+ (* (* (* k k) t) -1/3) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ (* -1/3 t) (/ t (pow k 2))))))
#s(approx (+ (* (* (* k k) t) -1/3) t) #s(hole binary64 (* -1/3 (* (pow k 2) t))))
#s(approx (+ (* (* (* k k) t) -1/3) t) #s(hole binary64 (* (pow k 2) (+ (* -1/3 t) (/ t (pow k 2))))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (sin k) (* (pow k 2) (cos k)))) (/ (sin k) (* (pow t 2) (cos k)))))))
#s(approx (tan k) #s(hole binary64 (/ (sin k) (cos k))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))

Calls

9 calls:

Time	Variable		Point	Expression
48.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) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (/ (* k k) (* l l)) k l (/ (pow (sin k) 2) (cos k)) (pow (sin k) 2) (sin k) (cos k) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (* t (sin k)) t (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (/ (* l l) (* (* k k) (* k k))) t) (/ (* l l) (* (* k k) (* k k))) (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t)) (* (pow (sin k) 2) t) (* (+ (* (* (* k k) t) -1/3) t) (* k k)) (+ (* (* (* k k) t) -1/3) t) (* (* (* k k) t) -1/3) (* (* k k) t) -1/3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (cos k) (* (pow (sin k) 2) t)) (cos k) 1 (* (pow (sin k) 2) t) (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (pow t 3/2) 3/2 (* (tan k) (+ (/ (* k k) (* t t)) 2)) (tan k) (+ (/ (* k k) (* t t)) 2) (/ (* k k) (* t t)))
12.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) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (/ (* k k) (* l l)) k l (/ (pow (sin k) 2) (cos k)) (pow (sin k) 2) (sin k) (cos k) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (* t (sin k)) t (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (/ (* l l) (* (* k k) (* k k))) t) (/ (* l l) (* (* k k) (* k k))) (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t)) (* (pow (sin k) 2) t) (* (+ (* (* (* k k) t) -1/3) t) (* k k)) (+ (* (* (* k k) t) -1/3) t) (* (* (* k k) t) -1/3) (* (* k k) t) -1/3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (cos k) (* (pow (sin k) 2) t)) (cos k) 1 (* (pow (sin k) 2) t) (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (pow t 3/2) 3/2 (* (tan k) (+ (/ (* k k) (* t t)) 2)) (tan k) (+ (/ (* k k) (* t t)) 2) (/ (* k k) (* t t)))
12.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) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (/ (* k k) (* l l)) k l (/ (pow (sin k) 2) (cos k)) (pow (sin k) 2) (sin k) (cos k) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (* t (sin k)) t (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (/ (* l l) (* (* k k) (* k k))) t) (/ (* l l) (* (* k k) (* k k))) (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t)) (* (pow (sin k) 2) t) (* (+ (* (* (* k k) t) -1/3) t) (* k k)) (+ (* (* (* k k) t) -1/3) t) (* (* (* k k) t) -1/3) (* (* k k) t) -1/3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (cos k) (* (pow (sin k) 2) t)) (cos k) 1 (* (pow (sin k) 2) t) (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (pow t 3/2) 3/2 (* (tan k) (+ (/ (* k k) (* t t)) 2)) (tan k) (+ (/ (* k k) (* t t)) 2) (/ (* k k) (* t t)))
11.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) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (/ (* k k) (* l l)) k l (/ (pow (sin k) 2) (cos k)) (pow (sin k) 2) (sin k) (cos k) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (* t (sin k)) t (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (/ (* l l) (* (* k k) (* k k))) t) (/ (* l l) (* (* k k) (* k k))) (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t)) (* (pow (sin k) 2) t) (* (+ (* (* (* k k) t) -1/3) t) (* k k)) (+ (* (* (* k k) t) -1/3) t) (* (* (* k k) t) -1/3) (* (* k k) t) -1/3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (cos k) (* (pow (sin k) 2) t)) (cos k) 1 (* (pow (sin k) 2) t) (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (pow t 3/2) 3/2 (* (tan k) (+ (/ (* k k) (* t t)) 2)) (tan k) (+ (/ (* k k) (* t t)) 2) (/ (* k k) (* t t)))
10.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) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (/ (* k k) (* l l)) k l (/ (pow (sin k) 2) (cos k)) (pow (sin k) 2) (sin k) (cos k) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (* t (sin k)) t (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (/ (* l l) (* (* k k) (* k k))) t) (/ (* l l) (* (* k k) (* k k))) (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t)) (* (pow (sin k) 2) t) (* (+ (* (* (* k k) t) -1/3) t) (* k k)) (+ (* (* (* k k) t) -1/3) t) (* (* (* k k) t) -1/3) (* (* k k) t) -1/3 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/ (cos k) (* (pow (sin k) 2) t)) (cos k) 1 (* (pow (sin k) 2) t) (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (pow t 3/2) 3/2 (* (tan k) (+ (/ (* k k) (* t t)) 2)) (tan k) (+ (/ (* k k) (* t t)) 2) (/ (* k k) (* t t)))

rewrite216.0ms (0.9%)

Memory

49.9MiB live, 325.3MiB allocated; 32ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1006	10457
0	1074	9245
1	6002	9245
0	8163	8771

Stop Event

1×	iter limit
1×	node limit
1×	iter limit

Counts

252 → 489

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 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t)))
#s(literal 2 binary64)
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (+.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t))
(.f64 (+.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t)
(+.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64)))
(*.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))
(ratio-of-squares.f64 k l)
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)
(.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))
(/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k))
(ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l)
(*.f64 t (sin.f64 k))
t
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)) #s(literal 2 binary64)))
(.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)) #s(literal 2 binary64))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t))
(/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)
(ratio-of-squares.f64 l (*.f64 k k))
(*.f64 k k)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
(.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64))
(.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx ( (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k)))))
(ratio-of-squares.f64 l k)
(/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))
#s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k)))
(.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))
(+.f64 (.f64 (.f64 (*.f64 k k) t) #s(literal -1/3 binary64)) t)
(.f64 (.f64 (*.f64 k k) t) #s(literal -1/3 binary64))
(.f64 (.f64 k 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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
(.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64))
(.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)))
(/.f64 #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)
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)
(/.f64 #s(literal 2 binary64) (.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 2 binary64)))))
(.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 2 binary64))))
(*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.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 (tan.f64 k) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))
(tan.f64 k)
(+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64))
(ratio-of-squares.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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#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)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #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) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (/ (* (pow t 2) (pow (sin k) 2)) (pow l 2))))
#s(approx (* t (sin k)) #s(hole binary64 (* t (sin k))))
#s(approx t #s(hole binary64 t))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2))))))
#s(approx (/ (/ (* l l) (* (* k k) (* k k))) t) #s(hole binary64 (/ (pow l 2) (* (pow k 4) t))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (cos k) (* t (pow (sin k) 2)))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* t (pow (sin k) 2))))
#s(approx (* (+ (* (* (* k k) t) -1/3) t) (* k k)) #s(hole binary64 (* (pow k 2) (* t (+ 1 (* -1/3 (pow k 2)))))))
#s(approx (+ (* (* (* k k) t) -1/3) t) #s(hole binary64 (* t (+ 1 (* -1/3 (pow k 2))))))
#s(approx (* (* (* k k) t) -1/3) #s(hole binary64 (* -1/3 (* (pow k 2) t))))
#s(approx (* (* k k) t) #s(hole binary64 (* (pow k 2) t)))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) t)))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) t)))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) #s(hole binary64 (/ (* (pow t 3) (sin k)) (pow l 2))))
#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 (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (/ (* (pow k 2) (sin k)) (* (pow t 2) (cos k)))))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (sin k)) (cos k))) (/ (* (pow k 2) (sin k)) (cos k))) (pow t 2))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (/ (* k k) (* t t)) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (* 2 (/ (sin k) (cos k)))))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (+ (* 2 (/ (sin k) (cos k))) (/ (* (pow k 2) (sin k)) (* (pow t 2) (cos k))))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 2))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))))) (pow t 3)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (* -1 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* -1 (* (pow t 3) (+ (* -2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (* -1 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))))
#s(approx (* (+ (* (* (* k k) t) -1/3) t) (* k k)) #s(hole binary64 (* -1 (* (pow k 2) (* t (- (* 1/3 (pow k 2)) 1))))))
#s(approx (+ (* (* (* k k) t) -1/3) t) #s(hole binary64 (* -1 (* t (- (* 1/3 (pow k 2)) 1)))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (* -1 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (pow (sqrt -1) 2)))))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2)))) (pow t 3)))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2)))))) (pow t 3)))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* -2 (/ (* (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)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* 2 (/ (* (pow (sin k) 2) (pow (sqrt -1) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))) (* (pow l 2) (* (pow t 2) (cos k)))))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) #s(hole binary64 (* -1 (/ (* (pow t 3) (* (sin k) (pow (sqrt -1) 2))) (pow l 2)))))
#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 (/ 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 t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (* (pow l 2) (cos k)))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (/ (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (pow (sin k) 2)) (cos k)))) (pow l 2))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (pow (sin k) 2)) (cos k))) (pow l 2))))
#s(approx (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))))
#s(approx (/ (* k k) (* l l)) #s(hole binary64 (/ (pow 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 (/ (* l l) (* k k)) #s(hole binary64 (/ (pow l 2) (pow k 2))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (/ (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (* (pow l 2) (cos k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (/ (* (pow k 2) (* (pow t 3) (+ 1/3 (/ 1 (pow t 2))))) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))))) (pow l 2)) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (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 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))))) (pow l 2)) (/ (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow l 2)))) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (pow l 2)))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (* t (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ 1 (pow l 2)))))))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* t (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ 1 (pow l 2)))) (* (pow k 2) (* t (+ (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (* 1/6 (/ 1 (pow l 2))))))))))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* t (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ 1 (pow l 2)))) (* (pow k 2) (+ (* t (+ (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (* 1/6 (/ 1 (pow l 2))))) (* (pow k 2) (* t (+ (* 2 (- (* -1/315 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (+ (* -1/720 (/ (pow t 2) (pow l 2))) (* 1/24 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))))))) (* 31/360 (/ 1 (pow l 2))))))))))))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 2)) (pow l 2)))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ 1 (pow l 2))))))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (+ (* (pow k 2) (+ (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (* 1/6 (/ 1 (pow l 2))))) (/ 1 (pow l 2)))))))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (+ (* (pow k 2) (+ (* 1/6 (/ 1 (pow l 2))) (+ (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (* (pow k 2) (+ (* 2 (- (* -1/315 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (+ (* -1/720 (/ (pow t 2) (pow l 2))) (* 1/24 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))))))) (* 31/360 (/ 1 (pow l 2)))))))) (/ 1 (pow l 2)))))))))
#s(approx (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (/ (pow k 4) (pow l 2))))
#s(approx (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* 1/6 (/ (pow k 2) (pow l 2))) (/ 1 (pow l 2))))))
#s(approx (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* 31/360 (/ (pow k 2) (pow l 2))) (* 1/6 (/ 1 (pow l 2))))) (/ 1 (pow l 2))))))
#s(approx (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) #s(hole binary64 (* (pow k 4) (+ (* (pow k 2) (+ (* (pow k 2) (+ (* 173/5040 (/ (pow k 2) (pow l 2))) (* 31/360 (/ 1 (pow l 2))))) (* 1/6 (/ 1 (pow l 2))))) (/ 1 (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 (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 2)) (pow l 2)))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2)))))) (* 2 (/ (pow t 2) (pow l 2)))))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2))))))) (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2)))))))))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* 2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/315 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (+ (* -1/720 (/ (pow t 2) (pow l 2))) (* 1/24 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2)))))))))) (* 2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2))))))))))))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (/ (* (pow k 2) (pow t 2)) (pow l 2))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (+ (* -1/3 (/ (pow t 2) (pow l 2))) (* (pow k 2) (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2))))))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (- (+ (* -1/3 (/ (pow t 2) (pow l 2))) (* (pow k 2) (- (+ (* 2/45 (/ (pow t 2) (pow l 2))) (* (pow k 2) (- (* -1/315 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* 2/45 (/ (pow t 2) (pow l 2))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2)))))) (+ (* -1/720 (/ (pow t 2) (pow l 2))) (* 1/24 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2)))))))))) (+ (* -1/2 (- (* -1/3 (/ (pow t 2) (pow l 2))) (* -1/2 (/ (pow t 2) (pow l 2))))) (* 1/24 (/ (pow t 2) (pow l 2))))))) (* -1/2 (/ (pow t 2) (pow l 2))))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (/ (* (pow k 2) (pow t 2)) (pow l 2))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* -1/3 (/ (* (pow k 2) (pow t 2)) (pow l 2))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* -1/3 (/ (pow t 2) (pow l 2))) (* 2/45 (/ (* (pow k 2) (pow t 2)) (pow l 2))))) (/ (pow t 2) (pow l 2))))))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) #s(hole binary64 (* (pow k 2) (+ (* (pow k 2) (+ (* -1/3 (/ (pow t 2) (pow l 2))) (* (pow k 2) (+ (* -1/315 (/ (* (pow k 2) (pow t 2)) (pow l 2))) (* 2/45 (/ (pow t 2) (pow l 2))))))) (/ (pow t 2) (pow l 2))))))
#s(approx (* t (sin k)) #s(hole binary64 (* k t)))
#s(approx (* t (sin k)) #s(hole binary64 (* k (+ t (* -1/6 (* (pow k 2) t))))))
#s(approx (* t (sin k)) #s(hole binary64 (* k (+ t (* (pow k 2) (+ (* -1/6 t) (* 1/120 (* (pow k 2) t))))))))
#s(approx (* t (sin k)) #s(hole binary64 (* k (+ t (* (pow k 2) (+ (* -1/6 t) (* (pow k 2) (+ (* -1/5040 (* (pow k 2) t)) (* 1/120 t)))))))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))) (pow k 4))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (* 2 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))))))) (pow k 4))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (pow l 2) (* (pow k 4) t))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) t)) (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) t)) (* (pow k 2) (- (+ (* 1/24 (/ (pow l 2) t)) (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (* k k) #s(hole binary64 (pow k 2)))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ 1 (* (pow k 2) t))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* -1/6 (/ (pow k 2) t)) (/ 1 t)) (pow k 2))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -7/120 (/ (pow k 2) t)) (* 1/6 (/ 1 t)))) (/ 1 t)) (pow k 2))))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* (pow k 2) (- (* (pow k 2) (- (* -31/3024 (/ (pow k 2) t)) (* 7/120 (/ 1 t)))) (* 1/6 (/ 1 t)))) (/ 1 t)) (pow k 2))))
#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 (* (+ (* (* (* k k) t) -1/3) t) (* k k)) #s(hole binary64 (* (pow k 2) t)))
#s(approx (* (+ (* (* (* k k) t) -1/3) t) (* k k)) #s(hole binary64 (* (pow k 2) (+ t (* -1/3 (* (pow k 2) t))))))
#s(approx (+ (* (* (* k k) t) -1/3) t) #s(hole binary64 t))
#s(approx (+ (* (* (* k k) t) -1/3) t) #s(hole binary64 (+ t (* -1/3 (* (pow k 2) t)))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* 2 (/ (* (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) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (/ (* (pow k 2) (* (pow t 3) (+ 1/3 (/ 1 (pow t 2))))) (pow l 2))))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))))) (pow l 2)) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))))) (pow l 2)) (/ (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow l 2)))) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) #s(hole binary64 (/ (* k (pow t 3)) (pow l 2))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* 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/2) (pow t 3/2)) (* 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/2) (pow t 3/2)) (* 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 (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (* 2 k)))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (* k (+ 2 (* (pow k 2) (+ 2/3 (/ 1 (pow t 2))))))))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (* k (+ 2 (* (pow k 2) (+ 2/3 (+ (* (pow k 2) (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (/ 1 (pow t 2)))))))))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (* k (+ 2 (* (pow k 2) (+ 2/3 (+ (* (pow k 2) (+ 4/15 (+ (* 1/3 (/ 1 (pow t 2))) (* (pow k 2) (+ 34/315 (* 2/15 (/ 1 (pow t 2)))))))) (/ 1 (pow t 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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow 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) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (pow (sin k) 2) (* (pow l 2) (cos k)))))))
#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 (* (+ (* (* (* k k) t) -1/3) t) (* k k)) #s(hole binary64 (* -1/3 (* (pow k 4) t))))
#s(approx (* (+ (* (* (* k k) t) -1/3) t) (* k k)) #s(hole binary64 (* (pow k 4) (+ (* -1/3 t) (/ t (pow k 2))))))
#s(approx (+ (* (* (* k k) t) -1/3) t) #s(hole binary64 (* -1/3 (* (pow k 2) t))))
#s(approx (+ (* (* (* k k) t) -1/3) t) #s(hole binary64 (* (pow k 2) (+ (* -1/3 t) (/ t (pow k 2))))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (sin k) (* (pow k 2) (cos k)))) (/ (sin k) (* (pow t 2) (cos k)))))))
#s(approx (tan k) #s(hole binary64 (/ (sin k) (cos k))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 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 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 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 (+.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))) t)))
#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 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))) t))
(.f64 (+.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))) t)
(.f64 t (+.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))))
(+.f64 (.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) t) (.f64 (*.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) t))
(+.f64 (.f64 t (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) (.f64 t (*.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))))
(/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.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)) (cos.f64 k)))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)))) (-.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) (/.f64 (.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.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)) (cos.f64 k))))) (-.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))))
(/.f64 (+.f64 (pow.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (ratio-of-squares.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)) (cos.f64 k)))) (-.f64 (.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) (/.f64 (.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) #s(literal 3 binary64)) (pow.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) (-.f64 (.f64 (.f64 (ratio-of-squares.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)) (cos.f64 k)))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))))))
(-.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (neg.f64 (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l) (cos.f64 k))) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))
(+.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) (/.f64 (.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)))
(*.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))
(*.f64 (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)) (ratio-of-squares.f64 k l))
(.f64 (.f64 k k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)))
(/.f64 (ratio-of-squares.f64 (pow.f64 (*.f64 k (sin.f64 k)) #s(literal 1 binary64)) l) (cos.f64 k))
(/.f64 (*.f64 (ratio-of-squares.f64 k l) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (cos.f64 k))
(/.f64 (neg.f64 (pow.f64 (.f64 k (sin.f64 k)) #s(literal 2 binary64))) (neg.f64 (.f64 (*.f64 l l) (cos.f64 k))))
(/.f64 (/.f64 (pow.f64 (.f64 k (sin.f64 k)) #s(literal 2 binary64)) (cos.f64 k)) (.f64 l l))
(/.f64 (pow.f64 (.f64 k (sin.f64 k)) #s(literal 2 binary64)) (.f64 (*.f64 l l) (cos.f64 k)))
(*.f64 (/.f64 k l) (/.f64 k l))
(.f64 k (/.f64 k (.f64 l l)))
(ratio-of-squares.f64 (pow.f64 k #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 k #s(literal 1 binary64)) (neg.f64 l))
(ratio-of-squares.f64 (pow.f64 k #s(literal 1 binary64)) (fabs.f64 l))
(ratio-of-squares.f64 (pow.f64 k #s(literal 1 binary64)) l)
(ratio-of-squares.f64 (fabs.f64 k) (pow.f64 l #s(literal 1 binary64)))
(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) (pow.f64 l #s(literal 1 binary64)))
(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 (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 k (neg.f64 l))
(ratio-of-squares.f64 k (fabs.f64 l))
(ratio-of-squares.f64 k 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))
k
l
(/.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 (pow.f64 (sin.f64 k) #s(literal 1 binary64)) (pow.f64 (sin.f64 k) #s(literal 1 binary64)))
(*.f64 (sin.f64 k) (sin.f64 k))
(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 #s(literal 2 binary64)))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.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))))
(sin.f64 k)
(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)))))
(.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) (cos.f64 k)) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) (cos.f64 k)))
(/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))
(/.f64 (.f64 #s(literal 2 binary64) (pow.f64 (.f64 (sin.f64 k) t) #s(literal 2 binary64))) (.f64 (.f64 l l) (cos.f64 k)))
(+.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) (cos.f64 k)))
(*.f64 (ratio-of-squares.f64 t l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))
(.f64 (.f64 t t) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)))
(/.f64 (neg.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l)) (neg.f64 (cos.f64 k)))
(/.f64 (neg.f64 (pow.f64 (.f64 (sin.f64 k) t) #s(literal 2 binary64))) (neg.f64 (.f64 (*.f64 l l) (cos.f64 k))))
(/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l) (cos.f64 k))
(/.f64 (pow.f64 (.f64 (sin.f64 k) t) #s(literal 2 binary64)) (.f64 (*.f64 l l) (cos.f64 k)))
(.f64 (/.f64 (.f64 (sin.f64 k) t) l) (/.f64 (*.f64 (sin.f64 k) t) l))
(.f64 (.f64 (sin.f64 k) t) (/.f64 (.f64 (sin.f64 k) t) (.f64 l l)))
(.f64 (.f64 t t) (ratio-of-squares.f64 (sin.f64 k) l))
(ratio-of-squares.f64 (pow.f64 (*.f64 (sin.f64 k) t) #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 (*.f64 (sin.f64 k) t) #s(literal 1 binary64)) (neg.f64 l))
(ratio-of-squares.f64 (pow.f64 (*.f64 (sin.f64 k) t) #s(literal 1 binary64)) (fabs.f64 l))
(ratio-of-squares.f64 (pow.f64 (*.f64 (sin.f64 k) t) #s(literal 1 binary64)) l)
(ratio-of-squares.f64 (neg.f64 (*.f64 (sin.f64 k) t)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (neg.f64 (*.f64 (sin.f64 k) t)) (neg.f64 l))
(ratio-of-squares.f64 (neg.f64 (*.f64 (sin.f64 k) t)) (fabs.f64 l))
(ratio-of-squares.f64 (neg.f64 (*.f64 (sin.f64 k) t)) l)
(ratio-of-squares.f64 (fabs.f64 (*.f64 (sin.f64 k) t)) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (fabs.f64 (*.f64 (sin.f64 k) t)) (neg.f64 l))
(ratio-of-squares.f64 (fabs.f64 (*.f64 (sin.f64 k) t)) (fabs.f64 l))
(ratio-of-squares.f64 (fabs.f64 (*.f64 (sin.f64 k) t)) l)
(ratio-of-squares.f64 (*.f64 (sin.f64 k) t) (pow.f64 l #s(literal 1 binary64)))
(ratio-of-squares.f64 (*.f64 (sin.f64 k) t) (neg.f64 l))
(ratio-of-squares.f64 (*.f64 (sin.f64 k) t) (fabs.f64 l))
(ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l)
(/.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 k) t) #s(literal 2 binary64)) l) l)
(/.f64 (neg.f64 (pow.f64 (.f64 (sin.f64 k) t) #s(literal 2 binary64))) (neg.f64 (.f64 l l)))
(/.f64 (pow.f64 (.f64 (sin.f64 k) t) #s(literal 2 binary64)) (.f64 l l))
(*.f64 (sin.f64 k) t)
(*.f64 t (sin.f64 k))
t
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)) #s(literal 2 binary64)))
(.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t))
(/.f64 (neg.f64 (ratio-of-squares.f64 l (*.f64 k k))) (neg.f64 t))
(/.f64 (neg.f64 (.f64 l l)) (neg.f64 (.f64 (pow.f64 k #s(literal 4 binary64)) t)))
(/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)
(/.f64 (.f64 l l) (.f64 (pow.f64 k #s(literal 4 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 (/.f64 l k) (pow.f64 k #s(literal 1 binary64)))
(ratio-of-squares.f64 (/.f64 l k) (fabs.f64 k))
(ratio-of-squares.f64 (/.f64 l k) (neg.f64 k))
(ratio-of-squares.f64 (/.f64 l 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 (*.f64 l l) (pow.f64 k #s(literal 4 binary64)))
(/.f64 (ratio-of-squares.f64 l k) (*.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 (*.f64 k k) #s(literal 1 binary64))
(pow.f64 k #s(literal 2 binary64))
(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 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k k)))) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k k)))) #s(literal 2 binary64))
(.f64 (ratio-of-squares.f64 l k) (.f64 (/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k k)))) #s(literal 2 binary64)))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k k)))))
(.f64 (/.f64 (cos.f64 k) #s(approx ( (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k k)))) (ratio-of-squares.f64 l k))
(.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx ( (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k k)))))
(/.f64 (.f64 (.f64 l l) (/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (.f64 k k))))) (.f64 k k))
(/.f64 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) #s(approx ( (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k k))))
(/.f64 (.f64 (.f64 l l) (cos.f64 k)) (.f64 (.f64 k k) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k k)))))
(*.f64 (/.f64 l k) (/.f64 l k))
(.f64 l (/.f64 l (.f64 k k)))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 k #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (fabs.f64 k))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (neg.f64 k))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) k)
(ratio-of-squares.f64 (neg.f64 l) (pow.f64 k #s(literal 1 binary64)))
(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) (pow.f64 k #s(literal 1 binary64)))
(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 (pow.f64 k #s(literal 1 binary64)))
(ratio-of-squares.f64 l (fabs.f64 k))
(ratio-of-squares.f64 l (neg.f64 k))
(ratio-of-squares.f64 l 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))
(/.f64 (neg.f64 (cos.f64 k)) (neg.f64 #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k k)))))
(/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k k))))
#s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k k)))
(.f64 (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (*.f64 k k) t))) k) k)
(.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k k))
(.f64 (.f64 k k) (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (*.f64 k k) t))))
(+.f64 (.f64 (.f64 k k) t) (.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) (*.f64 k k)))
(+.f64 (.f64 (.f64 k k) t) (.f64 (.f64 k k) (.f64 (.f64 (*.f64 k k) t) #s(literal -1/3 binary64))))
(/.f64 (-.f64 (.f64 t t) (.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)))) (-.f64 t (.f64 (.f64 (*.f64 k k) t) #s(literal -1/3 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64))) (.f64 t t)) (-.f64 (.f64 (.f64 (*.f64 k k) t) #s(literal -1/3 binary64)) t))
(/.f64 (+.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 t t) (-.f64 (.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64))) (.f64 t (.f64 (.f64 (*.f64 k k) t) #s(literal -1/3 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) #s(literal 3 binary64)) (pow.f64 t #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64))) (-.f64 (.f64 t t) (.f64 (.f64 (.f64 (*.f64 k k) t) #s(literal -1/3 binary64)) t))))
(-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (*.f64 k k) t)))
(+.f64 (.f64 (.f64 (*.f64 k k) t) #s(literal -1/3 binary64)) t)
(+.f64 t (.f64 (.f64 (*.f64 k k) t) #s(literal -1/3 binary64)))
(.f64 (.f64 (*.f64 k k) t) #s(literal -1/3 binary64))
(.f64 (.f64 (*.f64 k k) #s(literal -1/3 binary64)) t)
(.f64 (.f64 k k) (*.f64 #s(literal -1/3 binary64) t))
(.f64 #s(literal -1/3 binary64) (.f64 (*.f64 k k) t))
(.f64 (.f64 k k) t)
(.f64 k (.f64 k t))
(.f64 t (.f64 k k))
#s(literal -1/3 binary64)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (ratio-of-squares.f64 l k)) #s(literal 2 binary64)))
(.f64 (.f64 (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (ratio-of-squares.f64 l k)) #s(literal 2 binary64))
(.f64 (ratio-of-squares.f64 l k) (.f64 (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
(.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (ratio-of-squares.f64 l k)))
(.f64 (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) (ratio-of-squares.f64 l k))
(.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)))
(/.f64 (.f64 (.f64 l l) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) (.f64 k k))
(/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))
(/.f64 (.f64 (.f64 l l) #s(approx (cos k) #s(literal 1 binary64))) (.f64 (.f64 (*.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))
(/.f64 (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) t)
(/.f64 (neg.f64 #s(approx (cos k) #s(literal 1 binary64))) (neg.f64 (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)))
(/.f64 #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)
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)
(*.f64 t (pow.f64 (sin.f64 k) #s(literal 2 binary64)))
(/.f64 (/.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k))) (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)))
(/.f64 #s(literal -2 binary64) (neg.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k))))))
(/.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)))))
(.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k))))
(.f64 (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (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)) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (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 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))
(*.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)) (/.f64 (sin.f64 k) (.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)) 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/2 binary64)) #s(literal 1 binary64))
(pow.f64 (*.f64 t 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 (pow.f64 t #s(literal 3 binary64))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 t) #s(literal 3/2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 t) #s(literal 3/2 binary64))) (sinh.f64 (.f64 (log.f64 t) #s(literal 3/2 binary64))))
#s(literal 3/2 binary64)
(*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k))
(*.f64 (tan.f64 k) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (tan.f64 k) #s(literal 2 binary64)) (.f64 (tan.f64 k) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 k t) (tan.f64 k)) (.f64 (ratio-of-squares.f64 k t) (tan.f64 k)))) (-.f64 (.f64 (tan.f64 k) #s(literal 2 binary64)) (.f64 (ratio-of-squares.f64 k t) (tan.f64 k))))
(/.f64 (+.f64 (pow.f64 (.f64 (tan.f64 k) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (ratio-of-squares.f64 k t) (tan.f64 k)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (tan.f64 k) #s(literal 2 binary64)) (.f64 (tan.f64 k) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 k t) (tan.f64 k)) (.f64 (ratio-of-squares.f64 k t) (tan.f64 k))) (.f64 (.f64 (tan.f64 k) #s(literal 2 binary64)) (*.f64 (ratio-of-squares.f64 k t) (tan.f64 k))))))
(+.f64 (.f64 (tan.f64 k) (ratio-of-squares.f64 k t)) (.f64 (tan.f64 k) #s(literal 2 binary64)))
(+.f64 (.f64 (tan.f64 k) #s(literal 2 binary64)) (.f64 (ratio-of-squares.f64 k t) (tan.f64 k)))
(+.f64 (.f64 (ratio-of-squares.f64 k t) (tan.f64 k)) (.f64 (tan.f64 k) #s(literal 2 binary64)))
(/.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 (*.f64 (ratio-of-squares.f64 k t) (ratio-of-squares.f64 k t)) #s(literal 4 binary64)) (-.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 (ratio-of-squares.f64 k t) (ratio-of-squares.f64 k t))) (-.f64 #s(literal 2 binary64) (ratio-of-squares.f64 k t)))
(/.f64 (+.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 (.f64 (ratio-of-squares.f64 k t) (ratio-of-squares.f64 k t)) (-.f64 #s(literal 4 binary64) (.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (ratio-of-squares.f64 k t) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (.f64 (ratio-of-squares.f64 k t) (ratio-of-squares.f64 k t)) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 k t)))))
(+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64))
(+.f64 #s(literal 2 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 (ratio-of-squares.f64 k t) #s(literal 1 binary64))
(pow.f64 (/.f64 k t) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 k k)) (neg.f64 (.f64 t t)))
(/.f64 (/.f64 (*.f64 k k) t) t)
(/.f64 (.f64 k k) (.f64 t t))
(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))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #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 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #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 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -8 binary64) (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 t t)) (.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 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 (+.f64 (.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 4 binary64))) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -16 binary64)) (.f64 #s(literal -8 binary64) (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 t t)) (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64))) (.f64 t t)) (.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) t))
#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(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (+.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))) t))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (ratio-of-squares.f64 k l) (/.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t) (cos.f64 k))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (+.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))) t))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (+.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l) (cos.f64 k)))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l))
#s(approx (* t (sin k)) (*.f64 (sin.f64 k) t))
#s(approx t t)
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (*.f64 (ratio-of-squares.f64 l k) (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))
#s(approx (/ (/ (* l l) (* (* k k) (* k k))) t) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))
#s(approx (* (pow (sin k) 2) t) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))
#s(approx (* (+ (* (* (* k k) t) -1/3) t) (* k k)) (.f64 (.f64 (.f64 k k) t) (+.f64 (.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (* (* k k) t) -1/3) t) (.f64 (+.f64 (.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) t))
#s(approx (* (* (* k k) t) -1/3) (.f64 (.f64 (*.f64 k k) t) #s(literal -1/3 binary64)))
#s(approx (* (* k k) t) (.f64 (.f64 k k) t))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) t))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -8 binary64) (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 t t)) (.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) t))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 4 binary64))) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -16 binary64)) (.f64 #s(literal -8 binary64) (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 t t)) (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64))) (.f64 t t)) (.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) t))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) (.f64 (ratio-of-squares.f64 k l) (/.f64 (.f64 (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) (+ (/ (* k k) (* t t)) 2))) (.f64 (+.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))) t))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* 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/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 (* (tan k) (+ (/ (* k k) (* t t)) 2)) (*.f64 (ratio-of-squares.f64 k t) (tan.f64 k)))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (/.f64 (+.f64 (.f64 (.f64 k k) (tan.f64 k)) (.f64 (.f64 (.f64 t t) (tan.f64 k)) #s(literal 2 binary64))) (.f64 t t)))
#s(approx (+ (/ (* k k) (* t t)) 2) (ratio-of-squares.f64 k t))
#s(approx (+ (/ (* k k) (* t t)) 2) (/.f64 (+.f64 (.f64 (.f64 t t) #s(literal 2 binary64)) (.f64 k k)) (.f64 t t)))
#s(approx (/ (* k k) (* t t)) (ratio-of-squares.f64 k t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.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 (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 1/4 binary64)) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 k #s(literal 3 binary64)) (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/8 binary64)) (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 1/4 binary64)) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (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 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (.f64 (.f64 t t) (cos.f64 k)))) (*.f64 (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)) #s(literal 2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64)))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (+.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (.f64 (.f64 t t) (cos.f64 k)))) (*.f64 (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)) #s(literal 2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (.f64 (.f64 t t) (cos.f64 k)))) (.f64 (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)) #s(literal 2 binary64))) (.f64 t t)))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (/.f64 (+.f64 (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 1/4 binary64)) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 k #s(literal 3 binary64)) (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/8 binary64)) (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 1/4 binary64)) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) (.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64)))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) (.f64 (+.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (.f64 (.f64 t t) (cos.f64 k)))) (*.f64 (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)) #s(literal 2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (*.f64 (tan.f64 k) #s(literal 2 binary64)))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(literal 2 binary64))
#s(approx (+ (/ (* k k) (* t t)) 2) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (-.f64 (neg.f64 (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (ratio-of-squares.f64 k t) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 k #s(literal 3 binary64)) (pow.f64 t #s(literal 3 binary64))) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (.f64 (.f64 l l) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/2 binary64)))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (neg.f64 (.f64 (+.f64 (neg.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (.f64 (.f64 t t) (cos.f64 k))))) (*.f64 #s(literal -2 binary64) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (neg.f64 (.f64 (+.f64 (neg.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (.f64 (.f64 t t) (cos.f64 k))))) (*.f64 #s(literal -2 binary64) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (* (+ (* (* (* k k) t) -1/3) t) (* k k)) (neg.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 k k)) #s(literal 1 binary64)) t) (*.f64 k k))))
#s(approx (+ (* (* (* k k) t) -1/3) t) (neg.f64 (.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (*.f64 k k)) #s(literal 1 binary64)) t)))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (neg.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (neg.f64 (/.f64 (+.f64 (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal 1/4 binary64)) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) (.f64 (.f64 (ratio-of-squares.f64 k t) (*.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 k #s(literal 3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal -1/8 binary64)) (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal 1/4 binary64)) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) (.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (ratio-of-squares.f64 (sin.f64 k) l) (/.f64 #s(literal -1 binary64) (cos.f64 k)))) #s(literal -2 binary64)))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) (neg.f64 (.f64 (+.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (.f64 (.f64 t t) (cos.f64 k)))) (.f64 (*.f64 (ratio-of-squares.f64 (sin.f64 k) l) (/.f64 #s(literal -1 binary64) (cos.f64 k))) #s(literal 2 binary64))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (neg.f64 (/.f64 (.f64 (.f64 #s(literal -1 binary64) (sin.f64 k)) (pow.f64 t #s(literal 3 binary64))) (*.f64 l l))))
#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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #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 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (cos.f64 k))))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 t (/.f64 (+.f64 (/.f64 (pow.f64 (.f64 k (sin.f64 k)) #s(literal 2 binary64)) (cos.f64 k)) (.f64 (/.f64 (pow.f64 (.f64 (sin.f64 k) t) #s(literal 2 binary64)) (cos.f64 k)) #s(literal 2 binary64))) (*.f64 l l))))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (.f64 k (sin.f64 k)) #s(literal 2 binary64)) (cos.f64 k)) (.f64 (/.f64 (pow.f64 (.f64 (sin.f64 k) t) #s(literal 2 binary64)) (cos.f64 k)) #s(literal 2 binary64))) (.f64 l l)))
#s(approx (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))
#s(approx (/ (* k k) (* l l)) (ratio-of-squares.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 (/ (* l l) (* k k)) (ratio-of-squares.f64 l k))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 2 binary64)))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (cos.f64 k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (.f64 (/.f64 (.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 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 (-.f64 (.f64 (.f64 #s(literal -2 binary64) (.f64 k k)) (-.f64 (.f64 (ratio-of-squares.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 1 binary64)) (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 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 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 271/2520 binary64) (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 #s(literal -2/15 binary64) (pow.f64 t #s(literal -2 binary64))))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (-.f64 (.f64 (ratio-of-squares.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 1 binary64)) (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))))) (.f64 k k)) (-.f64 (.f64 (ratio-of-squares.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 1 binary64)) (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))))) (.f64 k k)) (.f64 (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) 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 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 k k)) (.f64 l l)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (*.f64 k k)))
#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 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 t #s(literal 3 binary64))) (.f64 k k)) (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 t #s(literal 3 binary64)))) (.f64 l l)) (.f64 k k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (.f64 k k)))
#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 (.f64 (+.f64 (+.f64 #s(literal 271/2520 binary64) (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 #s(literal -2/15 binary64) (pow.f64 t #s(literal -2 binary64))))) (pow.f64 t #s(literal 3 binary64))) (.f64 k k)) (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 t #s(literal 3 binary64)))) (.f64 l l)) (.f64 k k)) (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 l l))) (.f64 k k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal 2 binary64)))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64)))) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) (-.f64 (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) #s(literal 2 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 l #s(literal -2 binary64))))) (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) t)) (.f64 k k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/315 binary64) (ratio-of-squares.f64 t l)) (+.f64 (-.f64 (.f64 #s(literal -1/720 binary64) (ratio-of-squares.f64 t l)) (.f64 #s(literal -1/24 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)))) (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal -31/360 binary64) (pow.f64 l #s(literal -2 binary64))))) (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) #s(literal 2 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 l #s(literal -2 binary64)))) t)) (.f64 k k)) (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) t)) (.f64 k k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #s(literal 2 binary64)))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) #s(literal 2 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 l #s(literal -2 binary64)))) (.f64 k k))) (pow.f64 l #s(literal -2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (.f64 (+.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) #s(literal 2 binary64)) (.f64 #s(literal -1/6 binary64) (pow.f64 l #s(literal -2 binary64)))) (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/315 binary64) (ratio-of-squares.f64 t l)) (+.f64 (-.f64 (.f64 #s(literal -1/720 binary64) (ratio-of-squares.f64 t l)) (.f64 #s(literal -1/24 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)))) (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal -31/360 binary64) (pow.f64 l #s(literal -2 binary64)))) (.f64 k k))) (.f64 k k))) (pow.f64 l #s(literal -2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (ratio-of-squares.f64 (*.f64 k k) l))
#s(approx (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (ratio-of-squares.f64 k l)) (pow.f64 l #s(literal -2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 31/360 binary64) (ratio-of-squares.f64 k l)) (.f64 #s(literal -1/6 binary64) (pow.f64 l #s(literal -2 binary64)))) (*.f64 k k)) (pow.f64 l #s(literal -2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 173/5040 binary64) (ratio-of-squares.f64 k l)) (.f64 #s(literal -31/360 binary64) (pow.f64 l #s(literal -2 binary64)))) (.f64 k k)) (.f64 #s(literal -1/6 binary64) (pow.f64 l #s(literal -2 binary64)))) (.f64 k k)) (pow.f64 l #s(literal -2 binary64))) (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 (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #s(literal 2 binary64)))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) (.f64 k k)) (ratio-of-squares.f64 t l))) (.f64 k k)))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (.f64 (+.f64 (.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (-.f64 (.f64 #s(literal -1/315 binary64) (ratio-of-squares.f64 t l)) (+.f64 (-.f64 (.f64 #s(literal -1/720 binary64) (ratio-of-squares.f64 t l)) (.f64 #s(literal -1/24 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)))) (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) #s(literal -1/2 binary64)))) (.f64 k k)) (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))))) (.f64 k k)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (.f64 (.f64 k k) (ratio-of-squares.f64 t l)))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) (.f64 k k)) (ratio-of-squares.f64 t l)) (*.f64 k k)))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal -1/3 binary64))) (.f64 (ratio-of-squares.f64 t l) #s(literal -1/2 binary64))) (.f64 k k)) (ratio-of-squares.f64 t l)) (.f64 k k)))
#s(approx (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) (.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -1/315 binary64) (ratio-of-squares.f64 t l)) (+.f64 (-.f64 (.f64 #s(literal -1/720 binary64) (ratio-of-squares.f64 t l)) (.f64 #s(literal -1/24 binary64) (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)))) (.f64 (-.f64 (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l)) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) #s(literal -1/2 binary64)))) (.f64 k k)) (.f64 #s(literal 2/45 binary64) (ratio-of-squares.f64 t l))) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)) (.f64 #s(literal -1/24 binary64) (ratio-of-squares.f64 t l)))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal -1/3 binary64))) (.f64 (ratio-of-squares.f64 t l) #s(literal -1/2 binary64))) (.f64 k k)) (ratio-of-squares.f64 t l)) (*.f64 k k)))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (.f64 (.f64 k k) (ratio-of-squares.f64 t l)))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) (ratio-of-squares.f64 t l)) #s(literal -1/3 binary64)) (ratio-of-squares.f64 t l)) (*.f64 k k)))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (.f64 (+.f64 (.f64 (-.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (.f64 (.f64 k k) (ratio-of-squares.f64 t l)))) (.f64 k k)) (ratio-of-squares.f64 t l)) (.f64 k k)))
#s(approx (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 k k) (ratio-of-squares.f64 t l)) #s(literal -1/315 binary64)) (.f64 #s(literal -2/45 binary64) (ratio-of-squares.f64 t l))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal -1/3 binary64))) (.f64 k k)) (ratio-of-squares.f64 t l)) (*.f64 k k)))
#s(approx (* t (sin k)) (*.f64 k t))
#s(approx (* t (sin k)) (.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) t) t) k))
#s(approx (* t (sin k)) (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -1/6 binary64) t) (.f64 #s(literal -1/120 binary64) (.f64 (.f64 k k) t))) (*.f64 k k)) t) k))
#s(approx (* t (sin k)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/5040 binary64) (.f64 k k)) t) (.f64 #s(literal -1/120 binary64) t)) (.f64 k k)) (.f64 #s(literal -1/6 binary64) t)) (.f64 k k)) t) k))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (.f64 (/.f64 (ratio-of-squares.f64 l (.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (/.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) (.f64 k k)) (/.f64 (.f64 l l) t))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (/.f64 (+.f64 (.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) 2) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/720 binary64)) (+.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/315 binary64)) (.f64 #s(literal -2/45 binary64) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)))) (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))) #s(literal -1/3 binary64)))) (.f64 k k)) (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))))) (.f64 k k)) (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) (.f64 k k)) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/2 binary64))) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/3 binary64))) (.f64 k k)) (/.f64 (.f64 l l) t)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/720 binary64)) (+.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/315 binary64)) (.f64 #s(literal -2/45 binary64) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)))) (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))) #s(literal -1/3 binary64)))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64))) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/2 binary64))) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/3 binary64))) (.f64 k k)) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* k k) (*.f64 k k))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (pow.f64 k #s(literal -2 binary64)) t))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (pow.f64 t #s(literal -1 binary64)) (.f64 (/.f64 (.f64 k k) t) #s(literal -1/6 binary64))) (*.f64 k k)))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -7/120 binary64) (/.f64 (.f64 k k) t)) (/.f64 #s(literal 1/6 binary64) t)) (.f64 k k)) (pow.f64 t #s(literal -1 binary64))) (*.f64 k k)))
#s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -31/3024 binary64) (/.f64 (.f64 k k) t)) (/.f64 #s(literal 7/120 binary64) t)) (.f64 k k)) (/.f64 #s(literal 1/6 binary64) t)) (.f64 k k)) (pow.f64 t #s(literal -1 binary64))) (*.f64 k k)))
#s(approx (* (pow (sin k) 2) t) (.f64 (.f64 k k) t))
#s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) 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 (* (+ (* (* (* k k) t) -1/3) t) (* k k)) (.f64 (.f64 k k) t))
#s(approx (* (+ (* (* (* k k) t) -1/3) t) (* k k)) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k k)))
#s(approx (+ (* (* (* k k) t) -1/3) t) t)
#s(approx (+ (* (* (* k k) t) -1/3) t) (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (*.f64 k k) t))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (/.f64 (+.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (.f64 (/.f64 (.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (.f64 k k)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64))) (.f64 k k)))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -2 binary64) (.f64 k k)) (-.f64 (.f64 (ratio-of-squares.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 1 binary64)) (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.f64 k k)))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 271/2520 binary64) (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 #s(literal -2/15 binary64) (pow.f64 t #s(literal -2 binary64))))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (-.f64 (.f64 (ratio-of-squares.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 1 binary64)) (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))))) (.f64 k k)) (-.f64 (.f64 (ratio-of-squares.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 1 binary64)) (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))))) (.f64 k k)) (.f64 (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.f64 k k)))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal 2 binary64)))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) (.f64 (+.f64 (/.f64 (.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 k k)) (.f64 l l)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) (.f64 (+.f64 (.f64 (/.f64 (+.f64 (.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 t #s(literal 3 binary64))) (.f64 k k)) (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 t #s(literal 3 binary64)))) (.f64 l l)) (.f64 k k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) (.f64 (+.f64 (.f64 (+.f64 (.f64 (/.f64 (+.f64 (.f64 (.f64 (+.f64 (+.f64 #s(literal 271/2520 binary64) (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 #s(literal -2/15 binary64) (pow.f64 t #s(literal -2 binary64))))) (pow.f64 t #s(literal 3 binary64))) (.f64 k k)) (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 t #s(literal 3 binary64)))) (.f64 l l)) (.f64 k k)) (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 l l))) (.f64 k k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (*.f64 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)) (.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/2) (pow t 3/2)) (* l l)) (sin 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 #s(literal -1/120 binary64) (.f64 (.f64 k k) (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/2) (pow t 3/2)) (* l l)) (sin k)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (.f64 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (.f64 #s(literal -1/120 binary64) (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 (* (tan k) (+ (/ (* k k) (* t t)) 2)) (*.f64 k #s(literal 2 binary64)))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (.f64 (+.f64 (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) (*.f64 k k)) #s(literal 2 binary64)) k))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 k k)) (pow.f64 t #s(literal -2 binary64))) #s(literal 2/3 binary64)) (.f64 k k)) #s(literal 2 binary64)) k))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 (+.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 (+.f64 #s(literal 34/315 binary64) (.f64 #s(literal 2/15 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 k k))) (.f64 k k)) (pow.f64 t #s(literal -2 binary64))) #s(literal 2/3 binary64)) (*.f64 k k)) #s(literal 2 binary64)) 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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (.f64 (.f64 l l) (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 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 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (cos.f64 k) (pow.f64 t #s(literal 3 binary64))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 8 binary64)) (.f64 (.f64 (.f64 l l) (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 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 (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -16 binary64)) (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (cos.f64 k) (pow.f64 t #s(literal 3 binary64))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 8 binary64)) (.f64 (.f64 (.f64 l l) (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)))) (.f64 k k)))
#s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (+.f64 (.f64 t (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) t) (.f64 (+.f64 (.f64 t (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (+ (* (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 t k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.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 (* (+ (* (* (* k k) t) -1/3) t) (* k k)) (.f64 (.f64 (pow.f64 k #s(literal 4 binary64)) t) #s(literal -1/3 binary64)))
#s(approx (* (+ (* (* (* k k) t) -1/3) t) (* k k)) (.f64 (+.f64 (/.f64 t (.f64 k k)) (*.f64 #s(literal -1/3 binary64) t)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (+ (* (* (* k k) t) -1/3) t) (.f64 (.f64 (*.f64 k k) t) #s(literal -1/3 binary64)))
#s(approx (+ (* (* (* k k) t) -1/3) t) (.f64 (+.f64 (/.f64 t (.f64 k k)) (.f64 #s(literal -1/3 binary64) t)) (.f64 k k)))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (.f64 (.f64 l l) (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (*.f64 k k)))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (cos.f64 k) (pow.f64 t #s(literal 3 binary64))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 8 binary64)) (.f64 (.f64 (.f64 l l) (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64))) (*.f64 k k)))
#s(approx (/ 2 (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2)))) (/.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -16 binary64)) (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (cos.f64 k) (pow.f64 t #s(literal 3 binary64))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 8 binary64)) (.f64 (.f64 (.f64 l l) (/.f64 (/.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)))) (.f64 k k)))
#s(approx (* (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (sin k)) (* (tan k) (+ (/ (* k k) (* t t)) 2))) (.f64 (+.f64 (.f64 t (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (+.f64 (.f64 (.f64 k k) (/.f64 (.f64 #s(literal 2 binary64) (sin.f64 k)) (.f64 (.f64 k k) (cos.f64 k)))) (.f64 (ratio-of-squares.f64 k t) (tan.f64 k))))
#s(approx (tan k) (tan.f64 k))
#s(approx (+ (/ (* k k) (* t t)) 2) (.f64 (+.f64 (.f64 (pow.f64 k #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 t #s(literal -2 binary64))) (*.f64 k k)))

eval2.3s (9.7%)

Memory

9.9MiB live, 4 250.8MiB allocated; 666ms collecting garbage

Samples

1.3s	28 322×	0	valid
256.0ms	5 470×	0	invalid

Compiler

Compiled 34 481 to 3 473 computations (89.9% saved)

Precisions

Click to see histograms. Total time spent on operations: 794.0ms

ival-mult: 535.0ms (67.4% of total)

ival-div: 217.0ms (27.3% of total)

ival-true: 19.0ms (2.4% of total)

ival-assert: 14.0ms (1.8% of total)

adjust: 8.0ms (1% of total)

prune2.8s (11.8%)

Memory

-138.5MiB live, 3 014.5MiB allocated; 1.7s collecting garbage

Pruning

52 alts after pruning (49 fresh and 3 done)

	Pruned	Kept	Total
New	623	19	642
Fresh	9	30	39
Picked	3	2	5
Done	0	1	1
Total	635	52	687

Accuracy

98.7%

Counts

687 → 52

Alt Table

Click to see full alt table

Status	Accuracy	Program
	53.6%	(/.f64 (/.f64 #s(literal 2 binary64) (+.f64 (ratio-of-squares.f64 k t) #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))))
▶	54.3%	(/.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)))))
	45.0%	(/.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 (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 k k))) (.f64 k k))))))
	45.2%	(/.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 (+.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))))))
	45.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) #s(approx (* (sin k) (tan 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))))))
	45.3%	(/.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)))))
	63.8%	(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (.f64 (pow.f64 t #s(literal 3/2 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/4 binary64)) l)) (.f64 (sin.f64 k) (tan.f64 k)))))
	50.0%	(/.f64 #s(literal 2 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 (.f64 k k) (*.f64 t t)) #s(literal 2 binary64)))))
	45.6%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 (tan.f64 k) #s(approx (+ (/ ( k k) (* t t)) 2) (ratio-of-squares.f64 k t)))))
	48.5%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 (tan.f64 k) #s(approx (+ (/ ( k k) (* t t)) 2) #s(literal 2 binary64)))))
	50.7%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 #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)) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))))
	47.3%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) #s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (*.f64 k #s(literal 2 binary64)))))
	70.2%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (pow.f64 t #s(literal 3/2 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/4 binary64)) l)) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))))
▶	73.3%	(/.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))))
	44.7%	(/.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)))))
	43.8%	(/.f64 #s(literal 2 binary64) (.f64 #s(approx (+ (+ (/ ( k k) (* t t)) 1) 1) #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)))))
	48.1%	(/.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 t (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64))) (*.f64 k k))))
	16.9%	(/.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 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))) (-.f64 (.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)))))) t)))
	53.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 #s(approx (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (ratio-of-squares.f64 (.f64 k k) l)) (.f64 (/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t)))
	68.5%	(/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))) t)))
	69.9%	(/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) t)))
	61.5%	(/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #s(literal 2 binary64))) t)))
	68.5%	(/.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) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))) t)))
	47.0%	#s(approx (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
	20.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 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) t))
	60.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 (pow.f64 t #s(literal 3/2 binary64)) #s(literal 2 binary64))))
	60.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 (*.f64 t t) #s(literal 3/2 binary64))))
✓	60.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
▶	60.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
	40.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (pow.f64 k #s(literal -2 binary64)))))
	23.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -7/120 binary64) (.f64 k k)) #s(literal 1/6 binary64)) (.f64 k k)) #s(literal 1 binary64)) (.f64 k k)))))
▶	25.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) #s(literal 1 binary64)) (.f64 k k)))))
	67.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
	52.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k k)))) #s(literal 2 binary64)))
▶	54.5%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
	67.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) t)) #s(literal 2 binary64)))
	64.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t))) #s(literal 2 binary64)))
	57.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) t))) #s(literal 2 binary64)))
	26.0%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
	30.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
	34.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 k k)) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
✓	54.5%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
	51.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t))) #s(literal 2 binary64)))
	54.9%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 k k))) t))) #s(literal 2 binary64)))
	54.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) t))) #s(literal 2 binary64)))
	31.5%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (pow.f64 t #s(literal -1 binary64)) (.f64 (/.f64 (.f64 k k) t) #s(literal -1/6 binary64))) (*.f64 k k)))) #s(literal 2 binary64)))
	67.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (.f64 (/.f64 l k) (/.f64 l k)) (/.f64 (cos.f64 k) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
	57.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (.f64 l l) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 2 binary64)))
	48.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) k) t)) #s(literal 2 binary64)))
✓	24.3%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)) #s(literal 2 binary64)))
	24.1%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))) t)) #s(literal 2 binary64)))
	54.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (.f64 (/.f64 l (.f64 k k)) (/.f64 l (*.f64 k k))) t)) #s(literal 2 binary64)))

Samples

2.1s	28 776×	0	valid
133.0ms	2 712×	0	invalid

Compiler

Compiled 4 717 to 3 014 computations (36.1% saved)

Precisions

Click to see histograms. Total time spent on operations: 722.0ms

ival-mult: 490.0ms (67.8% of total)

ival-div: 194.0ms (26.9% of total)

ival-true: 18.0ms (2.5% of total)

ival-assert: 13.0ms (1.8% of total)

adjust: 8.0ms (1.1% of total)

series290.0ms (1.2%)

Memory

17.1MiB live, 221.3MiB allocated; 68ms collecting garbage

Counts

52 → 237

Calls

Call 1

Inputs
(/.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))))
#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)))
(.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 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k))
(exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64))))
(-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))
(*.f64 (log.f64 t) #s(literal 3 binary64))
(log.f64 t)
t
#s(literal 3 binary64)
(*.f64 (log.f64 l) #s(literal 2 binary64))
(log.f64 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))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
(/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t))
(ratio-of-squares.f64 l k)
(.f64 (.f64 t t) t)
(*.f64 t t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) #s(literal 1 binary64)) (.f64 k k)))))
(.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) #s(literal 1 binary64)) (.f64 k k))))
(ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))
(pow.f64 t #s(literal 3/2 binary64))
#s(literal 3/2 binary64)
#s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))
(/.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))
(+.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) #s(literal 1 binary64))
(.f64 #s(literal -1/6 binary64) (.f64 k k))
#s(literal -1/6 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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64))
(/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))
(*.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64)))
#s(approx (cos k) #s(literal 1 binary64))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(/.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)))))
(.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k))))
(ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)
(.f64 (sin.f64 k) (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)))
(*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k))
(+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64))
(ratio-of-squares.f64 k t)

Outputs
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow t 2) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* -4 (/ (* (pow t 2) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* (pow t 2) (- (* 8 (/ (* (pow t 2) (cos k)) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* (pow t 2) (- (* (pow t 2) (- (* -16 (/ (* (pow t 2) (cos k)) (* (pow k 8) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* -8 (/ (cos k) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (cos k))) (/ (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (cos k))) (pow t 2))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* 3 (log t)) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* 3 (log t))))
#s(approx (log t) #s(hole binary64 (log t)))
#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)) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (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 (/ 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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#s(approx (/ (/ (* l l) (* k k)) (* (* t t) t)) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (* (* t t) t) #s(hole binary64 (pow t 3)))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) #s(hole binary64 (/ (pow l 2) (pow t 3))))
#s(approx (pow t 3/2) #s(hole binary64 (sqrt (pow t 3))))
#s(approx (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* t (pow (sin k) 2))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) t)))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) t)))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (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 (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow t 2) (cos k)))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (pow (sin k) 2)) (cos k))) (pow t 2))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (/ (* (pow k 2) (sin k)) (* (pow t 2) (cos k)))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (sin k)) (cos k))) (/ (* (pow k 2) (sin k)) (cos k))) (pow t 2))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (/ (* k k) (* t t)) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))) (+ (* -1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (+ (* 2 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* -3 (log (/ 1 t))) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* -3 (log (/ 1 t))) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* -3 (log (/ 1 t)))))
#s(approx (log t) #s(hole binary64 (* -1 (log (/ 1 t)))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 2))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (* 2 (/ (pow (sin k) 2) (cos k)))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (+ (* 2 (/ (pow (sin k) 2) (cos k))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow t 2) (cos k))))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (* 2 (/ (sin k) (cos k)))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (+ (* 2 (/ (sin k) (cos k))) (/ (* (pow k 2) (sin k)) (* (pow t 2) (cos k))))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 2))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))) (+ (* -1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)) (cos k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (+ (* 2 (/ (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* 3 (+ (log -1) (* -1 (log (/ -1 t)))))))
#s(approx (log t) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))))) (pow t 3)))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (* -1 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (pow (sqrt -1) 2)))))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) #s(hole binary64 (* -1 (/ (pow l 2) (* (pow t 3) (pow (sqrt -1) 2))))))
#s(approx (pow t 3/2) #s(hole binary64 (* (sqrt (pow t 3)) (pow (sqrt -1) 2))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (* -1 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (pow (sqrt -1) 2)))))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2)))) (pow t 3)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2)))))) (pow t 3)))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* -2 (/ (* (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)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* 2 (/ (* (pow (sin k) 2) (pow (sqrt -1) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))) (* (pow l 2) (* (pow t 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 (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (log l) 2) #s(hole binary64 (* 2 (log l))))
#s(approx (log l) #s(hole binary64 (log l)))
#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) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (/ (* l l) (* k k)) #s(hole binary64 (/ (pow l 2) (pow k 2))))
#s(approx (* (/ (* l l) (* k k)) (cos k)) #s(hole binary64 (/ (* (pow l 2) (cos k)) (pow k 2))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (/ (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (* (pow l 2) (cos k)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* -2 (log (/ 1 l)))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* -2 (log (/ 1 l))))))
#s(approx (* (log l) 2) #s(hole binary64 (* -2 (log (/ 1 l)))))
#s(approx (log l) #s(hole binary64 (* -1 (log (/ 1 l)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l))))))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l))))))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l))))))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l))))))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l)))))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l))))))))
#s(approx (* (log l) 2) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 l)))))))
#s(approx (log l) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 l))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (exp (- (* 3 (log t)) (* 2 (log l)))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (- (* 3 (log t)) (* 2 (log l)))))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (+ (* -1/4 (/ (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2)))) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))) (exp (- (* 3 (log t)) (* 2 (log l)))))))))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (- (* 3 (log t)) (* 2 (log l)))))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* 1/6 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* 31/360 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/6 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* 1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* 173/5040 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 31/360 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (exp (- (* 3 (log t)) (* 2 (log l)))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* -1/6 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* -1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* 1/120 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* -1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* -1/5040 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/120 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))))
#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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* 1/24 (/ (pow l 2) (pow t 3))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3))))) (* 2/45 (/ (pow l 2) (pow t 3))))))) (* -1/3 (/ (pow l 2) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* 1/24 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1/720 (/ (pow l 2) (pow t 3))) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) (pow t 3))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3))))) (* 2/45 (/ (pow l 2) (pow t 3)))))) (+ (* -1/315 (/ (pow l 2) (pow t 3))) (* 2/45 (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3)))))))))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3))))) (* 2/45 (/ (pow l 2) (pow t 3))))))) (* -1/3 (/ (pow l 2) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ 1 (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ (+ 1 (* -1/6 (pow k 2))) (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ (+ 1 (* (pow k 2) (- (* -7/120 (pow k 2)) 1/6))) (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ (+ 1 (* (pow k 2) (- (* (pow k 2) (- (* -31/3024 (pow k 2)) 7/120)) 1/6))) (pow k 2))))
#s(approx (/ (+ (* -1/6 (* k k)) 1) (* k k)) #s(hole binary64 (/ 1 (pow k 2))))
#s(approx (/ (+ (* -1/6 (* k k)) 1) (* k k)) #s(hole binary64 (/ (+ 1 (* -1/6 (pow k 2))) (pow k 2))))
#s(approx (+ (* -1/6 (* k k)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/6 (* k k)) 1) #s(hole binary64 (+ 1 (* -1/6 (pow k 2)))))
#s(approx (* -1/6 (* k k)) #s(hole binary64 (* -1/6 (pow k 2))))
#s(approx (* k k) #s(hole binary64 (pow k 2)))
#s(approx (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))) (pow k 4))))
#s(approx (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (* 2 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))))))) (pow k 4))))
#s(approx (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (pow l 2) (* (pow k 4) t))))
#s(approx (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) t)) (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) t)) (* (pow k 2) (- (+ (* 1/24 (/ (pow l 2) t)) (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (* (/ (* l l) (* k k)) (cos k)) #s(hole binary64 (/ (pow l 2) (pow k 2))))
#s(approx (* (/ (* l l) (* k k)) (cos k)) #s(hole binary64 (/ (+ (* -1/2 (* (pow k 2) (pow l 2))) (pow l 2)) (pow k 2))))
#s(approx (* (/ (* l l) (* k k)) (cos k)) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (pow l 2)) (* 1/24 (* (pow k 2) (pow l 2))))) (pow l 2)) (pow k 2))))
#s(approx (* (/ (* l l) (* k k)) (cos k)) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (pow l 2)) (* (pow k 2) (+ (* -1/720 (* (pow k 2) (pow l 2))) (* 1/24 (pow l 2)))))) (pow l 2)) (pow k 2))))
#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 (* (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 (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (pow l 2)))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (/ (* (pow k 2) (* (pow t 3) (+ 1/3 (/ 1 (pow t 2))))) (pow l 2))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))))) (pow l 2)) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))))) (pow l 2)) (/ (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow l 2)))) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (* 2 (pow k 2))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (+ 1/3 (/ 1 (pow t 2))))))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (+ 1/3 (+ (* (pow k 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (/ 1 (pow t 2)))))))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (+ 1/3 (+ (* (pow k 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (+ (* 1/3 (/ 1 (pow t 2))) (* (pow k 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))))))) (/ 1 (pow t 2)))))))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (* 2 k)))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (* k (+ 2 (* (pow k 2) (+ 2/3 (/ 1 (pow t 2))))))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (* k (+ 2 (* (pow k 2) (+ 2/3 (+ (* (pow k 2) (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (/ 1 (pow t 2)))))))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (* k (+ 2 (* (pow k 2) (+ 2/3 (+ (* (pow k 2) (+ 4/15 (+ (* 1/3 (/ 1 (pow t 2))) (* (pow k 2) (+ 34/315 (* 2/15 (/ 1 (pow t 2)))))))) (/ 1 (pow t 2)))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))) (* 8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* -16 (/ (* (pow t 8) (cos k)) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (+ (* -8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (* (pow k 2) (cos k)))) (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (* (pow t 2) (cos k)))))))
#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)) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ (cos k) (pow (sin k) 2))))
#s(approx (/ (+ (* -1/6 (* k k)) 1) (* k k)) #s(hole binary64 -1/6))
#s(approx (/ (+ (* -1/6 (* k k)) 1) (* k k)) #s(hole binary64 (- (/ 1 (pow k 2)) 1/6)))
#s(approx (+ (* -1/6 (* k k)) 1) #s(hole binary64 (* -1/6 (pow k 2))))
#s(approx (+ (* -1/6 (* k k)) 1) #s(hole binary64 (* (pow k 2) (- (/ 1 (pow k 2)) 1/6))))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (pow (sin k) 2) #s(hole binary64 (pow (sin k) 2)))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow (sin k) 2) (* (pow k 2) (cos k)))) (/ (pow (sin k) 2) (* (pow t 2) (cos k)))))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (sin k) (* (pow k 2) (cos k)))) (/ (sin k) (* (pow t 2) (cos k)))))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))

Calls

9 calls:

Time	Variable		Point	Expression
98.0ms	t	@	0	((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (exp (- (* (log t) 3) (* (log l) 2))) (- (* (log t) 3) (* (log l) 2)) (* (log t) 3) (log t) t 3 (* (log l) 2) (log 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) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (* l l) (* k k)) (* (* t t) t)) (/ (* l l) (* k k)) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (pow t 3/2) 3/2 (/ (cos k) (pow (sin k) 2)) (/ (+ (* -1/6 (* k k)) 1) (* k k)) (+ (* -1/6 (* k k)) 1) (* -1/6 (* k k)) -1/6 (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) (* (/ (* l l) (* k k)) (cos k)) (cos k) (* (pow (sin k) 2) t) (pow (sin k) 2) (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (* (+ (/ (* k k) (* t t)) 2) (tan k)) (+ (/ (* k k) (* t t)) 2) (/ (* k k) (* t t)))
37.0ms	t	@	-inf	((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (exp (- (* (log t) 3) (* (log l) 2))) (- (* (log t) 3) (* (log l) 2)) (* (log t) 3) (log t) t 3 (* (log l) 2) (log 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) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (* l l) (* k k)) (* (* t t) t)) (/ (* l l) (* k k)) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (pow t 3/2) 3/2 (/ (cos k) (pow (sin k) 2)) (/ (+ (* -1/6 (* k k)) 1) (* k k)) (+ (* -1/6 (* k k)) 1) (* -1/6 (* k k)) -1/6 (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) (* (/ (* l l) (* k k)) (cos k)) (cos k) (* (pow (sin k) 2) t) (pow (sin k) 2) (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (* (+ (/ (* k k) (* t t)) 2) (tan k)) (+ (/ (* k k) (* t t)) 2) (/ (* k k) (* t t)))
26.0ms	k	@	inf	((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (exp (- (* (log t) 3) (* (log l) 2))) (- (* (log t) 3) (* (log l) 2)) (* (log t) 3) (log t) t 3 (* (log l) 2) (log 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) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (* l l) (* k k)) (* (* t t) t)) (/ (* l l) (* k k)) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (pow t 3/2) 3/2 (/ (cos k) (pow (sin k) 2)) (/ (+ (* -1/6 (* k k)) 1) (* k k)) (+ (* -1/6 (* k k)) 1) (* -1/6 (* k k)) -1/6 (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) (* (/ (* l l) (* k k)) (cos k)) (cos k) (* (pow (sin k) 2) t) (pow (sin k) 2) (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (* (+ (/ (* k k) (* t t)) 2) (tan k)) (+ (/ (* k k) (* t t)) 2) (/ (* k k) (* t t)))
26.0ms	l	@	inf	((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (exp (- (* (log t) 3) (* (log l) 2))) (- (* (log t) 3) (* (log l) 2)) (* (log t) 3) (log t) t 3 (* (log l) 2) (log 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) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (* l l) (* k k)) (* (* t t) t)) (/ (* l l) (* k k)) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (pow t 3/2) 3/2 (/ (cos k) (pow (sin k) 2)) (/ (+ (* -1/6 (* k k)) 1) (* k k)) (+ (* -1/6 (* k k)) 1) (* -1/6 (* k k)) -1/6 (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) (* (/ (* l l) (* k k)) (cos k)) (cos k) (* (pow (sin k) 2) t) (pow (sin k) 2) (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (* (+ (/ (* k k) (* t t)) 2) (tan k)) (+ (/ (* k k) (* t t)) 2) (/ (* k k) (* t t)))
25.0ms	l	@	0	((/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (exp (- (* (log t) 3) (* (log l) 2))) (- (* (log t) 3) (* (log l) 2)) (* (log t) 3) (log t) t 3 (* (log l) 2) (log 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) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/ (/ (* l l) (* k k)) (* (* t t) t)) (/ (* l l) (* k k)) (* (* t t) t) (* t t) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (pow t 3/2) 3/2 (/ (cos k) (pow (sin k) 2)) (/ (+ (* -1/6 (* k k)) 1) (* k k)) (+ (* -1/6 (* k k)) 1) (* -1/6 (* k k)) -1/6 (* k k) (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) (* (/ (* l l) (* k k)) (cos k)) (cos k) (* (pow (sin k) 2) t) (pow (sin k) 2) (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (* (+ (/ (* k k) (* t t)) 2) (tan k)) (+ (/ (* k k) (* t t)) 2) (/ (* k k) (* t t)))

rewrite211.0ms (0.9%)

Memory

-19.8MiB live, 165.6MiB allocated; 30ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1173	11821
0	1242	9984
1	6846	9935
0	8196	9733

Stop Event

1×	iter limit
1×	node limit
1×	iter limit

Counts

289 → 529

Calls

Call 1

Inputs
(/.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))))
#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)))
(.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 (exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64)))) (sin.f64 k))
(exp.f64 (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64))))
(-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))
(*.f64 (log.f64 t) #s(literal 3 binary64))
(log.f64 t)
t
#s(literal 3 binary64)
(*.f64 (log.f64 l) #s(literal 2 binary64))
(log.f64 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))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
(/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t))
(ratio-of-squares.f64 l k)
(.f64 (.f64 t t) t)
(*.f64 t t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) #s(literal 1 binary64)) (.f64 k k)))))
(.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) #s(literal 1 binary64)) (.f64 k k))))
(ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))
(pow.f64 t #s(literal 3/2 binary64))
#s(literal 3/2 binary64)
#s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))
(/.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) #s(literal 1 binary64)) (*.f64 k k))
(+.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) #s(literal 1 binary64))
(.f64 #s(literal -1/6 binary64) (.f64 k k))
#s(literal -1/6 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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
(.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64))
(/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))
(*.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64)))
#s(approx (cos k) #s(literal 1 binary64))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(/.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)))))
(.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k))))
(ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)
(.f64 (sin.f64 k) (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)))
(*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k))
(+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64))
(ratio-of-squares.f64 k t)
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (* (pow t 2) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* -4 (/ (* (pow t 2) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* (pow t 2) (- (* 8 (/ (* (pow t 2) (cos k)) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* (pow t 2) (+ (* 2 (/ (cos k) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* (pow t 2) (- (* (pow t 2) (- (* -16 (/ (* (pow t 2) (cos k)) (* (pow k 8) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* -8 (/ (cos k) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))))) (* 4 (/ (cos k) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (cos k))) (/ (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))) (cos k))) (pow t 2))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* 3 (log t)) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* 3 (log t))))
#s(approx (log t) #s(hole binary64 (log t)))
#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)) 1) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (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 (/ 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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) 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) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#s(approx (/ (/ (* l l) (* k k)) (* (* t t) t)) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (* (* t t) t) #s(hole binary64 (pow t 3)))
#s(approx (* t t) #s(hole binary64 (pow t 2)))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) #s(hole binary64 (/ (pow l 2) (pow t 3))))
#s(approx (pow t 3/2) #s(hole binary64 (sqrt (pow t 3))))
#s(approx (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2))))))
#s(approx (* (pow (sin k) 2) t) #s(hole binary64 (* t (pow (sin k) 2))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (* t (pow (sin k) 2)))))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 4) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2))))) t)))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 6) (pow (sin k) 2))))))) t)))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow l 2) (cos k)) (* (pow k 2) (pow (sin k) 2)))) (* (pow t 2) (+ (* -4 (/ (* (pow l 2) (cos k)) (* (pow k 4) (pow (sin k) 2)))) (* (pow t 2) (+ (* -16 (/ (* (pow l 2) (* (pow t 2) (cos k))) (* (pow k 8) (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (cos k)) (* (pow k 6) (pow (sin k) 2))))))))) t)))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (/ (* (pow k 2) (* t (pow (sin k) 2))) (* (pow l 2) (cos k)))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* t (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (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 (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (/ (* (pow k 2) (pow (sin k) 2)) (* (pow t 2) (cos k)))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (pow (sin k) 2)) (cos k))) (pow t 2))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (/ (* (pow k 2) (sin k)) (* (pow t 2) (cos k)))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (/ (+ (* 2 (/ (* (pow t 2) (sin k)) (cos k))) (/ (* (pow k 2) (sin k)) (cos k))) (pow t 2))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 (/ (+ (* 2 (pow t 2)) (pow k 2)) (pow t 2))))
#s(approx (/ (* k k) (* t t)) #s(hole binary64 (/ (pow k 2) (pow t 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))) (+ (* -1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (+ (* 2 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* -3 (log (/ 1 t))) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* -3 (log (/ 1 t))) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* -3 (log (/ 1 t))) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* -3 (log (/ 1 t)))))
#s(approx (log t) #s(hole binary64 (* -1 (log (/ 1 t)))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 2))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (* (pow l 2) (cos k)) (* (pow t 3) (pow (sin k) 2)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (pow t 3))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2)))) (pow t 3))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (/ (* (pow l 2) (cos k)) (pow (sin k) 2))))) (pow t 3))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow l 2) (cos k))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* (pow t 3) (+ (* 2 (/ (pow (sin k) 2) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow l 2) (* (pow t 2) (cos k))))))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (* 2 (/ (pow (sin k) 2) (cos k)))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (+ (* 2 (/ (pow (sin k) 2) (cos k))) (/ (* (pow k 2) (pow (sin k) 2)) (* (pow t 2) (cos k))))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (* 2 (/ (sin k) (cos k)))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (+ (* 2 (/ (sin k) (cos k))) (/ (* (pow k 2) (sin k)) (* (pow t 2) (cos k))))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 2))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 (+ 2 (/ (pow k 2) (pow t 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (+ (* -1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (- (+ (* -1/8 (/ (* (pow k 6) (cos k)) (* (pow t 6) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (/ (cos k) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))) (+ (* -1/4 (/ (* (pow k 4) (cos k)) (* (pow t 4) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))))) (* 1/2 (/ (* (pow k 2) (cos k)) (* (pow t 2) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (/ (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)) (cos k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (+ (* 2 (/ (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))) (/ (* (pow k 2) (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2))) (* (pow t 2) (cos k))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (+ (log -1) (* -1 (log (/ -1 t))))) (* 2 (log l)))))
#s(approx (* (log t) 3) #s(hole binary64 (* 3 (+ (log -1) (* -1 (log (/ -1 t)))))))
#s(approx (log t) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 t))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2)))))) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow l 2) (cos k)) (pow (sin k) 2))) (+ (* -1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (pow (sin k) 2)))) (+ (* 1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (pow (sin k) 2)))) (* 1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (pow (sin k) 2))))))) (pow t 3)))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (* -1 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (pow (sqrt -1) 2)))))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) #s(hole binary64 (* -1 (/ (pow l 2) (* (pow t 3) (pow (sqrt -1) 2))))))
#s(approx (pow t 3/2) #s(hole binary64 (* (sqrt (pow t 3)) (pow (sqrt -1) 2))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (* -1 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (pow (sqrt -1) 2)))))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2)))) (pow t 3)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (pow t 3)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (cos k))) (* (pow t 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* -1/8 (/ (* (pow k 6) (* (pow l 2) (cos k))) (* (pow t 6) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (+ (* 1/4 (/ (* (pow k 4) (* (pow l 2) (cos k))) (* (pow t 4) (* (pow (sin k) 2) (pow (sqrt -1) 2))))) (/ (* (pow l 2) (cos k)) (* (pow (sin k) 2) (pow (sqrt -1) 2)))))) (pow t 3)))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* -2 (/ (* (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)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* -1 (* (pow t 3) (+ (* 2 (/ (* (pow (sin k) 2) (pow (sqrt -1) 2)) (* (pow l 2) (cos k)))) (/ (* (pow k 2) (* (pow (sin k) 2) (pow (sqrt -1) 2))) (* (pow l 2) (* (pow t 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 (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (log l) 2) #s(hole binary64 (* 2 (log l))))
#s(approx (log l) #s(hole binary64 (log l)))
#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) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (/ (* l l) (* k k)) #s(hole binary64 (/ (pow l 2) (pow k 2))))
#s(approx (* (/ (* l l) (* k k)) (cos k)) #s(hole binary64 (/ (* (pow l 2) (cos k)) (pow k 2))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (* 2 (/ (* (pow l 2) (cos k)) (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (/ (* (pow t 3) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (* (pow l 2) (cos k)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* 3 (log t)) (* -2 (log (/ 1 l))))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* -2 (log (/ 1 l)))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* -2 (log (/ 1 l))))))
#s(approx (* (log l) 2) #s(hole binary64 (* -2 (log (/ 1 l)))))
#s(approx (log l) #s(hole binary64 (* -1 (log (/ 1 l)))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (* 2 (/ (cos k) (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l))))))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l))))))) (* (pow (sin k) 2) (+ 2 (/ (pow k 2) (pow t 2))))) (cos k))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (/ (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l))))))) (pow (sin k) 2)) (cos k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l))))))) (sin k))))
#s(approx (exp (- (* (log t) 3) (* (log l) 2))) #s(hole binary64 (exp (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l)))))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) #s(hole binary64 (- (* 3 (log t)) (* 2 (+ (log -1) (* -1 (log (/ -1 l))))))))
#s(approx (* (log l) 2) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 l)))))))
#s(approx (log l) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 l))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ 1 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (+ 1/3 (/ 1 (pow t 2)))) (exp (- (* 3 (log t)) (* 2 (log l)))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (- (* 3 (log t)) (* 2 (log l)))))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* (pow k 2) (- (* -1 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (+ (* -1/4 (/ (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2)))) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))) (exp (- (* 3 (log t)) (* 2 (log l)))))))))) (+ (* -1/4 (/ (pow (+ 1/3 (/ 1 (pow t 2))) 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/2 (/ (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (exp (- (* 3 (log t)) (* 2 (log l))))))))) (* 1/2 (/ (+ 1/3 (/ 1 (pow t 2))) (exp (- (* 3 (log t)) (* 2 (log l)))))))) (/ 1 (exp (- (* 3 (log t)) (* 2 (log l)))))) (pow k 2))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* 2 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))))))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 1/3 (/ 1 (pow t 2)))) (* (pow k 2) (+ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* 1/6 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* 31/360 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/6 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) #s(hole binary64 (* (pow k 2) (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* 1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* 173/5040 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 31/360 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (exp (- (* 3 (log t)) (* 2 (log l)))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* -1/6 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* -1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* 1/120 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l))))))))))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) #s(hole binary64 (* k (+ (exp (- (* 3 (log t)) (* 2 (log l)))) (* (pow k 2) (+ (* -1/6 (exp (- (* 3 (log t)) (* 2 (log l))))) (* (pow k 2) (+ (* -1/5040 (* (pow k 2) (exp (- (* 3 (log t)) (* 2 (log l)))))) (* 1/120 (exp (- (* 3 (log t)) (* 2 (log l)))))))))))))
#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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* 1/24 (/ (pow l 2) (pow t 3))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3))))) (* 2/45 (/ (pow l 2) (pow t 3))))))) (* -1/3 (/ (pow l 2) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (+ (* 1/24 (/ (pow l 2) (pow t 3))) (* (pow k 2) (- (* -1/720 (/ (pow l 2) (pow t 3))) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) (pow t 3))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3))))) (* 2/45 (/ (pow l 2) (pow t 3)))))) (+ (* -1/315 (/ (pow l 2) (pow t 3))) (* 2/45 (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3)))))))))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) (pow t 3))) (* -1/3 (/ (pow l 2) (pow t 3))))) (* 2/45 (/ (pow l 2) (pow t 3))))))) (* -1/3 (/ (pow l 2) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ 1 (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ (+ 1 (* -1/6 (pow k 2))) (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ (+ 1 (* (pow k 2) (- (* -7/120 (pow k 2)) 1/6))) (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ (+ 1 (* (pow k 2) (- (* (pow k 2) (- (* -31/3024 (pow k 2)) 7/120)) 1/6))) (pow k 2))))
#s(approx (/ (+ (* -1/6 (* k k)) 1) (* k k)) #s(hole binary64 (/ 1 (pow k 2))))
#s(approx (/ (+ (* -1/6 (* k k)) 1) (* k k)) #s(hole binary64 (/ (+ 1 (* -1/6 (pow k 2))) (pow k 2))))
#s(approx (+ (* -1/6 (* k k)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/6 (* k k)) 1) #s(hole binary64 (+ 1 (* -1/6 (pow k 2)))))
#s(approx (* -1/6 (* k k)) #s(hole binary64 (* -1/6 (pow k 2))))
#s(approx (* k k) #s(hole binary64 (pow k 2)))
#s(approx (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) #s(hole binary64 (* 2 (/ (pow l 2) (* (pow k 4) t)))))
#s(approx (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) #s(hole binary64 (/ (+ (* 2 (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))) (* 2 (/ (pow l 2) t))) (pow k 4))))
#s(approx (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))) (pow k 4))))
#s(approx (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) #s(hole binary64 (/ (+ (* 2 (/ (pow l 2) t)) (* (pow k 2) (+ (* 2 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* (pow k 2) (+ (* 2 (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (* 2 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))))))) (pow k 4))))
#s(approx (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (pow l 2) (* (pow k 4) t))))
#s(approx (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* (pow k 2) (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) t)) (* (pow k 2) (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) #s(hole binary64 (/ (+ (* (pow k 2) (- (+ (* -1/2 (/ (pow l 2) t)) (* (pow k 2) (- (+ (* 1/24 (/ (pow l 2) t)) (* (pow k 2) (- (* -1/720 (/ (pow l 2) t)) (+ (* -1/3 (- (* 1/24 (/ (pow l 2) t)) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t))))) (+ (* -1/315 (/ (pow l 2) t)) (* 2/45 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t))))))))) (+ (* -1/3 (- (* -1/2 (/ (pow l 2) t)) (* -1/3 (/ (pow l 2) t)))) (* 2/45 (/ (pow l 2) t)))))) (* -1/3 (/ (pow l 2) t)))) (/ (pow l 2) t)) (pow k 4))))
#s(approx (* (/ (* l l) (* k k)) (cos k)) #s(hole binary64 (/ (pow l 2) (pow k 2))))
#s(approx (* (/ (* l l) (* k k)) (cos k)) #s(hole binary64 (/ (+ (* -1/2 (* (pow k 2) (pow l 2))) (pow l 2)) (pow k 2))))
#s(approx (* (/ (* l l) (* k k)) (cos k)) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (pow l 2)) (* 1/24 (* (pow k 2) (pow l 2))))) (pow l 2)) (pow k 2))))
#s(approx (* (/ (* l l) (* k k)) (cos k)) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (pow l 2)) (* (pow k 2) (+ (* -1/720 (* (pow k 2) (pow l 2))) (* 1/24 (pow l 2)))))) (pow l 2)) (pow k 2))))
#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 (* (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 (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (pow l 2) (* (pow k 2) (pow t 3)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* (pow k 2) (* (pow l 2) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* (pow k 2) (+ (* -1/2 (/ (* (pow l 2) (+ 1/3 (/ 1 (pow t 2)))) (pow t 3))) (* (pow k 2) (+ (* -2 (* (pow k 2) (+ (* -1/2 (* (+ 1/3 (/ 1 (pow t 2))) (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3)))))) (+ (* -1/8 (/ (* (pow l 2) (* (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))) (+ 1/3 (/ 1 (pow t 2))))) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))) (pow t 3))))))) (* -2 (+ (* -1/8 (/ (* (pow l 2) (pow (+ 1/3 (/ 1 (pow t 2))) 2)) (pow t 3))) (* 1/4 (/ (* (pow l 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow t 3))))))))) (/ (pow l 2) (pow t 3))) (pow k 2))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* 2 (/ (* (pow k 2) (pow t 3)) (pow l 2)))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (/ (* (pow k 2) (* (pow t 3) (+ 1/3 (/ 1 (pow t 2))))) (pow l 2))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2))))))) (pow l 2)) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow t 3) (pow l 2))) (* (pow k 2) (+ (* (pow k 2) (+ (/ (* (pow k 2) (* (pow t 3) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2)))))))) (pow l 2)) (/ (* (pow t 3) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (pow l 2)))) (/ (* (pow t 3) (+ 1/3 (/ 1 (pow t 2)))) (pow l 2))))))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (* 2 (pow k 2))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (+ 1/3 (/ 1 (pow t 2))))))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (+ 1/3 (+ (* (pow k 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (* 1/3 (/ 1 (pow t 2)))))) (/ 1 (pow t 2)))))))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (* (pow k 2) (+ 2 (* (pow k 2) (+ 1/3 (+ (* (pow k 2) (+ 17/60 (+ (* -1/6 (+ 2/3 (/ 1 (pow t 2)))) (+ (* 1/3 (/ 1 (pow t 2))) (* (pow k 2) (+ 271/2520 (+ (* -1/6 (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (+ (* 1/120 (+ 2/3 (/ 1 (pow t 2)))) (* 2/15 (/ 1 (pow t 2))))))))))) (/ 1 (pow t 2)))))))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (* 2 k)))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (* k (+ 2 (* (pow k 2) (+ 2/3 (/ 1 (pow t 2))))))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (* k (+ 2 (* (pow k 2) (+ 2/3 (+ (* (pow k 2) (+ 4/15 (* 1/3 (/ 1 (pow t 2))))) (/ 1 (pow t 2)))))))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (* k (+ 2 (* (pow k 2) (+ 2/3 (+ (* (pow k 2) (+ 4/15 (+ (* 1/3 (/ 1 (pow t 2))) (* (pow k 2) (+ 34/315 (* 2/15 (/ 1 (pow t 2)))))))) (/ 1 (pow t 2)))))))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))) (* 8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (- (+ (* -16 (/ (* (pow t 8) (cos k)) (* (pow k 6) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 2 (/ (* (pow t 2) (cos k)) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (+ (* -8 (/ (* (pow t 6) (cos k)) (* (pow k 4) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))) (* 4 (/ (* (pow t 4) (cos k)) (* (pow k 2) (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (* (pow k 2) (cos k)))) (/ (* (exp (- (* 3 (log t)) (* 2 (log l)))) (pow (sin k) 2)) (* (pow t 2) (cos k)))))))
#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)) 1) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))
#s(approx (+ 1 (pow (/ k t) 2)) #s(hole binary64 (* (pow k 2) (+ (/ 1 (pow k 2)) (/ 1 (pow t 2))))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (/ (cos k) (pow (sin k) 2)) #s(hole binary64 (/ (cos k) (pow (sin k) 2))))
#s(approx (/ (+ (* -1/6 (* k k)) 1) (* k k)) #s(hole binary64 -1/6))
#s(approx (/ (+ (* -1/6 (* k k)) 1) (* k k)) #s(hole binary64 (- (/ 1 (pow k 2)) 1/6)))
#s(approx (+ (* -1/6 (* k k)) 1) #s(hole binary64 (* -1/6 (pow k 2))))
#s(approx (+ (* -1/6 (* k k)) 1) #s(hole binary64 (* (pow k 2) (- (/ 1 (pow k 2)) 1/6))))
#s(approx (cos k) #s(hole binary64 (cos k)))
#s(approx (pow (sin k) 2) #s(hole binary64 (pow (sin k) 2)))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2))))) (pow k 2))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2)))))) (pow k 2))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) #s(hole binary64 (/ (+ (* -16 (/ (* (pow l 2) (* (pow t 5) (cos k))) (* (pow k 6) (pow (sin k) 2)))) (+ (* -4 (/ (* (pow l 2) (* t (cos k))) (* (pow k 2) (pow (sin k) 2)))) (+ (* 2 (/ (* (pow l 2) (cos k)) (* t (pow (sin k) 2)))) (* 8 (/ (* (pow l 2) (* (pow t 3) (cos k))) (* (pow k 4) (pow (sin k) 2))))))) (pow k 2))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (* (pow t 3) (pow (sin k) 2)) (* (pow k 2) (* (pow l 2) (cos k))))) (/ (* t (pow (sin k) 2)) (* (pow l 2) (cos k)))))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (pow (sin k) 2) (* (pow k 2) (cos k)))) (/ (pow (sin k) 2) (* (pow t 2) (cos k)))))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ (sin k) (* (pow k 2) (cos k)))) (/ (sin k) (* (pow t 2) (cos k)))))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(hole binary64 (* (pow k 2) (+ (* 2 (/ 1 (pow k 2))) (/ 1 (pow t 2))))))

Outputs
(/.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 (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) (.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))))
#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 (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 (+.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)) (.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 (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 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (tan.f64 k))) (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (tan.f64 k))) #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) (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 (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 (.f64 (pow.f64 t #s(literal 3 binary64)) (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))
(exp.f64 (log.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)))
(+.f64 (cosh.f64 (log.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (sinh.f64 (log.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))) (log.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l))))
(/.f64 (-.f64 (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64))) (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))))
(-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64)))
(+.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (neg.f64 (log.f64 l)) #s(literal 2 binary64)))
(+.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 #s(literal -2 binary64) (log.f64 l)))
(log.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))
(*.f64 (log.f64 t) #s(literal 3 binary64))
(.f64 #s(literal 3/2 binary64) (log.f64 (.f64 t t)))
(*.f64 #s(literal 3 binary64) (log.f64 t))
(*.f64 #s(literal 2 binary64) (log.f64 (pow.f64 t #s(literal 3/2 binary64))))
(+.f64 (log.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64)))) (log.f64 (neg.f64 (pow.f64 t #s(literal 3/2 binary64)))))
(+.f64 (log.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64)))) (log.f64 (fabs.f64 (pow.f64 t #s(literal 3/2 binary64)))))
(+.f64 (log.f64 (pow.f64 t #s(literal 3/2 binary64))) (log.f64 (pow.f64 t #s(literal 3/2 binary64))))
(+.f64 (log.f64 (*.f64 t t)) (log.f64 t))
(+.f64 (log.f64 t) (log.f64 (*.f64 t t)))
(log.f64 (pow.f64 t #s(literal 3 binary64)))
(log.f64 t)
t
#s(literal 3 binary64)
(*.f64 (log.f64 l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (log.f64 l))
(+.f64 (log.f64 (pow.f64 l #s(literal 1 binary64))) (log.f64 (pow.f64 l #s(literal 1 binary64))))
(+.f64 (log.f64 (neg.f64 l)) (log.f64 (neg.f64 l)))
(+.f64 (log.f64 (fabs.f64 l)) (log.f64 (fabs.f64 l)))
(+.f64 (log.f64 l) (log.f64 l))
(log.f64 (*.f64 l l))
(log.f64 l)
l
(sin.f64 k)
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 (*.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 #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 #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 (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 (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)))
(+.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 (neg.f64 k) (neg.f64 t))
(/.f64 k t)
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (/.f64 l k) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (/.f64 l k) (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64)))
(/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t)
(/.f64 (neg.f64 (ratio-of-squares.f64 l k)) (neg.f64 (pow.f64 t #s(literal 3 binary64))))
(/.f64 (neg.f64 (.f64 l l)) (neg.f64 (.f64 (*.f64 k k) (pow.f64 t #s(literal 3 binary64)))))
(/.f64 (.f64 l l) (.f64 (*.f64 k k) (pow.f64 t #s(literal 3 binary64))))
(/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64)))
(*.f64 (/.f64 l k) (/.f64 l k))
(.f64 l (/.f64 l (.f64 k k)))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 k #s(literal 1 binary64)))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (fabs.f64 k))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (neg.f64 k))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) k)
(ratio-of-squares.f64 (neg.f64 l) (pow.f64 k #s(literal 1 binary64)))
(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) (pow.f64 k #s(literal 1 binary64)))
(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 (pow.f64 k #s(literal 1 binary64)))
(ratio-of-squares.f64 l (fabs.f64 k))
(ratio-of-squares.f64 l (neg.f64 k))
(ratio-of-squares.f64 l 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))
(*.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 (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 (pow.f64 t #s(literal 3/2 binary64))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 t t)) #s(literal 3/2 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))))
(*.f64 (pow.f64 t #s(literal 1 binary64)) (pow.f64 t #s(literal 1 binary64)))
(*.f64 (neg.f64 t) (neg.f64 t))
(*.f64 (fabs.f64 t) (fabs.f64 t))
(*.f64 t t)
(pow.f64 t #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 t) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 t) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 t) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (/.f64 (+.f64 (.f64 (*.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k))))
(.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (/.f64 (+.f64 (.f64 (*.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k)))
(.f64 #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (/.f64 (+.f64 (.f64 (*.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))))
(/.f64 (.f64 (.f64 l l) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (/.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k))) (pow.f64 t #s(literal 3 binary64)))
(*.f64 (/.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 l (pow.f64 t #s(literal 3/2 binary64))))
(*.f64 l (/.f64 l (pow.f64 t #s(literal 3 binary64))))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 t #s(literal 3/2 binary64)))
(ratio-of-squares.f64 (neg.f64 l) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (neg.f64 l) (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (neg.f64 l) (pow.f64 t #s(literal 3/2 binary64)))
(ratio-of-squares.f64 (fabs.f64 l) (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (fabs.f64 l) (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 (fabs.f64 l) (pow.f64 t #s(literal 3/2 binary64)))
(ratio-of-squares.f64 l (neg.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 l (fabs.f64 (pow.f64 t #s(literal 3/2 binary64))))
(ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))
(/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/4 binary64))) (pow.f64 t #s(literal 3/2 binary64)))
(/.f64 (neg.f64 (*.f64 l l)) (neg.f64 (pow.f64 t #s(literal 3 binary64))))
(/.f64 (*.f64 l l) (pow.f64 t #s(literal 3 binary64)))
(*.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 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 t) #s(literal 3/2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 t) #s(literal 3/2 binary64))) (sinh.f64 (.f64 (log.f64 t) #s(literal 3/2 binary64))))
#s(literal 3/2 binary64)
#s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (/.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k))
(/.f64 (/.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k)
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64))) (neg.f64 (*.f64 k k)))
(/.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (*.f64 k k))
(+.f64 (/.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) (*.f64 k k)) (pow.f64 k #s(literal -2 binary64)))
(+.f64 (pow.f64 k #s(literal -2 binary64)) (/.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) (*.f64 k k)))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) (.f64 (.f64 k k) #s(literal -1/6 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (*.f64 k k) #s(literal -1/6 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) (.f64 (.f64 k k) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (*.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) (.f64 (.f64 k k) #s(literal -1/6 binary64))) (.f64 #s(literal 1 binary64) (.f64 (.f64 k k) #s(literal -1/6 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) (.f64 (.f64 k k) #s(literal -1/6 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
(-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/6 binary64) (.f64 k k)))
(+.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 k k) #s(literal -1/6 binary64)))
(.f64 (.f64 #s(literal -1/6 binary64) k) k)
(.f64 (.f64 k k) #s(literal -1/6 binary64))
(.f64 #s(literal -1/6 binary64) (.f64 k k))
#s(literal -1/6 binary64)
(*.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)))
(+.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 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) t)) #s(literal 2 binary64)))
(.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) t)) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) t)))
(/.f64 (.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (ratio-of-squares.f64 l k)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))
(*.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) t))
(.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)))
(/.f64 (/.f64 (*.f64 #s(approx (cos k) #s(literal 1 binary64)) (ratio-of-squares.f64 l k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) t)
(/.f64 (neg.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (ratio-of-squares.f64 l k))) (neg.f64 (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)))
(/.f64 (.f64 #s(approx (cos k) #s(literal 1 binary64)) (ratio-of-squares.f64 l k)) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))
(*.f64 #s(approx (cos k) #s(literal 1 binary64)) (ratio-of-squares.f64 l k))
(*.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64)))
(/.f64 (.f64 (.f64 l l) #s(approx (cos k) #s(literal 1 binary64))) (*.f64 k k))
#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)))
(*.f64 (pow.f64 (sin.f64 k) #s(literal 1 binary64)) (pow.f64 (sin.f64 k) #s(literal 1 binary64)))
(*.f64 (sin.f64 k) (sin.f64 k))
(pow.f64 (sin.f64 k) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 k k)) (cos.f64 (*.f64 k #s(literal 2 binary64)))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.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))))
(/.f64 (/.f64 #s(literal 2 binary64) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (.f64 (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)) (sin.f64 k)))
(/.f64 #s(literal -2 binary64) (neg.f64 (.f64 (.f64 (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)) (sin.f64 k)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)) (sin.f64 k)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)))
(.f64 (.f64 (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)) (sin.f64 k)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))
(.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (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 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)))
(/.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (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))
(exp.f64 (log.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)))
(+.f64 (cosh.f64 (log.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (sinh.f64 (log.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))))
(.f64 (.f64 (sin.f64 k) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64))) (tan.f64 k))
(.f64 (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)) (sin.f64 k))
(.f64 (sin.f64 k) (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)))
(*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k))
(*.f64 (tan.f64 k) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (ratio-of-squares.f64 k t) (ratio-of-squares.f64 k t)) #s(literal 4 binary64)) (-.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 (ratio-of-squares.f64 k t) (ratio-of-squares.f64 k t))) (-.f64 #s(literal 2 binary64) (ratio-of-squares.f64 k t)))
(/.f64 (+.f64 (pow.f64 (ratio-of-squares.f64 k t) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 (.f64 (ratio-of-squares.f64 k t) (ratio-of-squares.f64 k t)) (-.f64 #s(literal 4 binary64) (.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 8 binary64) (pow.f64 (ratio-of-squares.f64 k t) #s(literal 3 binary64))) (+.f64 #s(literal 4 binary64) (-.f64 (.f64 (ratio-of-squares.f64 k t) (ratio-of-squares.f64 k t)) (.f64 #s(literal 2 binary64) (ratio-of-squares.f64 k t)))))
(+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64))
(+.f64 #s(literal 2 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)))
(+.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))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 t k) (/.f64 (cos.f64 k) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #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 (.f64 (ratio-of-squares.f64 t (.f64 k k)) (/.f64 (cos.f64 k) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (/.f64 (cos.f64 k) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (.f64 k k))))) (.f64 t 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 (ratio-of-squares.f64 t (pow.f64 k #s(literal 3 binary64))) (/.f64 (cos.f64 k) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 8 binary64)) (.f64 #s(literal -4 binary64) (/.f64 (cos.f64 k) (.f64 (pow.f64 k #s(literal 4 binary64)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))))) (.f64 t t)) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (.f64 k k)))) (.f64 t 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 (.f64 (.f64 (ratio-of-squares.f64 t (pow.f64 k #s(literal 4 binary64))) (/.f64 (cos.f64 k) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -16 binary64)) (.f64 #s(literal 8 binary64) (/.f64 (cos.f64 k) (.f64 (pow.f64 k #s(literal 6 binary64)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))))) (.f64 t t)) (/.f64 (.f64 #s(literal 4 binary64) (cos.f64 k)) (.f64 (pow.f64 k #s(literal 4 binary64)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 t t)) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (.f64 k k)))) (*.f64 t t)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (ratio-of-squares.f64 k t) (.f64 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (+.f64 (.f64 (.f64 k k) (.f64 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)))) (.f64 (.f64 (.f64 t t) (.f64 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)))) #s(literal 2 binary64))) (.f64 t t)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (*.f64 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.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 (- (* (log t) 3) (* (log l) 2)) (log.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)))
#s(approx (* (log t) 3) (*.f64 (log.f64 t) #s(literal 3 binary64)))
#s(approx (log t) (log.f64 t))
#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)) 1) (/.f64 (+.f64 (.f64 (.f64 t t) #s(literal 2 binary64)) (.f64 k k)) (.f64 t 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) (ratio-of-squares.f64 t t)))
#s(approx (/ (* k k) (* t t)) (ratio-of-squares.f64 k t))
#s(approx (/ k t) (/.f64 k t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) t)) #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 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #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 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 8 binary64)) (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64))) (.f64 t t)) (.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 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 (+.f64 (.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 4 binary64))) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -16 binary64)) (.f64 #s(literal -8 binary64) (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 t t)) (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64))) (.f64 t t)) (.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) t))
#s(approx (/ (/ (* l l) (* k k)) (* (* t t) t)) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (* (* t t) t) (pow.f64 t #s(literal 3 binary64)))
#s(approx (* t t) (*.f64 t t))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (pow t 3/2) (pow.f64 t #s(literal 3/2 binary64)))
#s(approx (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) t)) #s(literal 2 binary64)))
#s(approx (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) (*.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) t)))
#s(approx (* (pow (sin k) 2) t) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) t))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 8 binary64)) (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64))) (.f64 t t)) (.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) t))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 4 binary64))) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -16 binary64)) (.f64 #s(literal -8 binary64) (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 t t)) (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64))) (.f64 t t)) (.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) t))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (.f64 (ratio-of-squares.f64 k l) (/.f64 (.f64 (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) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (.f64 (+.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 t l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) #s(literal 2 binary64))) t))
#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 (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (*.f64 (ratio-of-squares.f64 k t) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (/.f64 (+.f64 (/.f64 (pow.f64 (.f64 k (sin.f64 k)) #s(literal 2 binary64)) (cos.f64 k)) (.f64 (/.f64 (pow.f64 (.f64 t (sin.f64 k)) #s(literal 2 binary64)) (cos.f64 k)) #s(literal 2 binary64))) (.f64 t t)))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) (*.f64 (ratio-of-squares.f64 k t) (tan.f64 k)))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) (/.f64 (+.f64 (.f64 (.f64 k k) (tan.f64 k)) (.f64 (.f64 (.f64 t t) (tan.f64 k)) #s(literal 2 binary64))) (.f64 t t)))
#s(approx (+ (/ (* k k) (* t t)) 2) (ratio-of-squares.f64 k t))
#s(approx (+ (/ (* k k) (* t t)) 2) (/.f64 (+.f64 (.f64 (.f64 t t) #s(literal 2 binary64)) (.f64 k k)) (.f64 t t)))
#s(approx (/ (* k k) (* t t)) (ratio-of-squares.f64 k t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (cos.f64 k) (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal -1 binary64)) #s(literal -3 binary64)) (.f64 l l)) (pow.f64 (sin.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 (.f64 (ratio-of-squares.f64 k t) (/.f64 (cos.f64 k) (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal -1 binary64)) #s(literal -3 binary64)) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64)) (/.f64 (cos.f64 k) (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal -1 binary64)) #s(literal -3 binary64)) (.f64 l l)) (pow.f64 (sin.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 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (/.f64 (cos.f64 k) (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal -1 binary64)) #s(literal -3 binary64)) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (-.f64 (/.f64 (cos.f64 k) (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal -1 binary64)) #s(literal -3 binary64)) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (ratio-of-squares.f64 k t) (/.f64 (cos.f64 k) (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal -1 binary64)) #s(literal -3 binary64)) (.f64 l l)) (pow.f64 (sin.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 (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 k #s(literal 3 binary64)) (pow.f64 t #s(literal 3 binary64))) (/.f64 (cos.f64 k) (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal -1 binary64)) #s(literal -3 binary64)) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/8 binary64)) (/.f64 (cos.f64 k) (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal -1 binary64)) #s(literal -3 binary64)) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (/.f64 (cos.f64 k) (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal -1 binary64)) #s(literal -3 binary64)) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (cos.f64 k) (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal -1 binary64)) #s(literal -3 binary64)) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal -1 binary64)) #s(literal -3 binary64)) (*.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (cos.f64 k)) #s(literal 2 binary64)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (+.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal -1 binary64)) #s(literal -3 binary64)) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (cos.f64 k))) (.f64 (/.f64 (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal -1 binary64)) #s(literal -3 binary64)) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (cos.f64 k)) #s(literal 2 binary64))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (/.f64 (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal -1 binary64)) #s(literal -3 binary64)) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (cos.f64 k)))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (/.f64 (pow.f64 (pow.f64 t #s(literal -1 binary64)) #s(literal -3 binary64)) (.f64 l l)) (sin.f64 k)))
#s(approx (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (/.f64 (pow.f64 (pow.f64 t #s(literal -1 binary64)) #s(literal -3 binary64)) (*.f64 l l)))
#s(approx (- (* (log t) 3) (* (log l) 2)) (-.f64 (.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64))))
#s(approx (* (log t) 3) (*.f64 (neg.f64 (log.f64 t)) #s(literal -3 binary64)))
#s(approx (log t) (neg.f64 (neg.f64 (log.f64 t))))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))
#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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.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 (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 k #s(literal 3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/8 binary64)) (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (/.f64 (+.f64 (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 k #s(literal 3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/8 binary64)) (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64)))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (.f64 (+.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (ratio-of-squares.f64 (sin.f64 k) t) (cos.f64 k))) (*.f64 (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k)) #s(literal 2 binary64))) (pow.f64 t #s(literal 3 binary64))))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (/.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (cos.f64 k)))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (cos.f64 k)) (.f64 (ratio-of-squares.f64 k t) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) (*.f64 (tan.f64 k) #s(literal 2 binary64)))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) (+.f64 (.f64 (tan.f64 k) #s(literal 2 binary64)) (.f64 (ratio-of-squares.f64 k t) (tan.f64 k))))
#s(approx (+ (/ (* k k) (* t t)) 2) #s(literal 2 binary64))
#s(approx (+ (/ (* k k) (* t t)) 2) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (/.f64 (cos.f64 k) (/.f64 (exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64))) (*.f64 l l))) (pow.f64 (sin.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 (.f64 (ratio-of-squares.f64 k t) (/.f64 (/.f64 (cos.f64 k) (/.f64 (exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64))) (.f64 l l))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (/.f64 (/.f64 (cos.f64 k) (/.f64 (exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64))) (.f64 l l))) (pow.f64 (sin.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 (.f64 (/.f64 (/.f64 (.f64 (pow.f64 k #s(literal 4 binary64)) (cos.f64 k)) (pow.f64 t #s(literal 4 binary64))) (.f64 (/.f64 (exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64))) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 1/4 binary64)) (/.f64 (/.f64 (cos.f64 k) (/.f64 (exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64))) (.f64 l l))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (/.f64 (cos.f64 k) (/.f64 (exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64))) (.f64 l l))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 1/2 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 (pow.f64 k #s(literal 6 binary64)) (cos.f64 k)) (pow.f64 t #s(literal 6 binary64))) (.f64 (/.f64 (exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64))) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/8 binary64)) (/.f64 (/.f64 (cos.f64 k) (/.f64 (exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64))) (.f64 l l))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) (-.f64 (.f64 (/.f64 (/.f64 (.f64 (pow.f64 k #s(literal 4 binary64)) (cos.f64 k)) (pow.f64 t #s(literal 4 binary64))) (.f64 (/.f64 (exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64))) (.f64 l l)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/4 binary64)) (.f64 (.f64 (ratio-of-squares.f64 k t) (/.f64 (/.f64 (cos.f64 k) (/.f64 (exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64))) (.f64 l l))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -1/2 binary64)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64))) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) #s(literal 2 binary64)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (+.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (/.f64 (exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64))) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))) (.f64 (.f64 (/.f64 (exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64))) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) #s(literal 2 binary64))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (.f64 (/.f64 (exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64))) (.f64 l l)) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (/.f64 (exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64))) (.f64 l l)) (sin.f64 k)))
#s(approx (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (/.f64 (exp.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64))) (*.f64 l l)))
#s(approx (- (* (log t) 3) (* (log l) 2)) (-.f64 (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64)) (*.f64 (log.f64 l) #s(literal 2 binary64))))
#s(approx (* (log t) 3) (.f64 (log.f64 (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #s(literal -1 binary64)) #s(literal -1 binary64))) #s(literal 3 binary64)))
#s(approx (log t) (log.f64 (*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) t) #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))) (neg.f64 (/.f64 (-.f64 (neg.f64 (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/4 binary64))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 1/2 binary64))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (neg.f64 (/.f64 (+.f64 (+.f64 (neg.f64 (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/4 binary64))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 k #s(literal 3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (.f64 l l) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -1/2 binary64)))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (neg.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))))
#s(approx (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (neg.f64 (/.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1 binary64))))
#s(approx (pow t 3/2) (*.f64 #s(literal -1 binary64) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (neg.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (neg.f64 (/.f64 (+.f64 (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal 1/4 binary64)) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) (.f64 (.f64 (ratio-of-squares.f64 k t) (*.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 k #s(literal 3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal -1/8 binary64)) (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (.f64 k k) (.f64 t t)) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal 1/4 binary64)) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64))))) (.f64 (.f64 (ratio-of-squares.f64 k t) (.f64 (ratio-of-squares.f64 l (sin.f64 k)) (/.f64 (cos.f64 k) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (pow.f64 t #s(literal 3 binary64)))))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (.f64 (.f64 (pow.f64 t #s(literal 3 binary64)) (*.f64 (ratio-of-squares.f64 (sin.f64 k) l) (/.f64 #s(literal -1 binary64) (cos.f64 k)))) #s(literal -2 binary64)))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (neg.f64 (.f64 (+.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (.f64 (.f64 t t) (cos.f64 k)))) (.f64 (*.f64 (ratio-of-squares.f64 (sin.f64 k) l) (/.f64 #s(literal -1 binary64) (cos.f64 k))) #s(literal 2 binary64))) (pow.f64 t #s(literal 3 binary64)))))
#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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (.f64 #s(literal 2 binary64) (cos.f64 k)) (.f64 (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (/.f64 (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64))) (cos.f64 k)))
#s(approx (* (log l) 2) (*.f64 (log.f64 l) #s(literal 2 binary64)))
#s(approx (log l) (log.f64 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 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 2 binary64)))
#s(approx (/ (* l l) (* k k)) (ratio-of-squares.f64 l k))
#s(approx (* (/ (* l l) (* k k)) (cos k)) (*.f64 (cos.f64 k) (ratio-of-squares.f64 l k)))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 2 binary64)))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (/.f64 (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64))) (cos.f64 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 (pow.f64 t #s(literal 3 binary64)) (pow.f64 (pow.f64 l #s(literal -1 binary64)) #s(literal -2 binary64)))) (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 (pow.f64 l #s(literal -1 binary64)) #s(literal -2 binary64))) (/.f64 (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (cos.f64 k))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (/.f64 (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 (pow.f64 l #s(literal -1 binary64)) #s(literal -2 binary64))) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (cos.f64 k)))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (*.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 (pow.f64 l #s(literal -1 binary64)) #s(literal -2 binary64))) (sin.f64 k)))
#s(approx (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (/.f64 (pow.f64 t #s(literal 3 binary64)) (pow.f64 (pow.f64 l #s(literal -1 binary64)) #s(literal -2 binary64))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64))))
#s(approx (* (log l) 2) (*.f64 (neg.f64 (log.f64 l)) #s(literal -2 binary64)))
#s(approx (log l) (neg.f64 (neg.f64 (log.f64 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) (cos.f64 k)) (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (+.f64 #s(literal 0 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))) (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (+.f64 #s(literal 0 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))) (/.f64 (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) (cos.f64 k))))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (+.f64 #s(literal 0 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (+.f64 #s(literal 0 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))) (sin.f64 k)))
#s(approx (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (/.f64 (pow.f64 t #s(literal 3 binary64)) (exp.f64 (+.f64 #s(literal 0 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))))
#s(approx (- (* (log t) 3) (* (log l) 2)) (-.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (+.f64 #s(literal 0 binary64) (.f64 #s(literal 2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l)))))))
#s(approx (* (log l) 2) (+.f64 #s(literal 0 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) l))))))
#s(approx (log l) (log.f64 (*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) l) #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 (pow.f64 k #s(literal -2 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (pow.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal -1 binary64)) (.f64 (.f64 (.f64 k k) (/.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) #s(literal -1/2 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 (-.f64 (neg.f64 (.f64 (+.f64 (.f64 (/.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal 1/2 binary64)) (.f64 (ratio-of-squares.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (/.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal -1/4 binary64))) (.f64 k k))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (.f64 k k)) (pow.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #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 (-.f64 (.f64 (-.f64 (neg.f64 (.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (+.f64 (.f64 (/.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal 1/2 binary64)) (.f64 (ratio-of-squares.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (/.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal -1/4 binary64)))) (.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (/.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) #s(literal -1/4 binary64))) (.f64 (/.f64 (+.f64 (+.f64 #s(literal 271/2520 binary64) (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 #s(literal -2/15 binary64) (pow.f64 t #s(literal -2 binary64))))) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal 1/2 binary64))) (.f64 k k))) (+.f64 (.f64 (/.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal 1/2 binary64)) (.f64 (ratio-of-squares.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (/.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal -1/4 binary64)))) (.f64 k k)) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (.f64 k k)) (pow.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal -1 binary64))) (*.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (.f64 (*.f64 k k) #s(literal 2 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (+.f64 (.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 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 2 binary64))) (.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 k k)) (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)))) (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 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 2 binary64))) (*.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 k k)) (+.f64 (+.f64 #s(literal 271/2520 binary64) (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 #s(literal -2/15 binary64) (pow.f64 t #s(literal -2 binary64)))))) (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (.f64 k k)) (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 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 2 binary64))) (.f64 k k)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 k k)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (.f64 (-.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) (*.f64 k k)))
#s(approx (* (* (exp (- (* (log t) 3) (* (log l) 2))) (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 #s(literal 31/360 binary64) (.f64 k k)) (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 (* (* (exp (- (* (log t) 3) (* (log l) 2))) (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 #s(literal 173/5040 binary64) (.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)) (*.f64 k k)))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (*.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) k))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (-.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (.f64 #s(literal 1/6 binary64) (.f64 k k)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l))) k))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 1/120 binary64) (.f64 k k)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (.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)) k))
#s(approx (* (exp (- (* (log t) 3) (* (log l) 2))) (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 (.f64 #s(literal -1/5040 binary64) (.f64 k k)) (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)) k))
#s(approx (sin k) k)
#s(approx (sin k) (.f64 (+.f64 (.f64 (*.f64 k k) #s(literal -1/6 binary64)) #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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 k l) #s(literal 2 binary64)) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 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 (-.f64 (.f64 (.f64 #s(literal -2 binary64) (.f64 k k)) (-.f64 (.f64 (/.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 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 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 271/2520 binary64) (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 #s(literal -2/15 binary64) (pow.f64 t #s(literal -2 binary64))))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (-.f64 (.f64 (/.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))))) (.f64 k k)) (-.f64 (.f64 (/.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))))) (.f64 k k)) (.f64 (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.f64 k k)))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (/.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/6 binary64)) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.f64 k k)))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (/.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))))) (.f64 k k)) (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))))) (.f64 #s(literal -1/3 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (*.f64 k k)))
#s(approx (* (/ (* l l) (* (pow t 3/2) (pow t 3/2))) (/ (cos k) (pow (sin k) 2))) (/.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -1/720 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (+.f64 (-.f64 (.f64 #s(literal -1/315 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.f64 #s(literal -2/45 binary64) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/6 binary64)))) (.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))))) #s(literal -1/3 binary64)))) (.f64 k k)) (.f64 #s(literal 1/24 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))))) (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))))) (.f64 k k)) (.f64 #s(literal -1/2 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))))) (.f64 #s(literal -1/3 binary64) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.f64 k k)))
#s(approx (/ (cos k) (pow (sin k) 2)) (pow.f64 k #s(literal -2 binary64)))
#s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (/.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k))
#s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -7/120 binary64) (.f64 k k)) #s(literal 1/6 binary64)) (.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -31/3024 binary64) (.f64 k k)) #s(literal 7/120 binary64)) (.f64 k k)) #s(literal 1/6 binary64)) (.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))
#s(approx (/ (+ (* -1/6 (* k k)) 1) (* k k)) (pow.f64 k #s(literal -2 binary64)))
#s(approx (/ (+ (* -1/6 (* k k)) 1) (* k k)) (/.f64 (/.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k))
#s(approx (+ (* -1/6 (* k k)) 1) #s(literal 1 binary64))
#s(approx (+ (* -1/6 (* k k)) 1) (+.f64 (.f64 (.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
#s(approx (* -1/6 (* k k)) (.f64 (.f64 k k) #s(literal -1/6 binary64)))
#s(approx (* k k) (*.f64 k k))
#s(approx (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) (.f64 (/.f64 (ratio-of-squares.f64 l (.f64 k k)) t) #s(literal 2 binary64)))
#s(approx (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) (/.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) (.f64 k k)) (/.f64 (.f64 l l) t))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) (/.f64 (+.f64 (.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) 2) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/720 binary64)) (+.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/315 binary64)) (.f64 #s(literal -2/45 binary64) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)))) (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))) #s(literal -1/3 binary64)))) (.f64 k k)) (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))))) (.f64 k k)) (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal 2 binary64))) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t))
#s(approx (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) (.f64 k k)) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/2 binary64))) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/3 binary64))) (.f64 k k)) (/.f64 (.f64 l l) t)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (/ (* (/ (* l l) (* k k)) (cos k)) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (+.f64 (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/720 binary64)) (+.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/315 binary64)) (.f64 #s(literal -2/45 binary64) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)))) (.f64 (-.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))) #s(literal -1/3 binary64)))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal 1/24 binary64))) (-.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) #s(literal -1/3 binary64)) (.f64 #s(literal -2/45 binary64) (/.f64 (.f64 l l) t)))) (.f64 k k)) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/2 binary64))) (.f64 (/.f64 (.f64 l l) t) #s(literal -1/3 binary64))) (.f64 k k)) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64))))
#s(approx (* (/ (* l l) (* k k)) (cos k)) (ratio-of-squares.f64 l k))
#s(approx (* (/ (* l l) (* k k)) (cos k)) (/.f64 (+.f64 (.f64 (pow.f64 (.f64 k l) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (.f64 l l)) (.f64 k k)))
#s(approx (* (/ (* l l) (* k k)) (cos k)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (pow.f64 (.f64 k l) #s(literal 2 binary64)) #s(literal 1/24 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 l l))) (.f64 k k)) (.f64 l l)) (.f64 k k)))
#s(approx (* (/ (* l l) (* k k)) (cos k)) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (-.f64 (.f64 (pow.f64 (.f64 k l) #s(literal 2 binary64)) #s(literal -1/720 binary64)) (.f64 #s(literal -1/24 binary64) (.f64 l l))) (.f64 k k)) (.f64 #s(literal -1/2 binary64) (.f64 l l))) (.f64 k k)) (.f64 l l)) (.f64 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 (* (pow (sin k) 2) t) (.f64 (.f64 k k) t))
#s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) 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 (.f64 k k) t) #s(literal -1/315 binary64)) (.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 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 k k))) (.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 (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (/.f64 (+.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 k l) #s(literal 2 binary64)) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.f64 k k)))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (/.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -2 binary64) (.f64 k k)) (-.f64 (.f64 (/.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.f64 k k)))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (+.f64 (.f64 (+.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 271/2520 binary64) (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 #s(literal -2/15 binary64) (pow.f64 t #s(literal -2 binary64))))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))) (.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (-.f64 (.f64 (/.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))))) (.f64 k k)) (-.f64 (.f64 (/.f64 (pow.f64 (.f64 l (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal 2 binary64)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/8 binary64)) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))))))) (.f64 k k)) (.f64 (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 l l)) (pow.f64 t #s(literal 3 binary64))) #s(literal -1/2 binary64))) (.f64 k k)) (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64)))) (.f64 k k)))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (.f64 (.f64 (*.f64 k k) #s(literal 2 binary64)) (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) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (.f64 (+.f64 (/.f64 (.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 k k)) (.f64 l l)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (.f64 (+.f64 (.f64 (/.f64 (+.f64 (.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 t #s(literal 3 binary64))) (.f64 k k)) (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 t #s(literal 3 binary64)))) (.f64 l l)) (.f64 k k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (.f64 (+.f64 (.f64 (+.f64 (.f64 (/.f64 (+.f64 (.f64 (.f64 (+.f64 (+.f64 #s(literal 271/2520 binary64) (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 #s(literal -2/15 binary64) (pow.f64 t #s(literal -2 binary64))))) (pow.f64 t #s(literal 3 binary64))) (.f64 k k)) (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (pow.f64 t #s(literal 3 binary64)))) (.f64 l l)) (.f64 k k)) (/.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (pow.f64 t #s(literal 3 binary64))) (.f64 l l))) (.f64 k k)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(literal 2 binary64))) (.f64 k k)))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (.f64 (.f64 k k) #s(literal 2 binary64)))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 k k)) #s(literal 2 binary64)) (.f64 k k)))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 k k)) (pow.f64 t #s(literal -2 binary64))) #s(literal 1/3 binary64)) (.f64 k k)) #s(literal 2 binary64)) (.f64 k k)))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 (+.f64 (+.f64 #s(literal 17/60 binary64) (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) #s(literal -1/6 binary64))) (+.f64 (.f64 (+.f64 (+.f64 #s(literal 271/2520 binary64) (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) #s(literal -1/6 binary64))) (-.f64 (.f64 #s(literal 1/120 binary64) (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 #s(literal -2/15 binary64) (pow.f64 t #s(literal -2 binary64))))) (.f64 k k)) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)))) (.f64 k k)) (pow.f64 t #s(literal -2 binary64))) #s(literal 1/3 binary64)) (.f64 k k)) #s(literal 2 binary64)) (.f64 k k)))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) (*.f64 k #s(literal 2 binary64)))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) (.f64 (+.f64 (.f64 (+.f64 #s(literal 2/3 binary64) (pow.f64 t #s(literal -2 binary64))) (*.f64 k k)) #s(literal 2 binary64)) k))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 k k)) (pow.f64 t #s(literal -2 binary64))) #s(literal 2/3 binary64)) (.f64 k k)) #s(literal 2 binary64)) k))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) (.f64 (+.f64 (.f64 (+.f64 (+.f64 (.f64 (+.f64 (+.f64 #s(literal 4/15 binary64) (.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64))) (.f64 (+.f64 #s(literal 34/315 binary64) (.f64 #s(literal 2/15 binary64) (pow.f64 t #s(literal -2 binary64)))) (.f64 k k))) (.f64 k k)) (pow.f64 t #s(literal -2 binary64))) #s(literal 2/3 binary64)) (*.f64 k k)) #s(literal 2 binary64)) k))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 t (/.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 (.f64 t t) k) (/.f64 (cos.f64 k) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal -4 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 (.f64 (.f64 (ratio-of-squares.f64 t (/.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 t #s(literal 6 binary64)) (/.f64 (cos.f64 k) (.f64 (pow.f64 k #s(literal 4 binary64)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) #s(literal -8 binary64))) (.f64 (.f64 (ratio-of-squares.f64 (.f64 t t) k) (/.f64 (cos.f64 k) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 4 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 (+.f64 (.f64 (.f64 (pow.f64 t #s(literal 8 binary64)) (/.f64 (cos.f64 k) (.f64 (pow.f64 k #s(literal 6 binary64)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) #s(literal -16 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t (/.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 t #s(literal 6 binary64)) (/.f64 (cos.f64 k) (.f64 (pow.f64 k #s(literal 4 binary64)) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) #s(literal -8 binary64))) (.f64 (.f64 (ratio-of-squares.f64 (.f64 t t) k) (/.f64 (cos.f64 k) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 4 binary64))) (*.f64 k k)))
#s(approx (* (* (* (exp (- (* (log t) 3) (* (log l) 2))) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (+.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (ratio-of-squares.f64 (sin.f64 k) t) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (/.f64 (ratio-of-squares.f64 (sin.f64 k) k) (cos.f64 k))) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (sin k) (sin.f64 k))
#s(approx (tan k) (tan.f64 k))
#s(approx (+ (+ 1 (pow (/ k t) 2)) 1) (.f64 (+.f64 (.f64 (pow.f64 k #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 t #s(literal -2 binary64))) (*.f64 k k)))
#s(approx (+ 1 (pow (/ k t) 2)) (.f64 (+.f64 (pow.f64 k #s(literal -2 binary64)) (pow.f64 t #s(literal -2 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 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 (.f64 l l) t) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 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 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (cos.f64 k) (pow.f64 t #s(literal 3 binary64))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 8 binary64)) (.f64 (.f64 (/.f64 (.f64 l l) t) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 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 (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -16 binary64)) (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (cos.f64 k) (pow.f64 t #s(literal 3 binary64))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 8 binary64)) (.f64 (.f64 (/.f64 (.f64 l l) t) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)))) (.f64 k k)))
#s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))
#s(approx (/ (+ (* -1/6 (* k k)) 1) (* k k)) #s(literal -1/6 binary64))
#s(approx (/ (+ (* -1/6 (* k k)) 1) (* k k)) (-.f64 (pow.f64 k #s(literal -2 binary64)) #s(literal 1/6 binary64)))
#s(approx (+ (* -1/6 (* k k)) 1) (.f64 (.f64 k k) #s(literal -1/6 binary64)))
#s(approx (+ (* -1/6 (* k k)) 1) (.f64 (-.f64 (pow.f64 k #s(literal -2 binary64)) #s(literal 1/6 binary64)) (.f64 k k)))
#s(approx (cos k) (cos.f64 k))
#s(approx (pow (sin k) 2) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 (.f64 l l) t) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) (*.f64 k k)))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (/.f64 (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (cos.f64 k) (pow.f64 t #s(literal 3 binary64))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 8 binary64)) (.f64 (.f64 (/.f64 (.f64 l l) t) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64))) (*.f64 k k)))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (/.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (pow.f64 k #s(literal 3 binary64))) (/.f64 (.f64 (pow.f64 t #s(literal 5 binary64)) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -16 binary64)) (+.f64 (+.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (cos.f64 k) (pow.f64 t #s(literal 3 binary64))) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 8 binary64)) (.f64 (.f64 (/.f64 (.f64 l l) t) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (.f64 (cos.f64 k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)))) (.f64 k k)))
#s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (.f64 (+.f64 (.f64 t (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (.f64 (+.f64 (/.f64 (ratio-of-squares.f64 (sin.f64 k) t) (cos.f64 k)) (.f64 (/.f64 (ratio-of-squares.f64 (sin.f64 k) k) (cos.f64 k)) #s(literal 2 binary64))) (*.f64 k k)))
#s(approx (* (+ (/ (* k k) (* t t)) 2) (tan k)) (+.f64 (.f64 (.f64 k k) (/.f64 (.f64 #s(literal 2 binary64) (sin.f64 k)) (.f64 (.f64 k k) (cos.f64 k)))) (.f64 (ratio-of-squares.f64 k t) (tan.f64 k))))
#s(approx (+ (/ (* k k) (* t t)) 2) (.f64 (+.f64 (.f64 (pow.f64 k #s(literal -2 binary64)) #s(literal 2 binary64)) (pow.f64 t #s(literal -2 binary64))) (*.f64 k k)))

eval1.3s (5.5%)

Memory

56.6MiB live, 564.2MiB allocated; 72ms collecting garbage

Samples

736.0ms	20 228×	0	valid
167.0ms	4 604×	0	invalid

Compiler

Compiled 27 405 to 2 962 computations (89.2% saved)

Precisions

Click to see histograms. Total time spent on operations: 455.0ms

ival-mult: 306.0ms (67.2% of total)

ival-div: 122.0ms (26.8% of total)

ival-true: 13.0ms (2.9% of total)

ival-assert: 9.0ms (2% of total)

adjust: 6.0ms (1.3% of total)

prune1.1s (4.9%)

Memory

-1.3MiB live, 510.0MiB allocated; 61ms collecting garbage

Pruning

57 alts after pruning (53 fresh and 4 done)

	Pruned	Kept	Total
New	579	21	600
Fresh	12	32	44
Picked	3	2	5
Done	1	2	3
Total	595	57	652

Accuracy

98.8%

Counts

652 → 57

Alt Table

Click to see full alt table

Status	Accuracy	Program
	54.4%	(/.f64 (/.f64 #s(literal 2 binary64) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (.f64 (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)) (sin.f64 k)))
✓	54.3%	(/.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)))))
	43.8%	(/.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (.f64 #s(approx (+ (/ ( k k) (* t t)) 2) #s(literal 2 binary64)) (tan.f64 k)))))
	38.8%	(/.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx ( (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 k k)) #s(literal 2 binary64)) (.f64 k k)))))
	45.0%	(/.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 (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 k k))) (.f64 k k))))))
	45.2%	(/.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 (+.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))))))
	45.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) #s(approx (* (sin k) (tan 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))))))
	45.3%	(/.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)))))
	63.8%	(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (.f64 (pow.f64 t #s(literal 3/2 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/4 binary64)) l)) (.f64 (sin.f64 k) (tan.f64 k)))))
	50.0%	(/.f64 #s(literal 2 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 (.f64 k k) (*.f64 t t)) #s(literal 2 binary64)))))
	45.6%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 (tan.f64 k) #s(approx (+ (/ ( k k) (* t t)) 2) (ratio-of-squares.f64 k t)))))
	48.5%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 (tan.f64 k) #s(approx (+ (/ ( k k) (* t t)) 2) #s(literal 2 binary64)))))
	50.7%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 #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)) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))))
	47.3%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) #s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (*.f64 k #s(literal 2 binary64)))))
	73.2%	(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (/.f64 (-.f64 (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64))) (.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))))
	63.0%	(/.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)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #s(literal 2 binary64))))
	44.7%	(/.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)))))
	48.1%	(/.f64 #s(literal 2 binary64) #s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (.f64 (+.f64 (.f64 t (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64))) (*.f64 k k))))
	68.5%	(/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))) t)))
	69.9%	(/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) t)))
	61.5%	(/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #s(literal 2 binary64))) t)))
	68.5%	(/.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) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k)))) t)))
	47.0%	#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
	20.5%	#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) t))
	62.6%	#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) t)) #s(literal 2 binary64)))
	66.1%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))
	60.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 (pow.f64 t #s(literal 3/2 binary64)) #s(literal 2 binary64))))
	60.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 (*.f64 t t) #s(literal 3/2 binary64))))
✓	60.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
✓	60.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
	25.5%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (/.f64 (+.f64 (.f64 (*.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k))))
	23.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -7/120 binary64) (.f64 k k)) #s(literal 1/6 binary64)) (.f64 k k)) #s(literal 1 binary64)) (.f64 k k)))))
	25.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) k) k) #s(literal 1 binary64)) (.f64 k k)))))
	39.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 #s(approx (+ ( -1/6 (* k k)) 1) #s(literal 1 binary64)) (*.f64 k k)))))
	17.1%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) #s(approx (/ (+ ( -1/6 (* k k)) 1) (* k k)) #s(literal -1/6 binary64)))))
	67.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
	52.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k k)))) #s(literal 2 binary64)))
	51.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t)) #s(literal 2 binary64)))
	54.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 k k))) (*.f64 k k))) t)) #s(literal 2 binary64)))
	54.4%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) t)) #s(literal 2 binary64)))
	55.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k)))) #s(literal 2 binary64)))
	33.1%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 l l) (pow.f64 t #s(literal 3 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 k k)) #s(literal 1 binary64)) (*.f64 k k)))))
	54.5%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 #s(approx ( (/ (* l l) (* k k)) (cos k)) (ratio-of-squares.f64 l k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
	49.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) t)) #s(literal 2 binary64)))
	64.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t))) #s(literal 2 binary64)))
	57.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) t))) #s(literal 2 binary64)))
	26.0%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
	30.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
	34.2%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 k k)) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
	54.9%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 k k))) t))) #s(literal 2 binary64)))
	31.5%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (pow.f64 t #s(literal -1 binary64)) (.f64 (/.f64 (.f64 k k) t) #s(literal -1/6 binary64))) (*.f64 k k)))) #s(literal 2 binary64)))
	67.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (.f64 (/.f64 l k) (/.f64 l k)) (/.f64 (cos.f64 k) (.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #s(literal 2 binary64)))
	57.6%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (.f64 l l) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 2 binary64)))
	48.8%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) k) t)) #s(literal 2 binary64)))
✓	24.3%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)) #s(literal 2 binary64)))
	24.1%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))) t)) #s(literal 2 binary64)))
	54.7%	#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (.f64 (/.f64 l (.f64 k k)) (/.f64 l (*.f64 k k))) t)) #s(literal 2 binary64)))

Samples

695.0ms	19 267×	0	valid
81.0ms	2 237×	0	invalid

Compiler

Compiled 7 153 to 2 370 computations (66.9% saved)

Precisions

Click to see histograms. Total time spent on operations: 398.0ms

ival-mult: 254.0ms (63.9% of total)

ival-div: 119.0ms (29.9% of total)

ival-true: 11.0ms (2.8% of total)

ival-assert: 8.0ms (2% of total)

adjust: 5.0ms (1.3% of total)

regimes138.0ms (0.6%)

Memory

18.2MiB live, 63.7MiB allocated; 6ms collecting garbage

Counts

102 → 1

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.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))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 (/.f64 l 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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #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 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 k k))) (*.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))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (.f64 (/.f64 l (.f64 k k)) (/.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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 k k)) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) #s(approx (/ (+ ( -1/6 (* k k)) 1) (* k k)) #s(literal -1/6 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 (*.f64 t t) #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (pow.f64 k #s(literal -2 binary64)) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 #s(approx (+ ( -1/6 (* k k)) 1) #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 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) 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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) k) k) #s(literal 1 binary64)) (.f64 k 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) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (/.f64 (+.f64 (.f64 (*.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -7/120 binary64) (.f64 k k)) #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 l l) (pow.f64 t #s(literal 3 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k 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 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (pow.f64 t #s(literal -1 binary64)) (.f64 (/.f64 (.f64 k k) t) #s(literal -1/6 binary64))) (*.f64 k k)))) #s(literal 2 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) #s(approx (* (sin k) (tan k)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 k 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) (.f64 k k)) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64)))) #s(literal 2 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) #s(approx (* (sin k) (tan 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))))))
(/.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 (+.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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (pow.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 (ratio-of-squares.f64 l k) (pow.f64 (pow.f64 t #s(literal 3/2 binary64)) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))) t)) #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(approx ( (/ (* l l) (* k k)) (cos k)) (ratio-of-squares.f64 l k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) #s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (*.f64 k #s(literal 2 binary64)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))) 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) (*.f64 (sin.f64 k) #s(approx (tan 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx ( (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 k k)) #s(literal 2 binary64)) (.f64 k 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 #s(approx (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (ratio-of-squares.f64 (.f64 k k) l)) (.f64 (/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 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 (.f64 (+.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 t #s(literal 3 binary64))) t) (.f64 k k)) (.f64 #s(literal 2 binary64) (pow.f64 t #s(literal 3 binary64)))) (.f64 l l)) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 #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)) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 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) #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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 #s(approx (+ (+ (/ ( k k) (* t t)) 1) 1) #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 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 (tan.f64 k) #s(approx (+ (/ ( k k) (* t t)) 2) #s(literal 2 binary64)))))
(/.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (.f64 #s(approx (+ (/ ( k k) (* t t)) 2) #s(literal 2 binary64)) (tan.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 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 (tan.f64 k) #s(approx (+ (/ ( k k) (* t t)) 2) (ratio-of-squares.f64 k t)))))
(/.f64 #s(literal 2 binary64) (.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 2 binary64)))))
(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (ratio-of-squares.f64 k t) #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 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (/.f64 (cos.f64 k) (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 #s(approx (+ ( (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 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 (.f64 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.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) (cos.f64 k)))))
(/.f64 #s(literal 2 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 #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 2 binary64) (+.f64 (ratio-of-squares.f64 k t) #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 (/.f64 #s(literal 2 binary64) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (.f64 (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)) (sin.f64 k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (.f64 l l) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 2 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) #s(literal 2 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) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (/.f64 (.f64 k k) (*.f64 t t)) #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 (/.f64 l k) (/.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) (.f64 (+.f64 (+.f64 (/.f64 (.f64 k 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 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (pow.f64 t #s(literal 3/2 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/4 binary64)) l)) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))))
(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (.f64 (pow.f64 t #s(literal 3/2 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/4 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 (+.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 (sin.f64 k) (pow.f64 t #s(literal 3 binary64))) (.f64 l l)) (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) #s(approx (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1)) (.f64 (+.f64 (/.f64 (ratio-of-squares.f64 (.f64 k (sin.f64 k)) l) (cos.f64 k)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #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 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/4 binary64))) (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 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)) #s(approx (+ (+ 1 (pow (/ k t) 2)) 1) #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 (+.f64 (.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 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 t (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64))) (*.f64 k 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 (+.f64 (.f64 t (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64))) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) #s(approx (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k)))) (.f64 (+.f64 (.f64 t (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) k) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.f64 k))) #s(literal 2 binary64))) (*.f64 k k))))
(/.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))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #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 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) t))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (/.f64 (-.f64 (.f64 (.f64 (ratio-of-squares.f64 l (.f64 k k)) (/.f64 (.f64 (.f64 t t) (cos.f64 k)) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))) #s(literal -4 binary64)) (.f64 #s(literal -2 binary64) (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))) t))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (exp.f64 (/.f64 (-.f64 (pow.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (log.f64 t) #s(literal 3 binary64)) (.f64 (log.f64 t) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (log.f64 l) #s(literal 2 binary64)) (.f64 (log.f64 l) #s(literal 2 binary64))) (.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))))
(/.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 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))) (-.f64 (.f64 (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 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 (+.f64 (/.f64 (ratio-of-squares.f64 (*.f64 k (sin.f64 k)) l) (cos.f64 k)) (*.f64 (/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t)))

Calls

6 calls:

30.0ms	t
23.0ms	k
23.0ms	l
20.0ms	(*.f64 l l)
18.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

Accuracy	Segments	Branch
94.7%	1	`(*.f64 l l)`
94.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)))`
94.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))))`
94.7%	1	`t`
94.7%	1	`l`
94.7%	1	`k`

Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes116.0ms (0.5%)

Memory

8.8MiB live, 56.5MiB allocated; 1ms collecting garbage

Counts

89 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.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))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 (/.f64 l 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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #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 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 k k))) (*.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))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (.f64 (/.f64 l (.f64 k k)) (/.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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 k k)) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) #s(approx (/ (+ ( -1/6 (* k k)) 1) (* k k)) #s(literal -1/6 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 (*.f64 t t) #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (pow.f64 k #s(literal -2 binary64)) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 #s(approx (+ ( -1/6 (* k k)) 1) #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 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) 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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) k) k) #s(literal 1 binary64)) (.f64 k 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) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (/.f64 (+.f64 (.f64 (*.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -7/120 binary64) (.f64 k k)) #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 l l) (pow.f64 t #s(literal 3 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k 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 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (pow.f64 t #s(literal -1 binary64)) (.f64 (/.f64 (.f64 k k) t) #s(literal -1/6 binary64))) (*.f64 k k)))) #s(literal 2 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) #s(approx (* (sin k) (tan k)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 k 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) (.f64 k k)) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64)))) #s(literal 2 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) #s(approx (* (sin k) (tan 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))))))
(/.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 (+.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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (pow.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 (ratio-of-squares.f64 l k) (pow.f64 (pow.f64 t #s(literal 3/2 binary64)) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))) t)) #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(approx ( (/ (* l l) (* k k)) (cos k)) (ratio-of-squares.f64 l k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) #s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (*.f64 k #s(literal 2 binary64)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))) 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) (*.f64 (sin.f64 k) #s(approx (tan 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx ( (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 k k)) #s(literal 2 binary64)) (.f64 k 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 #s(approx (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (ratio-of-squares.f64 (.f64 k k) l)) (.f64 (/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 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 (.f64 (+.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 t #s(literal 3 binary64))) t) (.f64 k k)) (.f64 #s(literal 2 binary64) (pow.f64 t #s(literal 3 binary64)))) (.f64 l l)) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 #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)) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 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) #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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 #s(approx (+ (+ (/ ( k k) (* t t)) 1) 1) #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 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 (tan.f64 k) #s(approx (+ (/ ( k k) (* t t)) 2) #s(literal 2 binary64)))))
(/.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (.f64 #s(approx (+ (/ ( k k) (* t t)) 2) #s(literal 2 binary64)) (tan.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 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 (tan.f64 k) #s(approx (+ (/ ( k k) (* t t)) 2) (ratio-of-squares.f64 k t)))))
(/.f64 #s(literal 2 binary64) (.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 2 binary64)))))
(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (ratio-of-squares.f64 k t) #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 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (/.f64 (cos.f64 k) (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 #s(approx (+ ( (/ (* k k) (* l l)) (/ (pow (sin k) 2) (cos k))) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (*.f64 (ratio-of-squares.f64 k l) (/.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) (cos.f64 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 (.f64 (pow.f64 t #s(literal 3 binary64)) (/.f64 (ratio-of-squares.f64 (sin.f64 k) l) (cos.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) (cos.f64 k)))))
(/.f64 #s(literal 2 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 #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 2 binary64) (+.f64 (ratio-of-squares.f64 k t) #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 (/.f64 #s(literal 2 binary64) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) (.f64 (.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.f64 k)) (sin.f64 k)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (.f64 l l) (/.f64 (cos.f64 k) (.f64 (.f64 (.f64 k k) t) (pow.f64 (sin.f64 k) #s(literal 2 binary64))))) #s(literal 2 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) #s(literal 2 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) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (/.f64 (.f64 k k) (*.f64 t t)) #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 (/.f64 l k) (/.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) (.f64 (+.f64 (+.f64 (/.f64 (.f64 k 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 (.f64 (/.f64 (pow.f64 t #s(literal 3 binary64)) (.f64 l l)) (sin.f64 k)) (tan.f64 k)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 k k) (.f64 t t))) #s(literal 1 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 (pow.f64 t #s(literal 3/2 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/4 binary64)) l)) (sin.f64 k)) (.f64 (tan.f64 k) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)))))
(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 1 binary64)) #s(literal 1 binary64)) (.f64 (.f64 (pow.f64 t #s(literal 3/2 binary64)) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/4 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 (+.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 (sin.f64 k) (pow.f64 t #s(literal 3 binary64))) (.f64 l l)) (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 #s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (ratio-of-squares.f64 (*.f64 k k) l)) (*.f64 (/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k)) #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 (ratio-of-squares.f64 l k) (/.f64 (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) t)) #s(literal 2 binary64)))

Calls

6 calls:

21.0ms	l
20.0ms	k
20.0ms	t
18.0ms	(*.f64 l l)
16.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

Accuracy	Segments	Branch
86.3%	3	`(.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)))`
88.3%	3	`t`
81.2%	3	`(*.f64 l l)`
85.9%	3	`(/.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.5%	3	`l`
90.1%	2	`k`

Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes73.0ms (0.3%)

Memory

-90.2MiB live, 11.2MiB allocated; 64ms collecting garbage

Counts

69 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.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))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 (/.f64 l 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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #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 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 k k))) (*.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))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (.f64 (/.f64 l (.f64 k k)) (/.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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 k k)) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) #s(approx (/ (+ ( -1/6 (* k k)) 1) (* k k)) #s(literal -1/6 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 (*.f64 t t) #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (pow.f64 k #s(literal -2 binary64)) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 #s(approx (+ ( -1/6 (* k k)) 1) #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 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) 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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) k) k) #s(literal 1 binary64)) (.f64 k 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) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (/.f64 (+.f64 (.f64 (*.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -7/120 binary64) (.f64 k k)) #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 l l) (pow.f64 t #s(literal 3 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k 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 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (pow.f64 t #s(literal -1 binary64)) (.f64 (/.f64 (.f64 k k) t) #s(literal -1/6 binary64))) (*.f64 k k)))) #s(literal 2 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) #s(approx (* (sin k) (tan k)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 k 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) (.f64 k k)) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64)))) #s(literal 2 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) #s(approx (* (sin k) (tan 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))))))
(/.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 (+.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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (pow.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 (ratio-of-squares.f64 l k) (pow.f64 (pow.f64 t #s(literal 3/2 binary64)) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))) t)) #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(approx ( (/ (* l l) (* k k)) (cos k)) (ratio-of-squares.f64 l k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) #s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (*.f64 k #s(literal 2 binary64)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))) 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) (*.f64 (sin.f64 k) #s(approx (tan 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx ( (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 k k)) #s(literal 2 binary64)) (.f64 k 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 #s(approx (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (ratio-of-squares.f64 (.f64 k k) l)) (.f64 (/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 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 (.f64 (+.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 t #s(literal 3 binary64))) t) (.f64 k k)) (.f64 #s(literal 2 binary64) (pow.f64 t #s(literal 3 binary64)))) (.f64 l l)) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 #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)) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 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) #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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 #s(approx (+ (+ (/ ( k k) (* t t)) 1) 1) #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 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 (tan.f64 k) #s(approx (+ (/ ( k k) (* t t)) 2) #s(literal 2 binary64)))))
(/.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (.f64 #s(approx (+ (/ ( k k) (* t t)) 2) #s(literal 2 binary64)) (tan.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 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 (tan.f64 k) #s(approx (+ (/ ( k k) (* t t)) 2) (ratio-of-squares.f64 k t)))))
(/.f64 #s(literal 2 binary64) (.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 2 binary64)))))
(/.f64 #s(literal 2 binary64) (.f64 (+.f64 (ratio-of-squares.f64 k t) #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 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (.f64 (sin.f64 k) (*.f64 (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 binary64)) (tan.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 #s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (ratio-of-squares.f64 (*.f64 k k) l)) (*.f64 (/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k)) #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 (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

1 calls:

69.0ms

Results

Accuracy	Segments	Branch
90.1%	2	`k`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes17.0ms (0.1%)

Memory

9.8MiB live, 9.8MiB allocated; 0ms collecting garbage

Counts

59 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.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))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 (/.f64 l 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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #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 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 k k))) (*.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))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (.f64 (/.f64 l (.f64 k k)) (/.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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 k k)) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) #s(approx (/ (+ ( -1/6 (* k k)) 1) (* k k)) #s(literal -1/6 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 (*.f64 t t) #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (pow.f64 k #s(literal -2 binary64)) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 #s(approx (+ ( -1/6 (* k k)) 1) #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 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) 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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) k) k) #s(literal 1 binary64)) (.f64 k 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) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (/.f64 (+.f64 (.f64 (*.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -7/120 binary64) (.f64 k k)) #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 l l) (pow.f64 t #s(literal 3 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k 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 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (pow.f64 t #s(literal -1 binary64)) (.f64 (/.f64 (.f64 k k) t) #s(literal -1/6 binary64))) (*.f64 k k)))) #s(literal 2 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) #s(approx (* (sin k) (tan k)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 k 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) (.f64 k k)) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64)))) #s(literal 2 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) #s(approx (* (sin k) (tan 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))))))
(/.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 (+.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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (pow.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 (ratio-of-squares.f64 l k) (pow.f64 (pow.f64 t #s(literal 3/2 binary64)) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))) t)) #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(approx ( (/ (* l l) (* k k)) (cos k)) (ratio-of-squares.f64 l k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) #s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (*.f64 k #s(literal 2 binary64)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))) 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) (*.f64 (sin.f64 k) #s(approx (tan 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx ( (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 k k)) #s(literal 2 binary64)) (.f64 k 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 #s(approx (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (ratio-of-squares.f64 (.f64 k k) l)) (.f64 (/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 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 (.f64 (+.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 t #s(literal 3 binary64))) t) (.f64 k k)) (.f64 #s(literal 2 binary64) (pow.f64 t #s(literal 3 binary64)))) (.f64 l l)) (*.f64 k k))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) (.f64 #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)) (+.f64 (ratio-of-squares.f64 k t) #s(literal 2 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) #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))))))

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 #s(approx (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (ratio-of-squares.f64 (*.f64 k k) l)) (*.f64 (/.f64 (ratio-of-squares.f64 (*.f64 t (sin.f64 k)) l) (cos.f64 k)) #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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t))) #s(literal 2 binary64)))

Calls

1 calls:

14.0ms

Results

Accuracy	Segments	Branch
90.1%	2	`k`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes16.0ms (0.1%)

Memory

9.3MiB live, 9.3MiB allocated; 0ms collecting garbage

Counts

55 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.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))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 (/.f64 l 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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #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 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 k k))) (*.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))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (.f64 (/.f64 l (.f64 k k)) (/.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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 k k)) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) #s(approx (/ (+ ( -1/6 (* k k)) 1) (* k k)) #s(literal -1/6 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 (*.f64 t t) #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (pow.f64 k #s(literal -2 binary64)) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 #s(approx (+ ( -1/6 (* k k)) 1) #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 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) 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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) k) k) #s(literal 1 binary64)) (.f64 k 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) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (/.f64 (+.f64 (.f64 (*.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -7/120 binary64) (.f64 k k)) #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 l l) (pow.f64 t #s(literal 3 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k 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 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (pow.f64 t #s(literal -1 binary64)) (.f64 (/.f64 (.f64 k k) t) #s(literal -1/6 binary64))) (*.f64 k k)))) #s(literal 2 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) #s(approx (* (sin k) (tan k)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 k 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) (.f64 k k)) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64)))) #s(literal 2 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) #s(approx (* (sin k) (tan 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))))))
(/.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 (+.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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (pow.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 (ratio-of-squares.f64 l k) (pow.f64 (pow.f64 t #s(literal 3/2 binary64)) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))) t)) #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(approx ( (/ (* l l) (* k k)) (cos k)) (ratio-of-squares.f64 l k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) #s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (*.f64 k #s(literal 2 binary64)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))) 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) (*.f64 (sin.f64 k) #s(approx (tan 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) #s(approx ( (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 t #s(literal -2 binary64)) #s(literal 1/3 binary64)) (.f64 k k)) #s(literal 2 binary64)) (.f64 k 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))))

Outputs

(/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (*.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) t)))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t))) #s(literal 2 binary64)))

Calls

1 calls:

13.0ms

Results

Accuracy	Segments	Branch
87.9%	2	`k`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes15.0ms (0.1%)

Memory

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

Counts

52 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.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))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 (/.f64 l 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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #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 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 k k))) (*.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))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (.f64 (/.f64 l (.f64 k k)) (/.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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 k k)) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) #s(approx (/ (+ ( -1/6 (* k k)) 1) (* k k)) #s(literal -1/6 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 (*.f64 t t) #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (pow.f64 k #s(literal -2 binary64)) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 #s(approx (+ ( -1/6 (* k k)) 1) #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 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) 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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) k) k) #s(literal 1 binary64)) (.f64 k 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) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (/.f64 (+.f64 (.f64 (*.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -7/120 binary64) (.f64 k k)) #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 l l) (pow.f64 t #s(literal 3 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k 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 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (pow.f64 t #s(literal -1 binary64)) (.f64 (/.f64 (.f64 k k) t) #s(literal -1/6 binary64))) (*.f64 k k)))) #s(literal 2 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) #s(approx (* (sin k) (tan k)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 k 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) (.f64 k k)) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64)))) #s(literal 2 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) #s(approx (* (sin k) (tan 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))))))
(/.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 (+.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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (pow.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 (ratio-of-squares.f64 l k) (pow.f64 (pow.f64 t #s(literal 3/2 binary64)) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))) t)) #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(approx ( (/ (* l l) (* k k)) (cos k)) (ratio-of-squares.f64 l k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) #s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (*.f64 k #s(literal 2 binary64)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))) 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) (*.f64 (sin.f64 k) #s(approx (tan 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 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 #s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (*.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) t)))

#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (*.f64 (*.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) t)) #s(literal 2 binary64)))

Calls

1 calls:

12.0ms

Results

Accuracy	Segments	Branch
87.9%	2	`k`

Compiler

Compiled 1 to 3 computations (-200% saved)

regimes53.0ms (0.2%)

Memory

-27.2MiB live, 24.6MiB allocated; 7ms 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))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.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))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 (/.f64 l 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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #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 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 k k))) (*.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))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (.f64 (/.f64 l (.f64 k k)) (/.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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 k k)) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) #s(approx (/ (+ ( -1/6 (* k k)) 1) (* k k)) #s(literal -1/6 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 (*.f64 t t) #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (pow.f64 k #s(literal -2 binary64)) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 #s(approx (+ ( -1/6 (* k k)) 1) #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 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) 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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) k) k) #s(literal 1 binary64)) (.f64 k 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) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (/.f64 (+.f64 (.f64 (*.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -7/120 binary64) (.f64 k k)) #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 l l) (pow.f64 t #s(literal 3 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k 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 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (pow.f64 t #s(literal -1 binary64)) (.f64 (/.f64 (.f64 k k) t) #s(literal -1/6 binary64))) (*.f64 k k)))) #s(literal 2 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) #s(approx (* (sin k) (tan k)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 k 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) (.f64 k k)) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64)))) #s(literal 2 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) #s(approx (* (sin k) (tan 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))))))
(/.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 (+.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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (pow.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 (ratio-of-squares.f64 l k) (pow.f64 (pow.f64 t #s(literal 3/2 binary64)) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))) t)) #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(approx ( (/ (* l l) (* k k)) (cos k)) (ratio-of-squares.f64 l k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) #s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (*.f64 k #s(literal 2 binary64)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))) 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) (*.f64 (sin.f64 k) #s(approx (tan 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 #s(approx (+ (/ (/ (* (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))) t)))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) 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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))) t)))

Calls

4 calls:

19.0ms	t
12.0ms	k
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)))
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

Accuracy	Segments	Branch
85.5%	3	`(/.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))))`
85.9%	3	`(.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)))`
79.5%	2	`t`
84.7%	3	`k`

Compiler

Compiled 50 to 43 computations (14% saved)

regimes33.0ms (0.1%)

Memory

18.5MiB live, 18.5MiB allocated; 0ms collecting garbage

Counts

49 → 3

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.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))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 (/.f64 l 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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #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 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 k k))) (*.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))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (.f64 (/.f64 l (.f64 k k)) (/.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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 k k)) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) #s(approx (/ (+ ( -1/6 (* k k)) 1) (* k k)) #s(literal -1/6 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 (*.f64 t t) #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (pow.f64 k #s(literal -2 binary64)) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 #s(approx (+ ( -1/6 (* k k)) 1) #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 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) 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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) k) k) #s(literal 1 binary64)) (.f64 k 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) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (/.f64 (+.f64 (.f64 (*.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -7/120 binary64) (.f64 k k)) #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 l l) (pow.f64 t #s(literal 3 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k 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 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (pow.f64 t #s(literal -1 binary64)) (.f64 (/.f64 (.f64 k k) t) #s(literal -1/6 binary64))) (*.f64 k k)))) #s(literal 2 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) #s(approx (* (sin k) (tan k)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 k 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) (.f64 k k)) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64)))) #s(literal 2 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) #s(approx (* (sin k) (tan 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))))))
(/.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 (+.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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (pow.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 (ratio-of-squares.f64 l k) (pow.f64 (pow.f64 t #s(literal 3/2 binary64)) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))) t)) #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(approx ( (/ (* l l) (* k k)) (cos k)) (ratio-of-squares.f64 l k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) #s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (*.f64 k #s(literal 2 binary64)))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) t)) #s(literal 2 binary64)))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (*.f64 (*.f64 t t) 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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (*.f64 (+.f64 (*.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (*.f64 (*.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (*.f64 k k)) (*.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k))) t)))

#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (*.f64 (*.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) t)) #s(literal 2 binary64)))

Calls

3 calls:

12.0ms

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)))

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

Accuracy	Segments	Branch
84.7%	3	`k`
83.4%	4	`(/.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))))`
83.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)))`

Compiler

Compiled 49 to 40 computations (18.4% saved)

regimes66.0ms (0.3%)

Memory

-13.6MiB live, 33.9MiB allocated; 1ms collecting garbage

Counts

48 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.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))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 (/.f64 l 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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #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 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 k k))) (*.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))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (.f64 (/.f64 l (.f64 k k)) (/.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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 k k)) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) #s(approx (/ (+ ( -1/6 (* k k)) 1) (* k k)) #s(literal -1/6 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 (*.f64 t t) #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (pow.f64 k #s(literal -2 binary64)) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 #s(approx (+ ( -1/6 (* k k)) 1) #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 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) 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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) k) k) #s(literal 1 binary64)) (.f64 k 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) #s(approx (* (sin k) (tan k)) (*.f64 k k)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 k #s(literal 2 binary64))))) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (/.f64 (+.f64 (.f64 (*.f64 k k) #s(literal -1/6 binary64)) #s(literal 1 binary64)) k) k))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -7/120 binary64) (.f64 k k)) #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 l l) (pow.f64 t #s(literal 3 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) (cos.f64 k)) #s(approx (* (pow (sin k) 2) t) (.f64 (-.f64 t (.f64 #s(literal 1/3 binary64) (.f64 (.f64 k k) t))) (*.f64 k 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 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (+.f64 (pow.f64 t #s(literal -1 binary64)) (.f64 (/.f64 (.f64 k k) t) #s(literal -1/6 binary64))) (*.f64 k k)))) #s(literal 2 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) #s(approx (* (sin k) (tan k)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 k 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (*.f64 k k))) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (+.f64 (.f64 (.f64 (/.f64 (.f64 l l) t) #s(literal -1/6 binary64)) (.f64 k k)) (/.f64 (*.f64 l l) t)) (pow.f64 k #s(literal 4 binary64)))) #s(literal 2 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) #s(approx (* (sin k) (tan 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))))))
(/.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 (+.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 (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (pow.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 (ratio-of-squares.f64 l k) (pow.f64 (pow.f64 t #s(literal 3/2 binary64)) #s(literal 2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (exp.f64 (*.f64 (log.f64 t) #s(literal 3 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (exp.f64 (*.f64 (log.f64 k) #s(literal 2 binary64)))) t)) #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(approx ( (/ (* l l) (* k k)) (cos k)) (ratio-of-squares.f64 l k)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t))) #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 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (*.f64 (pow.f64 (sin.f64 k) #s(literal 2 binary64)) t)) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l) (sin.f64 k)) #s(approx (* (tan k) (+ (/ (* k k) (* t t)) 2)) (*.f64 k #s(literal 2 binary64)))))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (*.f64 #s(approx (pow (sin k) 2) (*.f64 k k)) t))) #s(literal 2 binary64)))

Calls

6 calls:

12.0ms	l
11.0ms	k
11.0ms	t
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

Accuracy	Segments	Branch
74.3%	3	`t`
72.9%	2	`(*.f64 l l)`
72.9%	2	`l`
75.9%	3	`(.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)))`
75.0%	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))))`
74.9%	3	`k`

Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes33.0ms (0.1%)

Memory

19.3MiB live, 19.3MiB allocated; 0ms collecting garbage

Counts

22 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.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))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 (/.f64 l 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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #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 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 k k))) (*.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))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (.f64 (/.f64 l (.f64 k k)) (/.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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 k k)) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (ratio-of-squares.f64 l k) (/.f64 #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 (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k))))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) #s(approx (/ (+ ( -1/6 (* k k)) 1) (* k k)) #s(literal -1/6 binary64)))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 t #s(literal 3 binary64))))
#s(approx (/ 2 (* (+ (+ (/ (* k k) (* t t)) 1) 1) (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (ratio-of-squares.f64 (/.f64 l k) (pow.f64 t #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (pow.f64 (*.f64 t t) #s(literal 3/2 binary64))))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (/ (cos k) (* (pow (sin k) 2) t)) (/.f64 (pow.f64 k #s(literal -2 binary64)) t))) #s(literal 2 binary64)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (ratio-of-squares.f64 l (pow.f64 t #s(literal 3/2 binary64))) #s(approx (/ (cos k) (pow (sin k) 2)) (/.f64 #s(approx (+ ( -1/6 (* k k)) 1) #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 k k) (ratio-of-squares.f64 (pow.f64 t #s(literal 3/2 binary64)) l)) #s(literal 2 binary64))))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 #s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (*.f64 (/.f64 l (*.f64 k k)) (/.f64 l (*.f64 k k))) t)) #s(literal 2 binary64)))

Calls

6 calls:

6.0ms	k
6.0ms	t
6.0ms	l
5.0ms	(*.f64 l l)
5.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

Accuracy	Segments	Branch
74.2%	4	`t`
72.0%	2	`(*.f64 l l)`
72.0%	2	`l`
73.4%	4	`k`
73.5%	3	`(.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.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))))`

Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes3.0ms (0%)

Memory

2.5MiB live, 2.5MiB allocated; 0ms collecting garbage

Counts

10 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.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))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 (/.f64 l 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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #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 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k 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 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 k k))) (*.f64 k k))) t)) #s(literal 2 binary64)))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (/.f64 (*.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k)))) #s(literal 2 binary64)))

Calls

1 calls:

3.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

Accuracy	Segments	Branch
72.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))))`

Compiler

Compiled 25 to 19 computations (24% saved)

regimes3.0ms (0%)

Memory

2.2MiB live, 2.2MiB allocated; 0ms collecting garbage

Counts

8 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.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))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 (/.f64 l 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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #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 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 k k))) t))) #s(literal 2 binary64)))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 #s(approx (pow (sin k) 2) (*.f64 (+.f64 (*.f64 (*.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 k k))) t))) #s(literal 2 binary64)))

Calls

1 calls:

2.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

Accuracy	Segments	Branch
72.2%	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))))`

Compiler

Compiled 25 to 19 computations (24% saved)

regimes3.0ms (0%)

Memory

2.1MiB live, 2.1MiB allocated; 0ms collecting garbage

Counts

7 → 2

Calls

Call 1

Inputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.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))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 (/.f64 l 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))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.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))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) 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 #s(approx (+ (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (.f64 (*.f64 k k) (ratio-of-squares.f64 t l)) #s(literal 2 binary64))) t)))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 (*.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (*.f64 #s(approx (pow (sin k) 2) (*.f64 k k)) t))) #s(literal 2 binary64)))

Calls

1 calls:

2.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

Accuracy	Segments	Branch
72.2%	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))))`

Compiler

Compiled 25 to 19 computations (24% saved)

regimes9.0ms (0%)

Memory

-40.1MiB live, 7.7MiB allocated; 1ms 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))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.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))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) k) t)) #s(literal 2 binary64)))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (*.f64 (*.f64 t t) t)))

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t))

Calls

5 calls:

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)))
2.0ms	t
2.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 l l)

Results

Accuracy	Segments	Branch
70.6%	3	`t`
70.7%	2	`(.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)))`
66.1%	1	`(*.f64 l l)`
68.4%	2	`l`
70.4%	3	`(/.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 53 to 47 computations (11.3% saved)

regimes8.0ms (0%)

Memory

8.2MiB live, 8.2MiB allocated; 0ms collecting garbage

Counts

2 → 1

Calls

Call 1

Inputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 #s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.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))) (/.f64 (ratio-of-squares.f64 l k) (*.f64 (*.f64 t t) t)))

Outputs
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))

Calls

6 calls:

1.0ms	t
1.0ms	l
1.0ms	k
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)))
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))))

Results

Accuracy	Segments	Branch
60.8%	1	`(*.f64 l l)`
60.8%	1	`l`
60.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))))`
60.8%	1	`t`
60.8%	1	`k`
60.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)))`

Compiler

Compiled 54 to 50 computations (7.4% saved)

regimes6.0ms (0%)

Memory

7.7MiB live, 7.7MiB allocated; 0ms collecting garbage

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 #s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)) #s(literal 2 binary64)))

Outputs

#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (*.f64 #s(approx (* (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)) #s(literal 2 binary64)))

Calls

6 calls:

1.0ms	l
1.0ms	k
1.0ms	t
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

Accuracy	Segments	Branch
24.3%	1	`(*.f64 l l)`
24.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)))`
24.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))))`
24.3%	1	`l`
24.3%	1	`t`
24.3%	1	`k`

Compiler

Compiled 54 to 50 computations (7.4% saved)

bsearch36.0ms (0.2%)

Memory

13.0MiB live, 13.0MiB allocated; 0ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
32.0ms	3563.0971564908095	35170.41910646202

Samples

26.0ms

384×

valid

Compiler

Compiled 646 to 433 computations (33% saved)

Precisions

Click to see histograms. Total time spent on operations: 18.0ms

ival-mult: 6.0ms (33.3% of total)

ival-div: 3.0ms (16.7% of total)

ival-sin: 3.0ms (16.7% of total)

ival-tan: 3.0ms (16.7% of total)

ival-add: 1.0ms (5.6% of total)

ival-pow: 1.0ms (5.6% of total)

ival-pow2: 1.0ms (5.6% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

exact: 0.0ms (0% of total)

bsearch16.0ms (0.1%)

Memory

6.7MiB live, 6.7MiB allocated; 0ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
13.0ms	3563.0971564908095	35170.41910646202

Samples

10.0ms

288×

valid

Compiler

Compiled 646 to 433 computations (33% saved)

Precisions

Click to see histograms. Total time spent on operations: 5.0ms

ival-mult: 3.0ms (57.1% of total)

ival-div: 1.0ms (19% of total)

ival-true: 0.0ms (0% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

bsearch16.0ms (0.1%)

Memory

6.8MiB live, 6.8MiB allocated; 0ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
13.0ms	3563.0971564908095	35170.41910646202

Samples

10.0ms

288×

valid

Compiler

Compiled 670 to 451 computations (32.7% saved)

Precisions

Click to see histograms. Total time spent on operations: 5.0ms

ival-mult: 3.0ms (57.9% of total)

ival-div: 1.0ms (19.3% of total)

ival-true: 0.0ms (0% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

bsearch27.0ms (0.1%)

Memory

-40.1MiB live, 9.0MiB allocated; 2ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
23.0ms	3563.0971564908095	35170.41910646202

Samples

19.0ms

256×

valid

Compiler

Compiled 748 to 469 computations (37.3% saved)

Precisions

Click to see histograms. Total time spent on operations: 14.0ms

ival-mult: 4.0ms (29.2% of total)

ival-div: 2.0ms (14.6% of total)

ival-add: 2.0ms (14.6% of total)

ival-sin: 2.0ms (14.6% of total)

ival-tan: 2.0ms (14.6% of total)

ival-pow: 1.0ms (7.3% of total)

ival-pow2: 1.0ms (7.3% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

exact: 0.0ms (0% of total)

bsearch11.0ms (0%)

Memory

4.7MiB live, 4.7MiB allocated; 0ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
9.0ms	3563.0971564908095	35170.41910646202

Samples

7.0ms

192×

valid

Compiler

Compiled 736 to 445 computations (39.5% saved)

Precisions

Click to see histograms. Total time spent on operations: 4.0ms

ival-mult: 2.0ms (56.6% of total)

ival-div: 1.0ms (28.3% of total)

ival-true: 0.0ms (0% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory

0.4MiB live, 0.4MiB allocated; 0ms collecting garbage

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	+inf	NaN
0.0ms	0.0	1.7689942159799993e-275

Compiler

Compiled 28 to 26 computations (7.1% saved)

bsearch66.0ms (0.3%)

Memory

25.0MiB live, 25.0MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
27.0ms	5.289453555493081e-8	2.8410259947536434e-6
30.0ms	2.355289595459517e-151	9.712665560701447e-149

Samples

44.0ms	718×	0	valid
0.0ms	2×	0	invalid

Compiler

Compiled 1 944 to 1 133 computations (41.7% saved)

Precisions

Click to see histograms. Total time spent on operations: 29.0ms

ival-mult: 11.0ms (37.8% of total)

ival-div: 7.0ms (24% of total)

ival-pow: 3.0ms (10.3% of total)

ival-add: 2.0ms (6.9% of total)

ival-sin: 2.0ms (6.9% of total)

ival-tan: 2.0ms (6.9% of total)

ival-pow2: 2.0ms (6.9% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

exact: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory

0.4MiB live, 0.4MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.1305859464848655e+275	+inf

Compiler

Compiled 28 to 25 computations (10.7% saved)

bsearch0.0ms (0%)

Memory

0.3MiB live, 0.3MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.1305859464848655e+275	+inf

Compiler

Compiled 28 to 25 computations (10.7% saved)

bsearch0.0ms (0%)

Memory

0.2MiB live, 0.2MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.1305859464848655e+275	+inf

Compiler

Compiled 28 to 25 computations (10.7% saved)

bsearch0.0ms (0%)

Memory

0.2MiB live, 0.2MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.1305859464848655e+275	+inf

Compiler

Compiled 28 to 25 computations (10.7% saved)

bsearch0.0ms (0%)

Memory

0.2MiB live, 0.2MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.1305859464848655e+275	+inf

Compiler

Compiled 28 to 25 computations (10.7% saved)

bsearch0.0ms (0%)

Memory

0.2MiB live, 0.2MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.7689942159799993e-275

Compiler

Compiled 28 to 26 computations (7.1% saved)

simplify49.0ms (0.2%)

Memory

-28.6MiB live, 17.6MiB allocated; 3ms collecting garbage

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	214	1685
1	356	1617
2	1240	1601

Stop Event

1×	node limit

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 (ratio-of-squares.f64 (.f64 k (sin.f64 k)) l) (cos.f64 k)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t)))
(if (<=.f64 k #s(literal 5600 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 #s(approx (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (ratio-of-squares.f64 (.f64 k k) l)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #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 (ratio-of-squares.f64 l k) (/.f64 (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) t)) #s(literal 2 binary64))))
(if (<=.f64 k #s(literal 5600 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 #s(approx (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (ratio-of-squares.f64 (.f64 k k) l)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #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 (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 5600 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 #s(approx (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (ratio-of-squares.f64 (.f64 k k) l)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t))) #s(literal 2 binary64))))
(if (<=.f64 k #s(literal 10000 binary64)) (/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) t))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t))) #s(literal 2 binary64))))
(if (<=.f64 k #s(literal 10000 binary64)) (/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) t))) #s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) t)) #s(literal 2 binary64))))
(if (<=.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))) #s(literal 0 binary64)) (/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))) t))) (if (<=.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))) #s(literal +inf.0 binary64)) #s(approx (/ 2 ( (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) 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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))) t)))))
(if (<=.f64 k #s(literal 6818193833906105/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t))) (if (<=.f64 k #s(literal 6611313076017503/2361183241434822606848 binary64)) (/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (.f64 k k))) t))) #s(approx (/ 2 ( (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) t)) #s(literal 2 binary64)))))
(if (<=.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)))) #s(literal 199999999999999991963354801579539865224719863466643166570237755888153096932896189915818952609920031781613357714761512012614125205154634640267751072327400569037934396194907236465391951327140093092900757315484959343965444154349978513521462377866702261531547814080948494523170816 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) t))) #s(literal 2 binary64))))
(if (<=.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)))) #s(literal 199999999999999991963354801579539865224719863466643166570237755888153096932896189915818952609920031781613357714761512012614125205154634640267751072327400569037934396194907236465391951327140093092900757315484959343965444154349978513521462377866702261531547814080948494523170816 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (.f64 (/.f64 l (.f64 k k)) (/.f64 l (*.f64 k k))) t)) #s(literal 2 binary64))))
(if (<=.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)))) #s(literal 199999999999999991963354801579539865224719863466643166570237755888153096932896189915818952609920031781613357714761512012614125205154634640267751072327400569037934396194907236465391951327140093092900757315484959343965444154349978513521462377866702261531547814080948494523170816 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k)))) #s(literal 2 binary64))))
(if (<=.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)))) #s(literal 199999999999999991963354801579539865224719863466643166570237755888153096932896189915818952609920031781613357714761512012614125205154634640267751072327400569037934396194907236465391951327140093092900757315484959343965444154349978513521462377866702261531547814080948494523170816 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 k k))) t))) #s(literal 2 binary64))))
(if (<=.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)))) #s(literal 199999999999999991963354801579539865224719863466643166570237755888153096932896189915818952609920031781613357714761512012614125205154634640267751072327400569037934396194907236465391951327140093092900757315484959343965444154349978513521462377866702261531547814080948494523170816 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) t))) #s(literal 2 binary64))))
(if (<=.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))) #s(literal 0 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)) #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 (ratio-of-squares.f64 (.f64 k (sin.f64 k)) l) (cos.f64 k)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #s(literal 2 binary64))) t)))
(if (<=.f64 k #s(literal 5600 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 #s(approx (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (ratio-of-squares.f64 (.f64 k k) l)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #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 (ratio-of-squares.f64 l k) (/.f64 (/.f64 (cos.f64 k) (pow.f64 (sin.f64 k) #s(literal 2 binary64))) t)) #s(literal 2 binary64))))
(if (<=.f64 k #s(literal 5600 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 #s(approx (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (ratio-of-squares.f64 (.f64 k k) l)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #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 (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 5600 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 #s(approx (/ (/ ( (* k (sin k)) (* k (sin k))) (* l l)) (cos k)) (ratio-of-squares.f64 (.f64 k k) l)) (.f64 (/.f64 (ratio-of-squares.f64 (.f64 t (sin.f64 k)) l) (cos.f64 k)) #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 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t))) #s(literal 2 binary64))))
(if (<=.f64 k #s(literal 10000 binary64)) (/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) t))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) k)))) t))) #s(literal 2 binary64))))
(if (<=.f64 k #s(literal 10000 binary64)) (/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) t) l) #s(literal 2 binary64)) (cos.f64 k))) t))) #s(approx (/ 2 (* (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) t)) #s(literal 2 binary64))))
(if (<=.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))) #s(literal 0 binary64)) (/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))) t))) (if (<=.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))) #s(literal +inf.0 binary64)) #s(approx (/ 2 ( (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) 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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (*.f64 (sin.f64 k) k) l) (cos.f64 k))) t)))))
(if (or (<=.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))) #s(literal 0 binary64)) (not (<=.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))) #s(literal +inf.0 binary64)))) (/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (/.f64 (ratio-of-squares.f64 (.f64 (sin.f64 k) k) l) (cos.f64 k))) t))) #s(approx (/ 2 ( (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t)))
(if (<=.f64 k #s(literal 6818193833906105/1842755090244893238399196572748178169393027939656465052918069482541808673043041431682679065028153695088607604995490158642466105776330465152617887818082371115063181312 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t))) (if (<=.f64 k #s(literal 6611313076017503/2361183241434822606848 binary64)) (/.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 (sin k)) (* k (sin k))) (* l l)) (cos k)) (* (/ (/ (* (* t (sin k)) (* t (sin k))) (* l l)) (cos k)) 2)) (.f64 (+.f64 (.f64 (+.f64 (pow.f64 l #s(literal -2 binary64)) (.f64 (.f64 (ratio-of-squares.f64 t l) #s(literal 1/6 binary64)) #s(literal 2 binary64))) (.f64 k k)) (.f64 (ratio-of-squares.f64 t l) #s(literal 2 binary64))) (.f64 k k))) t))) #s(approx (/ 2 ( (/ (* (pow t 3/2) (pow t 3/2)) (* l l)) (* (sin k) (* (+ (/ (* k k) (* t t)) 2) (tan k))))) (.f64 (.f64 (ratio-of-squares.f64 (/.f64 l k) (sin.f64 k)) (/.f64 (cos.f64 k) t)) #s(literal 2 binary64)))))
(if (<=.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)))) #s(literal 199999999999999991963354801579539865224719863466643166570237755888153096932896189915818952609920031781613357714761512012614125205154634640267751072327400569037934396194907236465391951327140093092900757315484959343965444154349978513521462377866702261531547814080948494523170816 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 (cos.f64 k) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) t))) #s(literal 2 binary64))))
(if (<=.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)))) #s(literal 199999999999999991963354801579539865224719863466643166570237755888153096932896189915818952609920031781613357714761512012614125205154634640267751072327400569037934396194907236465391951327140093092900757315484959343965444154349978513521462377866702261531547814080948494523170816 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (.f64 (/.f64 l (.f64 k k)) (/.f64 l (*.f64 k k))) t)) #s(literal 2 binary64))))
(if (<=.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)))) #s(literal 199999999999999991963354801579539865224719863466643166570237755888153096932896189915818952609920031781613357714761512012614125205154634640267751072327400569037934396194907236465391951327140093092900757315484959343965444154349978513521462377866702261531547814080948494523170816 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (/.f64 (.f64 (ratio-of-squares.f64 l k) #s(approx (cos k) #s(literal 1 binary64))) #s(approx (* (pow (sin k) 2) t) (.f64 (+.f64 (.f64 (.f64 (.f64 k k) t) #s(literal -1/3 binary64)) t) (*.f64 k k)))) #s(literal 2 binary64))))
(if (<=.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)))) #s(literal 199999999999999991963354801579539865224719863466643166570237755888153096932896189915818952609920031781613357714761512012614125205154634640267751072327400569037934396194907236465391951327140093092900757315484959343965444154349978513521462377866702261531547814080948494523170816 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 (+.f64 (.f64 (.f64 k k) #s(literal -1/3 binary64)) #s(literal 1 binary64)) (*.f64 k k))) t))) #s(literal 2 binary64))))
(if (<=.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)))) #s(literal 199999999999999991963354801579539865224719863466643166570237755888153096932896189915818952609920031781613357714761512012614125205154634640267751072327400569037934396194907236465391951327140093092900757315484959343965444154349978513521462377866702261531547814080948494523170816 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 (.f64 (ratio-of-squares.f64 l k) (/.f64 #s(approx (cos k) #s(literal 1 binary64)) (.f64 #s(approx (pow (sin k) 2) (.f64 k k)) t))) #s(literal 2 binary64))))
(if (<=.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))) #s(literal 0 binary64)) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t))) #s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 (/.f64 l k) t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (/.f64 (ratio-of-squares.f64 l k) (.f64 (.f64 t t) t)))
#s(approx (/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))) (.f64 #s(approx ( (/ (* l l) (* k k)) (/ (cos k) (* (pow (sin k) 2) t))) (/.f64 (ratio-of-squares.f64 l (*.f64 k k)) t)) #s(literal 2 binary64)))

derivations472.0ms (2%)

Memory

17.0MiB live, 63.1MiB allocated; 2ms collecting garbage

Stop Event

1×

fuel

Samples

82.0ms	2 325×	0	valid
11.0ms	235×	0	invalid

Compiler

Compiled 1 704 to 218 computations (87.2% saved)

Precisions

Click to see histograms. Total time spent on operations: 48.0ms

ival-mult: 29.0ms (60.5% of total)

ival-div: 16.0ms (33.4% of total)

ival-true: 1.0ms (2.1% of total)

adjust: 1.0ms (2.1% of total)

ival-assert: 1.0ms (2.1% of total)

preprocess4.3s (18.5%)

Memory

77.3MiB live, 1 824.1MiB allocated; 236ms collecting garbage

Remove

(negabs t)

(abs k)

(abs l)

Samples

2.8s	77 483×	0	valid
303.0ms	8 149×	0	invalid

Compiler

Compiled 3 752 to 666 computations (82.2% saved)

Precisions

Click to see histograms. Total time spent on operations: 1.6s

ival-mult: 1.0s (65.7% of total)

ival-div: 446.0ms (28.1% of total)

ival-true: 46.0ms (2.9% of total)

ival-assert: 32.0ms (2% of total)

adjust: 20.0ms (1.3% of total)

end0.0ms (0%)

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

start0.0ms (0%)

analyze610.0ms (2.6%)

sample1.9s (8.3%)

explain256.0ms (1.1%)

preprocess129.0ms (0.6%)

eval0.0ms (0%)

prune1.0ms (0%)

series89.0ms (0.4%)

rewrite168.0ms (0.7%)

eval786.0ms (3.4%)

prune693.0ms (3%)

series148.0ms (0.6%)

rewrite224.0ms (1%)

eval2.2s (9.6%)

prune2.2s (9.3%)

series144.0ms (0.6%)

rewrite216.0ms (0.9%)

eval2.3s (9.7%)

prune2.8s (11.8%)

series290.0ms (1.2%)

rewrite211.0ms (0.9%)

eval1.3s (5.5%)

prune1.1s (4.9%)

regimes138.0ms (0.6%)

regimes116.0ms (0.5%)

regimes73.0ms (0.3%)

regimes17.0ms (0.1%)

regimes16.0ms (0.1%)

regimes15.0ms (0.1%)

regimes53.0ms (0.2%)

regimes33.0ms (0.1%)

regimes66.0ms (0.3%)

regimes33.0ms (0.1%)

regimes3.0ms (0%)

regimes3.0ms (0%)

regimes3.0ms (0%)

regimes9.0ms (0%)

regimes8.0ms (0%)

regimes6.0ms (0%)

bsearch36.0ms (0.2%)

bsearch16.0ms (0.1%)

bsearch16.0ms (0.1%)

bsearch27.0ms (0.1%)

bsearch11.0ms (0%)

bsearch1.0ms (0%)

bsearch66.0ms (0.3%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

simplify49.0ms (0.2%)

derivations472.0ms (2%)

preprocess4.3s (18.5%)

end0.0ms (0%)

Profiling