Metrics for Maksimov and Kolovsky, Equation (4)

start0.0ms (0%)

Memory: 0.6MiB live, 0.2MiB allocated; 0ms collecting garbage

analyze1.0ms (0%)

Memory

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

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	99.8%	0.2%	0%	0%	0%	0
100%	99.8%	0%	0.2%	0%	0%	0%	1

Compiler

Compiled 17 to 16 computations (5.9% saved)

sample2.3s (24.1%)

Memory

63.9MiB live, 3 918.0MiB allocated; 750ms collecting garbage

Samples

972.0ms	2 017×	1	valid
807.0ms	6 239×	0	valid

Precisions

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

ival-exp: 567.0ms (40.1% of total)

ival-cos: 356.0ms (25.1% of total)

ival-mult: 144.0ms (10.2% of total)

adjust: 104.0ms (7.3% of total)

ival-sub: 84.0ms (5.9% of total)

ival-div: 57.0ms (4% of total)

ival-add: 51.0ms (3.6% of total)

ival-neg: 36.0ms (2.5% of total)

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

exact: 6.0ms (0.4% of total)

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

Bogosity

explain310.0ms (3.3%)

Memory

20.1MiB live, 494.4MiB allocated; 30ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Example	Subexpression
128	0	-	-	`(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))`
0	0	-	-	`K`
0	0	-	-	`(neg.f64 l)`
0	0	-	-	`(/.f64 K #s(literal 2 binary64))`
0	0	-	-	`(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))`
0	118	(-1.1074494164085553e+166 -9.694255879660658e+73 1.8373199318880661e+202 1.5922486548472577e-6)	-	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`
0	0	-	-	`(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)`
0	0	-	-	`J`
0	0	-	-	`U`
0	0	-	-	`(exp.f64 (neg.f64 l))`
0	0	-	-	`#s(literal 2 binary64)`
0	0	-	-	`(exp.f64 l)`
0	0	-	-	`l`
0	0	-	-	`(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`cos.f64`	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`	sensitivity	118	0
`-.f64`	`(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))`	cancellation	38	0

Confusion

	Predicted +	Predicted -
+	36	0
-	105	115

Precision

0.2553191489361702

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	36	0	0
-	105	0	115

Precision?

0.2553191489361702

Recall?

1.0

Freqs

test

number	freq
0	115
1	126
2	15

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

101.0ms	192×	1	valid
63.0ms	260×	0	valid
32.0ms	60×	2	valid

Compiler

Compiled 141 to 46 computations (67.4% saved)

Precisions

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

ival-exp: 50.0ms (30.4% of total)

ival-cos: 45.0ms (27.4% of total)

ival-sub: 34.0ms (20.7% of total)

adjust: 14.0ms (8.5% of total)

ival-mult: 10.0ms (6.1% of total)

ival-div: 4.0ms (2.4% of total)

ival-add: 4.0ms (2.4% of total)

ival-neg: 2.0ms (1.2% of total)

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

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

exact: 0.0ms (0% of total)

preprocess218.0ms (2.3%)

Memory

-20.0MiB live, 161.7MiB allocated; 50ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	67	231
1	188	229
2	461	229
3	1762	229
0	14	15
0	23	15
1	44	15
2	92	15
3	309	15
4	1627	13
0	9007	12

Stop Event

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

Calls

Call 1

Inputs
(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)

Outputs

(+.f64 (*.f64 (*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)

(fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)

Symmetry

(abs K)

Compiler

Compiled 15 to 14 computations (6.7% saved)

eval0.0ms (0%)

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

prune0.0ms (0%)

Memory

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

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	87.1%	(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)

Compiler

Compiled 15 to 14 computations (6.7% saved)

simplify155.0ms (1.6%)

Memory

35.1MiB live, 223.5MiB allocated; 32ms collecting garbage

Localize:

Found 4 expressions of interest:

New	Metric	Score
cost-diff	0	(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
cost-diff	0	(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
cost-diff	1	(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
cost-diff	2	(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	14	61
0	23	61
1	44	61
2	92	61
3	309	61
4	1627	53
0	9007	52

Stop Event

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

Calls

Call 1

Inputs
(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
J
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(exp.f64 l)
l
(exp.f64 (neg.f64 l))
(neg.f64 l)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
#s(literal 2 binary64)
U

Outputs
(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) J) U)
(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) J))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) J)
J
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(exp.f64 l)
l
(exp.f64 (neg.f64 l))
(neg.f64 l)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
#s(literal 2 binary64)
U

localize83.0ms (0.9%)

Memory

-1.9MiB live, 235.5MiB allocated; 14ms collecting garbage

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.00390625	(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
accuracy	0.00390625	(cos.f64 (/.f64 K #s(literal 2 binary64)))
accuracy	0.046875	(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
accuracy	29.447691944659375	(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))

Samples

38.0ms	96×	1	valid
18.0ms	130×	0	valid
16.0ms	30×	2	valid

Compiler

Compiled 63 to 16 computations (74.6% saved)

Precisions

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

ival-exp: 26.0ms (45.9% of total)

ival-cos: 9.0ms (15.9% of total)

adjust: 6.0ms (10.6% of total)

ival-mult: 5.0ms (8.8% of total)

ival-div: 4.0ms (7.1% of total)

ival-sub: 2.0ms (3.5% of total)

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

ival-neg: 1.0ms (1.8% of total)

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

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

exact: 0.0ms (0% of total)

series22.0ms (0.2%)

Memory

10.9MiB live, 53.7MiB allocated; 7ms collecting garbage

Counts

5 → 42

Calls

Call 1

Inputs
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(cos.f64 (/.f64 K #s(literal 2 binary64)))

Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* 2 l)))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (neg l)))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (* -1 l)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (* -1 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (cos (/ K 2)) #s(hole binary64 1))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (cos (* 1/2 K))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))

Calls

12 calls:

Time	Variable		Point	Expression
6.0ms	J	@	-inf	((- (exp l) (exp (neg l))) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (cos (/ K 2)))
3.0ms	J	@	0	((- (exp l) (exp (neg l))) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (cos (/ K 2)))
2.0ms	l	@	0	((- (exp l) (exp (neg l))) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (cos (/ K 2)))
2.0ms	K	@	inf	((- (exp l) (exp (neg l))) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (cos (/ K 2)))
2.0ms	l	@	-inf	((- (exp l) (exp (neg l))) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (cos (/ K 2)))

simplify253.0ms (2.7%)

Memory

-15.7MiB live, 286.7MiB allocated; 200ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	191	1278
1	607	1278
2	2328	1168
3	6474	1168
0	8034	1104

Stop Event

1×	iter limit
1×	node limit

Counts

42 → 42

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* 2 l)))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (neg l)))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (* -1 l)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (* -1 l))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (cos (/ K 2)) #s(hole binary64 1))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K 2)) #s(hole binary64 (cos (* 1/2 K))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))

Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)) J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)) J))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* 2 l)))
#s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 #s(literal 1/60 binary64) (.f64 l l) #s(literal 1/3 binary64)))) (fma.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (fma.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 #s(literal 1/60 binary64) (.f64 l l) #s(literal 1/3 binary64)))) (*.f64 l l))) l))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))) l))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* J (- (exp l) (exp (neg l)))) (.f64 (.f64 #s(literal 2 binary64) J) l))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* J (- (exp l) (exp (neg l)))) (.f64 (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) l))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (.f64 J (fma.f64 #s(literal 1/60 binary64) (.f64 l l) #s(literal 1/3 binary64))) (.f64 (.f64 #s(literal 2 binary64) J) l)))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (.f64 (fma.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 J (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (neg l)))))
#s(approx (- (exp l) (exp (neg l))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (* -1 l)))))
#s(approx (- (exp l) (exp (neg l))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (* -1 l))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (.f64 K K) (.f64 #s(literal -1/8 binary64) J) J) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 (.f64 K K) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (.f64 #s(literal 1/384 binary64) K) K #s(literal -1/8 binary64)) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (pow.f64 K #s(literal 4 binary64)) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 #s(literal 1/384 binary64) J (.f64 #s(literal -1/46080 binary64) (.f64 (.f64 K K) J)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (.f64 K K) (.f64 #s(literal -1/8 binary64) J) J) U)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (.f64 K K) (*.f64 #s(literal -1/8 binary64) J) J)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (.f64 (.f64 (.f64 K K) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (.f64 #s(literal 1/384 binary64) K) K #s(literal -1/8 binary64)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (pow.f64 K #s(literal 4 binary64)) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 #s(literal 1/384 binary64) J (.f64 #s(literal -1/46080 binary64) (.f64 (.f64 K K) J)))) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (.f64 K K) (*.f64 #s(literal -1/8 binary64) J) J))))
#s(approx (cos (/ K 2)) #s(hole binary64 1))
#s(approx (cos (/ K 2)) #s(literal 1 binary64))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K 2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K 2)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (/ K 2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K 2)) (fma.f64 (fma.f64 (pow.f64 K #s(literal 4 binary64)) #s(literal -1/46080 binary64) (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64))) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (/ K 2)) #s(hole binary64 (cos (* 1/2 K))))
#s(approx (cos (/ K 2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (*.f64 (/.f64 J U) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (neg.f64 U) (-.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1/2 binary64) K (PI.f64))) (*.f64 (/.f64 J U) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) #s(literal 1 binary64))))

rewrite65.0ms (0.7%)

Memory

7.0MiB live, 96.5MiB allocated; 47ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	14	46
0	23	38
1	74	38
0	513	37

Stop Event

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

Counts

5 → 52

Calls

Call 1

Inputs
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
(cos.f64 (/.f64 K #s(literal 2 binary64)))

Outputs
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(/.f64 (neg.f64 (.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l)) (.f64 (sinh.f64 l) #s(literal 2 binary64)))) (neg.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l)) (.f64 (sinh.f64 l) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(-.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 (neg.f64 l)))
(-.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cosh.f64 l))))
(-.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 (neg.f64 l)) (.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)) (fma.f64 (exp.f64 (neg.f64 l)) (.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 l))
(+.f64 (cosh.f64 l) (-.f64 (sinh.f64 l) (exp.f64 (neg.f64 l))))
(+.f64 (sinh.f64 l) (sinh.f64 l))
(/.f64 (-.f64 (.f64 U U) (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64))) (-.f64 U (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64)) (.f64 U U))) (neg.f64 (-.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)))) (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64)) (.f64 U U)) (-.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) U))
(/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64)) (.f64 U (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)))))))
(/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)))) (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) J) (.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(fma.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (/.f64 K #s(literal -2 binary64))) U)
(fma.f64 J (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (sinh.f64 l) #s(literal 2 binary64))) U)
(fma.f64 (.f64 (sinh.f64 l) #s(literal 2 binary64)) (.f64 J (cos.f64 (/.f64 K #s(literal -2 binary64)))) U)
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))) U)) (/.f64 (.f64 U U) (-.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))) U)))
(-.f64 U (.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal -2 binary64)))) (.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))))
(-.f64 U (.f64 (neg.f64 (.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(-.f64 U (.f64 (neg.f64 J) (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)))) (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)))) (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) #s(literal 2 binary64)))))
(+.f64 U (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))))
(+.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l))) U)
(.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J)
(.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)))
(.f64 (.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (/.f64 K #s(literal -2 binary64))))
(.f64 J (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))))
(.f64 (.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 J (cos.f64 (/.f64 K #s(literal -2 binary64)))))
(.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))
(.f64 #s(literal 2 binary64) (.f64 (sinh.f64 l) J))
(.f64 J (.f64 (sinh.f64 l) #s(literal 2 binary64)))
(.f64 (.f64 (sinh.f64 l) #s(literal 2 binary64)) J)
(/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l)) (.f64 (sinh.f64 l) #s(literal 2 binary64))) J) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) J) (fma.f64 (exp.f64 (neg.f64 l)) (.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(/.f64 (.f64 J (.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l)) (.f64 (sinh.f64 l) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (.f64 J (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 K #s(literal -2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(+.f64 (.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 K #s(literal -2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))

eval24.0ms (0.3%)

Memory: -21.8MiB live, 33.8MiB allocated; 26ms collecting garbage
Compiler: Compiled 2 311 to 376 computations (83.7% saved)

prune8.0ms (0.1%)

Memory

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

Pruning

10 alts after pruning (10 fresh and 0 done)

	Pruned	Kept	Total
New	79	10	89
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	80	10	90

Accuracy

100.0%

Counts

90 → 10

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	100.0%	(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (/.f64 K #s(literal -2 binary64))) U)
▶	96.9%	(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
	93.3%	(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
▶	91.3%	(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
▶	65.3%	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
	74.4%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
	65.3%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
	86.1%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
	80.4%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (*.f64 (/.f64 J U) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #s(literal 1 binary64)) U))
▶	37.6%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)

Compiler

Compiled 520 to 412 computations (20.8% saved)

simplify288.0ms (3%)

Memory

51.5MiB live, 291.0MiB allocated; 179ms collecting garbage

Localize:

Found 17 expressions of interest:

New	Metric	Score
cost-diff	0	#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))
cost-diff	0	(.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))
cost-diff	0	(.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
cost-diff	1	(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
cost-diff	0	#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
cost-diff	0	(.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)))
cost-diff	0	(.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
cost-diff	1	(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
cost-diff	0	(.f64 (.f64 #s(literal 2 binary64) J) l)
cost-diff	0	(.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))
cost-diff	0	#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K))))
cost-diff	0	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
cost-diff	0	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
cost-diff	0	(sinh.f64 l)
cost-diff	0	(*.f64 J #s(literal 2 binary64))
cost-diff	0	(.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))
cost-diff	0	(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (/.f64 K #s(literal -2 binary64))) U)

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	50	430
0	82	430
1	162	430
2	458	430
3	1803	407
4	7611	407
0	9388	405

Stop Event

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

Calls

Call 1

Inputs
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (/.f64 K #s(literal -2 binary64))) U)
(.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 J #s(literal 2 binary64))
J
#s(literal 2 binary64)
(sinh.f64 l)
l
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(/.f64 K #s(literal -2 binary64))
K
#s(literal -2 binary64)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
U
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K))))
(.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))
(.f64 (.f64 #s(literal 2 binary64) J) l)
(*.f64 #s(literal 2 binary64) J)
#s(literal 2 binary64)
J
l
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(*.f64 #s(literal -1/2 binary64) K)
#s(literal -1/2 binary64)
K
U
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)))
J
#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
(.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(*.f64 l l)
l
#s(literal 1/3 binary64)
#s(literal 2 binary64)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
U
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))
J
#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))
(.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64))
(fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
#s(literal 1/2520 binary64)
(*.f64 l l)
l
#s(literal 1/60 binary64)
#s(literal 1/3 binary64)
#s(literal 2 binary64)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
U

Outputs
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (/.f64 K #s(literal -2 binary64))) U)
(fma.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l) U)
(.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))
(.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))
(*.f64 J #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) J)
J
#s(literal 2 binary64)
(sinh.f64 l)
l
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal -2 binary64))
K
#s(literal -2 binary64)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
U
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J))))
(.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))
(.f64 (.f64 #s(literal 2 binary64) J) l)
(.f64 l (.f64 #s(literal 2 binary64) J))
(*.f64 #s(literal 2 binary64) J)
#s(literal 2 binary64)
J
l
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal -1/2 binary64) K)
#s(literal -1/2 binary64)
K
U
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J) U)
(.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J))
(.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)))
(.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)
J
#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l))
(.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))
(*.f64 l l)
l
#s(literal 1/3 binary64)
#s(literal 2 binary64)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
U
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))) U)
(.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))
(.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J)
J
#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))
(.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64))
(fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
#s(literal 1/2520 binary64)
(*.f64 l l)
l
#s(literal 1/60 binary64)
#s(literal 1/3 binary64)
#s(literal 2 binary64)
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(/.f64 K #s(literal 2 binary64))
K
U

localize360.0ms (3.8%)

Memory

-27.5MiB live, 555.5MiB allocated; 146ms collecting garbage

Localize:

Found 17 expressions of interest:

New	Metric	Score
accuracy	0.046875	(.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
accuracy	0.060878759768442016	(fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64))
accuracy	0.2647984071794534	(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
accuracy	3.6658581467305216	#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))
accuracy	0.02734375	(.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
accuracy	0.046875	(.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
accuracy	0.078125	(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
accuracy	9.064755022394165	#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
accuracy	0.00390625	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
accuracy	0.00390625	(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
accuracy	0.10546875	(.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))
accuracy	22.3512176657657	#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K))))
accuracy	39.92661916098542	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
accuracy	0.0	(*.f64 J #s(literal 2 binary64))
accuracy	0.0	(sinh.f64 l)
accuracy	0.00390625	(cos.f64 (/.f64 K #s(literal -2 binary64)))
accuracy	0.0234375	(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (/.f64 K #s(literal -2 binary64))) U)

Samples

142.0ms	96×	1	valid
89.0ms	30×	2	valid
62.0ms	130×	0	valid

Compiler

Compiled 308 to 44 computations (85.7% saved)

Precisions

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

adjust: 79.0ms (36.5% of total)

ival-mult: 46.0ms (21.2% of total)

ival-cos: 28.0ms (12.9% of total)

ival-exp: 27.0ms (12.5% of total)

const: 14.0ms (6.5% of total)

ival-add: 10.0ms (4.6% of total)

ival-sub: 4.0ms (1.8% of total)

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

ival-sinh: 3.0ms (1.4% of total)

ival-neg: 1.0ms (0.5% of total)

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

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

exact: 0.0ms (0% of total)

series101.0ms (1.1%)

Memory

-20.9MiB live, 119.5MiB allocated; 18ms collecting garbage

Counts

23 → 96

Calls

Call 1

Inputs
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (/.f64 K #s(literal -2 binary64))) U)
(.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 J #s(literal 2 binary64))
(sinh.f64 l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K))))
(.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))
(.f64 (.f64 #s(literal 2 binary64) J) l)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)))
#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))
#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
(fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64))

Outputs
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* J (- (exp l) (/ 1 (exp l))))))
#s(approx (* J 2) #s(hole binary64 (* 2 J)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J (* l (cos (* -1/2 K)))))))
#s(approx (* (* 2 J) l) #s(hole binary64 (* 2 (* J l))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* 2 l)))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 2 l)))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 1/60))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (+ 1/60 (* 1/2520 (pow l 2)))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 1/3))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* 1/60 (pow l 2)))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (neg l)))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 1/3 (pow l 3))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* 1/2520 (pow l 2))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* 1/2520 (pow l 4))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (* -1 l))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (* -1 l)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l)))))))))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 1))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))

Calls

12 calls:

Time	Variable		Point	Expression
11.0ms	J	@	inf	((+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (* (* J 2) (sinh l)) (* J 2) (sinh l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (* (* 2 J) l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (cos (/ K -2)) (cos (* -1/2 K)) (+ (* (* l l) 1/3) 2) (* (+ (* (* l l) 1/3) 2) l) (+ (* 1/2520 (* l l)) 1/60) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3))
9.0ms	l	@	-inf	((+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (* (* J 2) (sinh l)) (* J 2) (sinh l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (* (* 2 J) l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (cos (/ K -2)) (cos (* -1/2 K)) (+ (* (* l l) 1/3) 2) (* (+ (* (* l l) 1/3) 2) l) (+ (* 1/2520 (* l l)) 1/60) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3))
8.0ms	K	@	-inf	((+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (* (* J 2) (sinh l)) (* J 2) (sinh l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (* (* 2 J) l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (cos (/ K -2)) (cos (* -1/2 K)) (+ (* (* l l) 1/3) 2) (* (+ (* (* l l) 1/3) 2) l) (+ (* 1/2520 (* l l)) 1/60) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3))
7.0ms	l	@	inf	((+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (* (* J 2) (sinh l)) (* J 2) (sinh l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (* (* 2 J) l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (cos (/ K -2)) (cos (* -1/2 K)) (+ (* (* l l) 1/3) 2) (* (+ (* (* l l) 1/3) 2) l) (+ (* 1/2520 (* l l)) 1/60) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3))
6.0ms	J	@	0	((+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (* (* J 2) (sinh l)) (* J 2) (sinh l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (* (* 2 J) l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* J (- (exp l) (exp (neg l)))) (- (exp l) (exp (neg l))) (cos (/ K -2)) (cos (* -1/2 K)) (+ (* (* l l) 1/3) 2) (* (+ (* (* l l) 1/3) 2) l) (+ (* 1/2520 (* l l)) 1/60) (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3))

simplify159.0ms (1.7%)

Memory

6.2MiB live, 146.5MiB allocated; 32ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	381	2518
1	1217	2510
2	4722	2510
0	8170	2358

Stop Event

1×	iter limit
1×	node limit

Counts

96 → 96

Calls

Call 1

Inputs
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* J (- (exp l) (/ 1 (exp l))))))
#s(approx (* J 2) #s(hole binary64 (* 2 J)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J (* l (cos (* -1/2 K)))))))
#s(approx (* (* 2 J) l) #s(hole binary64 (* 2 (* J l))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* 2 l)))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 2 l)))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 1/60))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (+ 1/60 (* 1/2520 (pow l 2)))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 1/3))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* 1/60 (pow l 2)))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (neg l)))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 1/3 (pow l 3))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* 1/2520 (pow l 2))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* 1/2520 (pow l 4))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (* -1 l))))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (* -1 l)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l)))))))))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 1))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))

Outputs
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* J (- (exp l) (/ 1 (exp l))))))
#s(approx (* (* J 2) (sinh l)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx (* J 2) #s(hole binary64 (* 2 J)))
#s(approx (* J 2) (*.f64 #s(literal 2 binary64) J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J (* l (cos (* -1/2 K)))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))))
#s(approx (* (* 2 J) l) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* 2 J) l) (.f64 (.f64 l J) #s(literal 2 binary64)))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)) J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J)) J))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (.f64 #s(literal 1 binary64) J) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (.f64 #s(literal 1 binary64) J) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 U J))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (fma.f64 (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) (.f64 #s(literal 1/3 binary64) J) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J))) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) J) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) (.f64 #s(literal 1/60 binary64) J) (.f64 (.f64 #s(literal 1/3 binary64) J) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* J 2) (sinh l)) (.f64 (.f64 l J) #s(literal 2 binary64)))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* (* J 2) (sinh l)) (.f64 (fma.f64 (.f64 (.f64 l l) J) #s(literal 1/3 binary64) (.f64 #s(literal 2 binary64) J)) l))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* (* J 2) (sinh l)) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 l l) J) #s(literal 1/60 binary64) (.f64 #s(literal 1/3 binary64) J)) (.f64 (*.f64 l J) #s(literal 2 binary64))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (* (* J 2) (sinh l)) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 (.f64 l l) J) (.f64 #s(literal 1/60 binary64) J)) l) l (.f64 #s(literal 1/3 binary64) J)) (.f64 (*.f64 l J) #s(literal 2 binary64))))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) l)
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) (fma.f64 (pow.f64 l #s(literal 3 binary64)) #s(literal 1/6 binary64) l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 l l) #s(literal 1/6 binary64)) l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx (sinh l) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 (fma.f64 #s(literal 1/5040 binary64) (.f64 l l) #s(literal 1/120 binary64)) (.f64 l l) #s(literal 1/6 binary64)) l))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) (.f64 #s(literal 1/3 binary64) J) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) J) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) (.f64 #s(literal 1/60 binary64) J) (.f64 (.f64 #s(literal 1/3 binary64) J) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (fma.f64 (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) (.f64 #s(literal 1/3 binary64) J) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 #s(literal 2 binary64) J))) l))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) (.f64 #s(literal 1/60 binary64) J) (.f64 (.f64 #s(literal 1/3 binary64) J) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 (fma.f64 (.f64 #s(literal 1/2520 binary64) J) (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) (.f64 (.f64 #s(literal 1/60 binary64) J) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) (.f64 l l) (.f64 (.f64 #s(literal 1/3 binary64) J) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* J (- (exp l) (exp (neg l)))) (.f64 (.f64 l J) #s(literal 2 binary64)))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* J (- (exp l) (exp (neg l)))) (.f64 (fma.f64 (.f64 (.f64 l l) J) #s(literal 1/3 binary64) (.f64 #s(literal 2 binary64) J)) l))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 l l) J) #s(literal 1/60 binary64) (.f64 #s(literal 1/3 binary64) J)) (.f64 (*.f64 l J) #s(literal 2 binary64))))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 (.f64 l l) J) (.f64 #s(literal 1/60 binary64) J)) l) l (.f64 #s(literal 1/3 binary64) J)) (.f64 (*.f64 l J) #s(literal 2 binary64))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* 2 l)))
#s(approx (- (exp l) (exp (neg l))) (*.f64 #s(literal 2 binary64) l))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* 1/60 (pow l 2))))))))
#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (* l (+ 2 (* (pow l 2) (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2))))))))))
#s(approx (- (exp l) (exp (neg l))) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 #s(literal 2 binary64) l)))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (+ (* (* l l) 1/3) 2) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 2 l)))
#s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 #s(literal 2 binary64) l))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* l (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 1/60))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (+ 1/60 (* 1/2520 (pow l 2)))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 1/3))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(literal 1/3 binary64))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* 1/60 (pow l 2)))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (+ 1/3 (* (pow l 2) (+ 1/60 (* 1/2520 (pow l 2)))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (sinh l) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (neg l)))))
#s(approx (- (exp l) (exp (neg l))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) (.f64 (.f64 l l) #s(literal 1/3 binary64)))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (+ (* (* l l) 1/3) 2) (.f64 (.f64 (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64)) l) l))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* 1/3 (pow l 3))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) (*.f64 (pow.f64 l #s(literal 3 binary64)) #s(literal 1/3 binary64)))
#s(approx (* (+ (* (* l l) 1/3) 2) l) #s(hole binary64 (* (pow l 3) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (* (+ (* (* l l) 1/3) 2) l) (.f64 (pow.f64 l #s(literal 3 binary64)) (+.f64 (/.f64 #s(literal 2 binary64) (.f64 l l)) #s(literal 1/3 binary64))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* 1/2520 (pow l 2))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) (.f64 #s(literal 1/2520 binary64) (.f64 l l)))
#s(approx (+ (* 1/2520 (* l l)) 1/60) #s(hole binary64 (* (pow l 2) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* 1/2520 (* l l)) 1/60) (.f64 (.f64 (+.f64 (/.f64 #s(literal 1/60 binary64) (*.f64 l l)) #s(literal 1/2520 binary64)) l) l))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* 1/2520 (pow l 4))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (*.f64 (pow.f64 l #s(literal 4 binary64)) #s(literal 1/2520 binary64)))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (* 1/60 (/ 1 (pow l 2)))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (.f64 (pow.f64 l #s(literal 4 binary64)) (+.f64 (/.f64 #s(literal 1/60 binary64) (.f64 l l)) #s(literal 1/2520 binary64))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) #s(hole binary64 (* (pow l 4) (+ 1/2520 (+ (/ 1/3 (pow l 4)) (* 1/60 (/ 1 (pow l 2))))))))
#s(approx (+ (* (+ (* 1/2520 (* l l)) 1/60) (* l l)) 1/3) (.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (pow.f64 l #s(literal 4 binary64))) #s(literal 1/2520 binary64)) (/.f64 #s(literal -1/60 binary64) (.f64 l l))) (pow.f64 l #s(literal 4 binary64))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* J (- (exp l) (exp (neg l)))) #s(hole binary64 (* J (- (exp l) (exp (* -1 l))))))
#s(approx (* J (- (exp l) (exp (neg l)))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx (- (exp l) (exp (neg l))) #s(hole binary64 (- (exp l) (exp (* -1 l)))))
#s(approx (- (exp l) (exp (neg l))) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 K K) (*.f64 #s(literal -1/8 binary64) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 K K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/46080 binary64) J) (.f64 K K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (.f64 K K))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 K K) (*.f64 #s(literal -1/8 binary64) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 K K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/46080 binary64) J) (.f64 K K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (.f64 K K))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (.f64 (.f64 K K) (.f64 #s(literal -1/8 binary64) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 K K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/46080 binary64) J) (.f64 K K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (.f64 K K))) (.f64 K K) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (fma.f64 #s(literal 1/192 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal -1/4 binary64) (.f64 l J))) K) K (.f64 (.f64 l J) #s(literal 2 binary64))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l)))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (fma.f64 (.f64 (fma.f64 #s(literal -1/23040 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 1/192 binary64) (.f64 l J))) K) K (.f64 #s(literal -1/4 binary64) (.f64 l J))) (.f64 K K) (.f64 (*.f64 l J) #s(literal 2 binary64))))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(literal 1 binary64))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K -2)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (* -1/2 K)) #s(hole binary64 1))
#s(approx (cos (* -1/2 K)) #s(literal 1 binary64))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (* -1/2 K)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (fma.f64 (.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (fma.f64 (.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (neg.f64 U) (fma.f64 (.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (neg.f64 (/.f64 J U)) #s(literal -1 binary64))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (neg.f64 U) (fma.f64 (.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (neg.f64 (/.f64 J U)) #s(literal -1 binary64))))

rewrite104.0ms (1.1%)

Memory

44.8MiB live, 128.3MiB allocated; 21ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	50	340
0	82	318
1	285	317
0	2056	315

Stop Event

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

Counts

23 → 243

Calls

Call 1

Inputs
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (/.f64 K #s(literal -2 binary64))) U)
(.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 J #s(literal 2 binary64))
(sinh.f64 l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K))))
(.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))
(.f64 (.f64 #s(literal 2 binary64) J) l)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)))
#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))
#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
(fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64))

Outputs
(/.f64 (-.f64 (.f64 U U) (pow.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) #s(literal 2 binary64))) (-.f64 U (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) J)) (sinh.f64 l))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) #s(literal 2 binary64)) (.f64 U U))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l))) (pow.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) #s(literal 2 binary64)) (.f64 U U)) (-.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) U))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) #s(literal 2 binary64)) (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l))) (pow.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l) U)
(fma.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) (.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l)) (.f64 #s(literal 2 binary64) J) U)
(fma.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(fma.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U)
(fma.f64 (.f64 (sinh.f64 l) #s(literal 2 binary64)) (.f64 J (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64)) (cos.f64 (/.f64 K #s(literal 2 binary64))) U)
(fma.f64 (sinh.f64 l) (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (.f64 #s(literal 2 binary64) J) (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l)) U)
(fma.f64 #s(literal 2 binary64) (.f64 J (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l))) U)
(fma.f64 J (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 (sinh.f64 l) #s(literal 2 binary64))) U)
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) U)) (/.f64 (.f64 U U) (-.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) U)))
(-.f64 U (.f64 (neg.f64 (.f64 #s(literal 2 binary64) J)) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sinh.f64 l))))
(-.f64 U (.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) (.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))))
(-.f64 U (.f64 (neg.f64 (.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(-.f64 U (.f64 (neg.f64 J) (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 (sinh.f64 l) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l))) (pow.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) J)) (sinh.f64 l))) (pow.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) J)) (sinh.f64 l)) U)
(+.f64 U (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) J)) (sinh.f64 l)))
(.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))
(.f64 (.f64 (sinh.f64 l) #s(literal 2 binary64)) J)
(.f64 (sinh.f64 l) (.f64 #s(literal 2 binary64) J))
(.f64 (.f64 #s(literal 2 binary64) J) (sinh.f64 l))
(.f64 #s(literal 2 binary64) (.f64 J (sinh.f64 l)))
(.f64 #s(literal 2 binary64) (.f64 (sinh.f64 l) J))
(.f64 J (.f64 (sinh.f64 l) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l)) (.f64 (sinh.f64 l) #s(literal 2 binary64))) J) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) J) (fma.f64 (exp.f64 (neg.f64 l)) (.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (.f64 J (.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l)) (.f64 (sinh.f64 l) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (.f64 J (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(fma.f64 (sinh.f64 l) J (*.f64 (sinh.f64 l) J))
(fma.f64 J (sinh.f64 l) (*.f64 J (sinh.f64 l)))
(+.f64 (.f64 J (sinh.f64 l)) (.f64 J (sinh.f64 l)))
(+.f64 (.f64 (sinh.f64 l) J) (.f64 (sinh.f64 l) J))
(*.f64 #s(literal 2 binary64) J)
(*.f64 J #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 J J) (.f64 J J)) (-.f64 J J))
(/.f64 (+.f64 (pow.f64 J #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (fma.f64 J J (-.f64 (.f64 J J) (.f64 J J))))
(neg.f64 (*.f64 J #s(literal -2 binary64)))
(neg.f64 (*.f64 #s(literal -2 binary64) J))
(fma.f64 #s(literal 1 binary64) J (*.f64 #s(literal 1 binary64) J))
(fma.f64 J #s(literal 1 binary64) (*.f64 J #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) J) (.f64 #s(literal 1 binary64) J))
(+.f64 (.f64 J #s(literal 1 binary64)) (.f64 J #s(literal 1 binary64)))
(+.f64 J J)
(*.f64 #s(literal 2 binary64) (/.f64 (sinh.f64 l) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal -2 binary64))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l)) (.f64 (sinh.f64 l) #s(literal 2 binary64))) (.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (.f64 (fma.f64 (exp.f64 (neg.f64 l)) (.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 2 binary64))
(sinh.f64 l)
(neg.f64 (/.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal -2 binary64)))
(-.f64 (/.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
(/.f64 (-.f64 (.f64 U U) (pow.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) #s(literal 2 binary64))) (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) #s(literal 2 binary64)) (.f64 U U))) (neg.f64 (-.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J))))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) #s(literal 2 binary64)) (.f64 U U)) (-.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) U))
(/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) #s(literal 2 binary64)) (.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) U))))
(/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) #s(literal 3 binary64))) (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J))))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) #s(literal 2 binary64)) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) U)) (/.f64 (.f64 U U) (-.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) U)))
(+.f64 (/.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J))))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J))))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) #s(literal 2 binary64)))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))) U)
(+.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J))))
(.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 #s(literal 2 binary64) J)) l)
(.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64)) (.f64 l J))
(.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) l) (.f64 #s(literal 2 binary64) J))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 l (.f64 #s(literal 2 binary64) J)))
(.f64 (.f64 l (.f64 #s(literal 2 binary64) J)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))
(.f64 l (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))
(.f64 (.f64 #s(literal 2 binary64) J) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) l))
(.f64 #s(literal 2 binary64) (.f64 (.f64 l J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))
(.f64 #s(literal 2 binary64) (.f64 J (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) l)))
(.f64 J (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) l)))
(.f64 (.f64 l #s(literal 2 binary64)) J)
(.f64 (.f64 l J) #s(literal 2 binary64))
(.f64 l (.f64 #s(literal 2 binary64) J))
(.f64 (.f64 #s(literal 2 binary64) J) l)
(.f64 #s(literal 2 binary64) (.f64 l J))
(.f64 J (.f64 #s(literal 2 binary64) l))
(neg.f64 (.f64 #s(literal -2 binary64) (.f64 l J)))
(fma.f64 l J (*.f64 l J))
(fma.f64 J l (*.f64 l J))
(+.f64 (.f64 l J) (.f64 l J))
(/.f64 (-.f64 (.f64 U U) (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64))) (-.f64 U (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64)) (.f64 U U))) (neg.f64 (-.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J))) (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64)) (.f64 U U)) (-.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) U))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) U))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J))) (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) U)
(fma.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))) J U)
(fma.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J) U)
(fma.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))) U)
(fma.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) (*.f64 J (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 J (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))) U)
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)) U)) (/.f64 (.f64 U U) (-.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)) U)))
(-.f64 U (.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)))
(-.f64 U (.f64 (neg.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)) (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(-.f64 U (.f64 (neg.f64 J) (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)))))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J))) (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J))) (pow.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)) #s(literal 2 binary64)))))
(+.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)) U)
(+.f64 U (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J)))
(.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)))
(.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l))) J)
(.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J))
(.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) (.f64 J (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(.f64 J (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l))))
(.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)
(.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)))
#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l))
(/.f64 (-.f64 (.f64 U U) (pow.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 U (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 U U))) (neg.f64 (-.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))) (pow.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 U U)) (-.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))) (pow.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) U)
(fma.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (cos.f64 (/.f64 K #s(literal 2 binary64)))) J U)
(fma.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))) U)
(fma.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) (*.f64 J (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) U)
(fma.f64 J (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)) (/.f64 (.f64 U U) (-.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)))
(-.f64 U (.f64 (neg.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J)) (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(-.f64 U (.f64 (neg.f64 (cos.f64 (/.f64 K #s(literal 2 binary64)))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J)))
(-.f64 U (.f64 (neg.f64 J) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) (cos.f64 (/.f64 K #s(literal 2 binary64))))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))) (pow.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))) (pow.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 U (.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)))
(.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) (cos.f64 (/.f64 K #s(literal 2 binary64)))) J)
(.f64 (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J) (cos.f64 (/.f64 K #s(literal 2 binary64))))
(.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) (.f64 J (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) J))
(.f64 J (.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l)) (cos.f64 (/.f64 K #s(literal 2 binary64)))))
(.f64 #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) J)
(.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)))
#s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))
(fma.f64 (sin.f64 (/.f64 K #s(literal -2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (/.f64 (+.f64 (neg.f64 K) (PI.f64)) #s(literal 2 binary64)))
(sin.f64 (/.f64 (+.f64 K (PI.f64)) #s(literal 2 binary64)))
(cos.f64 (/.f64 K #s(literal 2 binary64)))
(cos.f64 (/.f64 K #s(literal -2 binary64)))
(+.f64 (.f64 (sin.f64 (/.f64 K #s(literal -2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (/.f64 K #s(literal 2 binary64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) K)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) K (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal -1/2 binary64) K (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) K)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) K)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 4 binary64) (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64))) (-.f64 #s(literal 2 binary64) (.f64 #s(literal 1/3 binary64) (.f64 l l))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64))) (neg.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) (.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (fma.f64 (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (fabs.f64 l)) (fabs.f64 l) #s(literal 2 binary64))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (neg.f64 l)) (neg.f64 l) #s(literal 2 binary64))
(fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))
(fma.f64 (fabs.f64 l) (*.f64 (fabs.f64 l) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(fma.f64 (neg.f64 l) (*.f64 (neg.f64 l) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(fma.f64 l (*.f64 #s(literal 1/3 binary64) l) #s(literal 2 binary64))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64))))
(-.f64 #s(literal 2 binary64) (.f64 #s(literal -1/3 binary64) (.f64 l l)))
(-.f64 #s(literal 2 binary64) (.f64 (neg.f64 (.f64 l l)) #s(literal 1/3 binary64)))
(-.f64 #s(literal 2 binary64) (.f64 (neg.f64 l) (.f64 #s(literal 1/3 binary64) l)))
(+.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 (/.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (.f64 l l) #s(literal 2/3 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (.f64 l l) #s(literal 2/3 binary64)))))
(+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 l l))))
(+.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64))
(+.f64 #s(literal 2 binary64) (.f64 #s(literal 1/3 binary64) (.f64 l l)))
(.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)
(.f64 l (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) l) (-.f64 (.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)))
(/.f64 (.f64 (fma.f64 (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64)) l) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (.f64 l l) #s(literal 2/3 binary64))))
(/.f64 (.f64 l (-.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)))
(/.f64 (.f64 l (fma.f64 (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 1/27 binary64) #s(literal 8 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (.f64 l l) #s(literal 2/3 binary64))))
(fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) l (*.f64 #s(literal 2 binary64) l))
(fma.f64 l (.f64 #s(literal 1/3 binary64) (.f64 l l)) (*.f64 l #s(literal 2 binary64)))
(fma.f64 l #s(literal 2 binary64) (.f64 l (.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(fma.f64 #s(literal 2 binary64) l (.f64 (.f64 #s(literal 1/3 binary64) (*.f64 l l)) l))
(+.f64 (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) l) (.f64 #s(literal 2 binary64) l))
(+.f64 (.f64 #s(literal 2 binary64) l) (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) l))
(+.f64 (.f64 l (.f64 #s(literal 1/3 binary64) (.f64 l l))) (.f64 l #s(literal 2 binary64)))
(+.f64 (.f64 l #s(literal 2 binary64)) (.f64 l (.f64 #s(literal 1/3 binary64) (.f64 l l))))
(/.f64 (-.f64 #s(literal 1/3600 binary64) (pow.f64 (.f64 #s(literal 1/2520 binary64) (.f64 l l)) #s(literal 2 binary64))) (-.f64 #s(literal 1/60 binary64) (.f64 #s(literal 1/2520 binary64) (.f64 l l))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/2520 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64))) (neg.f64 (-.f64 (.f64 #s(literal 1/2520 binary64) (.f64 l l)) #s(literal 1/60 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 1/216000 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/2520 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64)) (.f64 (*.f64 l l) #s(literal 1/151200 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/2520 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64)) (-.f64 (.f64 #s(literal 1/2520 binary64) (.f64 l l)) #s(literal 1/60 binary64)))
(/.f64 (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 1/216000 binary64)) (+.f64 #s(literal 1/3600 binary64) (-.f64 (pow.f64 (.f64 #s(literal 1/2520 binary64) (.f64 l l)) #s(literal 2 binary64)) (.f64 (*.f64 l l) #s(literal 1/151200 binary64)))))
(/.f64 (fma.f64 #s(literal 1/16003008000 binary64) (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 1/216000 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/2520 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64)) (.f64 (*.f64 l l) #s(literal 1/151200 binary64))))
(fma.f64 (*.f64 #s(literal 1/2520 binary64) (fabs.f64 l)) (fabs.f64 l) #s(literal 1/60 binary64))
(fma.f64 (*.f64 #s(literal 1/2520 binary64) (neg.f64 l)) (neg.f64 l) #s(literal 1/60 binary64))
(fma.f64 (*.f64 #s(literal 1/2520 binary64) l) l #s(literal 1/60 binary64))
(fma.f64 (fabs.f64 l) (*.f64 (fabs.f64 l) #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))
(fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))
(fma.f64 (*.f64 l l) #s(literal 1/2520 binary64) #s(literal 1/60 binary64))
(fma.f64 (neg.f64 l) (*.f64 (neg.f64 l) #s(literal 1/2520 binary64)) #s(literal 1/60 binary64))
(fma.f64 l (*.f64 #s(literal 1/2520 binary64) l) #s(literal 1/60 binary64))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal 1/2520 binary64) (.f64 l l)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2520 binary64) (.f64 l l)) #s(literal 1/60 binary64))) (/.f64 #s(literal 1/3600 binary64) (-.f64 (.f64 #s(literal 1/2520 binary64) (.f64 l l)) #s(literal 1/60 binary64))))
(-.f64 #s(literal 1/60 binary64) (.f64 (neg.f64 (.f64 #s(literal 1/2520 binary64) l)) l))
(-.f64 #s(literal 1/60 binary64) (.f64 #s(literal -1/2520 binary64) (.f64 l l)))
(-.f64 #s(literal 1/60 binary64) (.f64 (neg.f64 (.f64 l l)) #s(literal 1/2520 binary64)))
(+.f64 (/.f64 (pow.f64 (.f64 #s(literal 1/2520 binary64) (.f64 l l)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/2520 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64)) (.f64 (.f64 l l) #s(literal 1/151200 binary64)))) (/.f64 #s(literal 1/216000 binary64) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/2520 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 1/3600 binary64)) (.f64 (.f64 l l) #s(literal 1/151200 binary64)))))
(+.f64 (.f64 #s(literal 1/2520 binary64) (.f64 l l)) #s(literal 1/60 binary64))
(+.f64 #s(literal 1/60 binary64) (.f64 #s(literal 1/2520 binary64) (.f64 l l)))
(/.f64 (-.f64 #s(literal 1/9 binary64) (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64))) (-.f64 #s(literal 1/3 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)) #s(literal 1/9 binary64))) (neg.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 1/3 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/27 binary64) (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/3 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l)) (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)) #s(literal 1/9 binary64)) (-.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 1/3 binary64)))
(/.f64 (+.f64 #s(literal 1/27 binary64) (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 3 binary64))) (+.f64 #s(literal 1/9 binary64) (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) (.f64 #s(literal 1/3 binary64) l)))))
(/.f64 (+.f64 #s(literal 1/27 binary64) (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/3 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l)) (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64))))
(fma.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (fabs.f64 l)) (fabs.f64 l) #s(literal 1/3 binary64))
(fma.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (neg.f64 l)) (neg.f64 l) #s(literal 1/3 binary64))
(fma.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l #s(literal 1/3 binary64))
(fma.f64 (fabs.f64 l) (.f64 (fabs.f64 l) (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64))) #s(literal 1/3 binary64))
(fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64))
(fma.f64 (.f64 l l) (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) #s(literal 1/3 binary64))
(fma.f64 (neg.f64 l) (.f64 (neg.f64 l) (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64))) #s(literal 1/3 binary64))
(fma.f64 l (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) #s(literal 1/3 binary64))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 1/3 binary64))) (/.f64 #s(literal 1/9 binary64) (-.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 1/3 binary64))))
(-.f64 #s(literal 1/3 binary64) (.f64 (neg.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l)) l))
(-.f64 #s(literal 1/3 binary64) (.f64 (neg.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64))) (*.f64 l l)))
(-.f64 #s(literal 1/3 binary64) (.f64 (neg.f64 (.f64 l l)) (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/3 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l)) (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)))) (/.f64 #s(literal 1/27 binary64) (fma.f64 #s(literal 1/3 binary64) (-.f64 #s(literal 1/3 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) l) l)) (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l) #s(literal 1/3 binary64))
(+.f64 #s(literal 1/3 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) l) l))

eval59.0ms (0.6%)

Memory: 11.6MiB live, 57.2MiB allocated; 5ms collecting garbage
Compiler: Compiled 11 533 to 1 540 computations (86.6% saved)

prune48.0ms (0.5%)

Memory

-23.0MiB live, 37.5MiB allocated; 25ms collecting garbage

Pruning

16 alts after pruning (15 fresh and 1 done)

	Pruned	Kept	Total
New	320	14	334
Fresh	4	1	5
Picked	4	1	5
Done	0	0	0
Total	328	16	344

Accuracy

100.0%

Counts

344 → 16

Alt Table

Click to see full alt table

Status	Accuracy	Program
	72.6%	(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U)
▶	100.0%	(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
	82.5%	(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(literal 1 binary64)) U)
	96.9%	(fma.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) U)
	91.3%	(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) l (*.f64 #s(literal 2 binary64) l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
	93.3%	(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 #s(approx (+ ( 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
	47.9%	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))))) U)
▶	48.3%	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
	51.3%	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) U)
	65.3%	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 #s(literal 2 binary64) J)) l)) U)
	47.5%	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
▶	56.5%	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
▶	65.3%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
	86.9%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (fma.f64 (.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
▶	86.1%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
✓	37.6%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)

Compiler

Compiled 917 to 725 computations (20.9% saved)

simplify172.0ms (1.8%)

Memory

19.3MiB live, 251.8MiB allocated; 31ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
cost-diff	0	(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
cost-diff	0	(.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))
cost-diff	0	(fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U)
cost-diff	0	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
cost-diff	0	(*.f64 l J)
cost-diff	0	(.f64 (.f64 l J) #s(literal 2 binary64))
cost-diff	0	(fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)
cost-diff	0	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
cost-diff	0	(.f64 (.f64 #s(literal 2 binary64) J) l)
cost-diff	0	(.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))
cost-diff	0	#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))))
cost-diff	0	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
cost-diff	0	(.f64 (.f64 l J) #s(literal 2 binary64))
cost-diff	0	#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))
cost-diff	0	#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64))))
cost-diff	0	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
cost-diff	0	(sinh.f64 l)
cost-diff	0	(*.f64 J #s(literal 2 binary64))
cost-diff	0	(.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))
cost-diff	0	(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	62	448
0	90	448
1	186	448
2	541	448
3	2240	448
0	8199	446

Stop Event

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

Calls

Call 1

Inputs
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 J #s(literal 2 binary64))
J
#s(literal 2 binary64)
(sinh.f64 l)
l
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(*.f64 #s(literal -1/2 binary64) K)
#s(literal -1/2 binary64)
K
U
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))
(.f64 (.f64 l J) #s(literal 2 binary64))
(*.f64 l J)
l
J
#s(literal 2 binary64)
U
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))))
(.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))
(.f64 (.f64 #s(literal 2 binary64) J) l)
(*.f64 #s(literal 2 binary64) J)
#s(literal 2 binary64)
J
l
#s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
(fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64))
(.f64 #s(literal 1/384 binary64) (.f64 K K))
#s(literal 1/384 binary64)
(*.f64 K K)
K
#s(literal 1/8 binary64)
#s(literal 1 binary64)
U
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)
(.f64 (.f64 l J) #s(literal 2 binary64))
(*.f64 l J)
l
J
#s(literal 2 binary64)
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(*.f64 #s(literal -1/2 binary64) K)
#s(literal -1/2 binary64)
K
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U)
(.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(*.f64 #s(literal -1/2 binary64) K)
#s(literal -1/2 binary64)
K
(.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
J
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(*.f64 l l)
l
#s(literal 1/3 binary64)
#s(literal 2 binary64)
U

Outputs
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(fma.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U)
(.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))
(.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))
(*.f64 J #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) J)
J
#s(literal 2 binary64)
(sinh.f64 l)
l
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal -1/2 binary64) K)
#s(literal -1/2 binary64)
K
U
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))
(.f64 (.f64 l J) #s(literal 2 binary64))
(*.f64 l J)
l
J
#s(literal 2 binary64)
U
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (*.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (*.f64 l J) #s(literal 2 binary64))))
(.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))
(.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (*.f64 l J) #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 2 binary64) J) l)
(.f64 (.f64 l J) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) J)
#s(literal 2 binary64)
J
l
#s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
(fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))
(-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64))
(-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64))
(.f64 #s(literal 1/384 binary64) (.f64 K K))
(.f64 (.f64 K K) #s(literal 1/384 binary64))
#s(literal 1/384 binary64)
(*.f64 K K)
K
#s(literal 1/8 binary64)
#s(literal 1 binary64)
U
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
(fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)
(fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(.f64 (.f64 l J) #s(literal 2 binary64))
(*.f64 l J)
l
J
#s(literal 2 binary64)
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal -1/2 binary64) K)
#s(literal -1/2 binary64)
K
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) U))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U)
(fma.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) U)
(.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))
(.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal -1/2 binary64) K)
#s(literal -1/2 binary64)
K
(.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
(.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J)
J
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))
(*.f64 l l)
l
#s(literal 1/3 binary64)
#s(literal 2 binary64)
U

localize229.0ms (2.4%)

Memory

-2.0MiB live, 234.0MiB allocated; 20ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.07650375976844201	(.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))
accuracy	0.078125	(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
accuracy	4.321788262787178	(.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
accuracy	10.759605687912025	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
accuracy	0.0	(*.f64 #s(literal -1/2 binary64) K)
accuracy	0.00390625	(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
accuracy	0.04296875	(fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)
accuracy	22.191625130985024	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
accuracy	0.10546875	(.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))
accuracy	0.1875	(.f64 #s(literal 1/384 binary64) (.f64 K K))
accuracy	22.3512176657657	#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))))
accuracy	29.077737333254273	#s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
accuracy	0.0	(*.f64 l J)
accuracy	0.00390625	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
accuracy	21.440414393395436	#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))
accuracy	22.3512176657657	#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64))))
accuracy	0.0	(sinh.f64 l)
accuracy	0.0	#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
accuracy	0.00390625	(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
accuracy	0.0234375	(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)

Samples

133.0ms	110×	1	valid
48.0ms	131×	0	valid
16.0ms	15×	2	valid

Compiler

Compiled 305 to 50 computations (83.6% saved)

Precisions

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

ival-exp: 41.0ms (28.8% of total)

ival-mult: 36.0ms (25.3% of total)

adjust: 18.0ms (12.7% of total)

ival-cos: 18.0ms (12.7% of total)

const: 10.0ms (7% of total)

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

ival-sub: 3.0ms (2.1% of total)

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

ival-sinh: 2.0ms (1.4% of total)

exact: 1.0ms (0.7% of total)

ival-neg: 1.0ms (0.7% of total)

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

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

series58.0ms (0.6%)

Memory

6.8MiB live, 99.9MiB allocated; 15ms collecting garbage

Counts

25 → 119

Calls

Call 1

Inputs
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 J #s(literal 2 binary64))
(sinh.f64 l)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))
(.f64 (.f64 l J) #s(literal 2 binary64))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))))
(.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))
(.f64 (.f64 #s(literal 2 binary64) J) l)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)
(*.f64 l J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U)
(.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
#s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
(.f64 #s(literal 1/384 binary64) (.f64 K K))
(*.f64 #s(literal -1/2 binary64) K)
(.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))

Outputs
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* J (- (exp l) (/ 1 (exp l))))))
#s(approx (* J 2) #s(hole binary64 (* 2 J)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J (* l (cos (* -1/2 K)))))))
#s(approx (* (* l J) 2) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* 2 J) l) #s(hole binary64 (* 2 (* J l))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 U))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (* l J) #s(hole binary64 (* J l)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* 2 (* J (* l (cos (* -1/2 K)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* J (+ (* 2 (* l (cos (* -1/2 K)))) (/ U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (+ (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (/ U J)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* J (+ (* -2 (* l (cos (* -1/2 K)))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 2 (* J (cos (* -1/2 K))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* 2 J)))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* l (+ (* 2 (* J (cos (* -1/2 K)))) (/ U l)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* -1/2 K)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (+ (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (/ U (pow l 3)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* (pow l 2) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* 1/3 (* J (pow l 2)))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* l (+ (* -2 (* J (cos (* -1/2 K)))) (* -1 (/ U l)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 (* J (cos (* -1/2 K))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l)))))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 1))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (* 1/384 (* K K)) #s(hole binary64 (* 1/384 (pow K 2))))
#s(approx (* -1/2 K) #s(hole binary64 (* -1/2 K)))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* U (+ 1 (* 2 (/ (* J (* l (cos (* -1/2 K)))) U))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* U (- (* -2 (/ (* J (* l (cos (* -1/2 K)))) U)) 1)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)) 1)))))

Calls

12 calls:

Time	Variable		Point	Expression
10.0ms	l	@	-inf	((+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (* (* J 2) (sinh l)) (* J 2) (sinh l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (* (* l J) 2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (* (* 2 J) l) (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (* l J) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (cos (* -1/2 K)) (cos (/ K -2)) (cos (* -1/2 K)) (* 1/384 (* K K)) (* -1/2 K) (* J (+ (* (* l l) 1/3) 2)) (+ (* (* l l) 1/3) 2))
9.0ms	J	@	0	((+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (* (* J 2) (sinh l)) (* J 2) (sinh l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (* (* l J) 2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (* (* 2 J) l) (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (* l J) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (cos (* -1/2 K)) (cos (/ K -2)) (cos (* -1/2 K)) (* 1/384 (* K K)) (* -1/2 K) (* J (+ (* (* l l) 1/3) 2)) (+ (* (* l l) 1/3) 2))
5.0ms	J	@	-inf	((+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (* (* J 2) (sinh l)) (* J 2) (sinh l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (* (* l J) 2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (* (* 2 J) l) (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (* l J) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (cos (* -1/2 K)) (cos (/ K -2)) (cos (* -1/2 K)) (* 1/384 (* K K)) (* -1/2 K) (* J (+ (* (* l l) 1/3) 2)) (+ (* (* l l) 1/3) 2))
5.0ms	J	@	inf	((+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (* (* J 2) (sinh l)) (* J 2) (sinh l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (* (* l J) 2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (* (* 2 J) l) (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (* l J) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (cos (* -1/2 K)) (cos (/ K -2)) (cos (* -1/2 K)) (* 1/384 (* K K)) (* -1/2 K) (* J (+ (* (* l l) 1/3) 2)) (+ (* (* l l) 1/3) 2))
5.0ms	K	@	-inf	((+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (* (* J 2) (sinh l)) (* J 2) (sinh l) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (* (* l J) 2) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (* (* 2 J) l) (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (* l J) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (cos (* -1/2 K)) (cos (/ K -2)) (cos (* -1/2 K)) (* 1/384 (* K K)) (* -1/2 K) (* J (+ (* (* l l) 1/3) 2)) (+ (* (* l l) 1/3) 2))

simplify835.0ms (8.8%)

Memory

-141.2MiB live, 269.5MiB allocated; 1.0s collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	492	3641
1	1585	3595
2	7234	3582
0	9085	3328

Stop Event

1×	iter limit
1×	node limit

Counts

119 → 119

Calls

Call 1

Inputs
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* J (- (exp l) (/ 1 (exp l))))))
#s(approx (* J 2) #s(hole binary64 (* 2 J)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J (* l (cos (* -1/2 K)))))))
#s(approx (* (* l J) 2) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* 2 J) l) #s(hole binary64 (* 2 (* J l))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 U))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (* l J) #s(hole binary64 (* J l)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* 2 (* J (* l (cos (* -1/2 K)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* J (+ (* 2 (* l (cos (* -1/2 K)))) (/ U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (+ (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (/ U J)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* J (+ (* -2 (* l (cos (* -1/2 K)))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 2 (* J (cos (* -1/2 K))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* 2 J)))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* l (+ (* 2 (* J (cos (* -1/2 K)))) (/ U l)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* -1/2 K)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (+ (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (/ U (pow l 3)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* (pow l 2) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* 1/3 (* J (pow l 2)))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* l (+ (* -2 (* J (cos (* -1/2 K)))) (* -1 (/ U l)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 (* J (cos (* -1/2 K))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l)))))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 1))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (* 1/384 (* K K)) #s(hole binary64 (* 1/384 (pow K 2))))
#s(approx (* -1/2 K) #s(hole binary64 (* -1/2 K)))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* U (+ 1 (* 2 (/ (* J (* l (cos (* -1/2 K)))) U))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* U (- (* -2 (/ (* J (* l (cos (* -1/2 K)))) U)) 1)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)) 1)))))

Outputs
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* J (- (exp l) (/ 1 (exp l))))))
#s(approx (* (* J 2) (sinh l)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx (* J 2) #s(hole binary64 (* 2 J)))
#s(approx (* J 2) (*.f64 #s(literal 2 binary64) J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J (* l (cos (* -1/2 K)))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (* l J) 2) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* l J) 2) (.f64 (.f64 l J) #s(literal 2 binary64)))
#s(approx (* (* 2 J) l) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* l J) 2) (.f64 (.f64 l J) #s(literal 2 binary64)))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 U))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) U)
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (* l J) #s(hole binary64 (* J l)))
#s(approx (* l J) (*.f64 l J))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) U)
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* 2 (* J (* l (cos (* -1/2 K)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* J (+ (* 2 (* l (cos (* -1/2 K)))) (/ U J)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (fma.f64 (.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (+ (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (/ U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (neg.f64 (.f64 (neg.f64 J) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (neg.f64 (.f64 (neg.f64 J) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* J (+ (* -2 (* l (cos (* -1/2 K)))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (neg.f64 J) (fma.f64 (.f64 #s(literal -2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) J))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (neg.f64 J) (neg.f64 (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (fma.f64 (.f64 (.f64 l l) (.f64 (.f64 (.f64 l l) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) #s(literal 1/60 binary64) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* J 2) (sinh l)) (.f64 (.f64 l J) #s(literal 2 binary64)))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* (* J 2) (sinh l)) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* (* J 2) (sinh l)) (.f64 (fma.f64 (.f64 #s(literal 1/60 binary64) J) (pow.f64 l #s(literal 4 binary64)) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) l))
#s(approx (* (* J 2) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (* (* J 2) (sinh l)) (.f64 (fma.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J (.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 #s(literal 1/2520 binary64) (.f64 (.f64 l l) J) (.f64 #s(literal 1/60 binary64) J)))) l))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) l)
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) (fma.f64 (pow.f64 l #s(literal 3 binary64)) #s(literal 1/6 binary64) l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 l l) #s(literal 1/6 binary64)) l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx (sinh l) (fma.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 (fma.f64 #s(literal 1/5040 binary64) (.f64 l l) #s(literal 1/120 binary64)) (.f64 l l) #s(literal 1/6 binary64)) l))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (.f64 (.f64 l l) (.f64 (.f64 (.f64 l l) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) #s(literal 1/60 binary64) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (fma.f64 (.f64 (.f64 l l) (.f64 (.f64 (.f64 l l) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) #s(literal 1/60 binary64) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (.f64 (pow.f64 l #s(literal 4 binary64)) (fma.f64 (.f64 #s(literal 1/2520 binary64) J) (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 #s(literal 1/60 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))))) l))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 2 (* J (cos (* -1/2 K))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* 2 J)))
#s(approx (* J (+ (* (* l l) 1/3) 2)) (*.f64 #s(literal 2 binary64) J))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (+ (* 1/3 (* J (pow l 2))) (* 2 J))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (+ (* (* l l) 1/3) 2) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (sinh l) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* l (+ (* 2 (* J (cos (* -1/2 K)))) (/ U l)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J) (/.f64 U l)) l))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* -1/2 K)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 #s(literal 1/3 binary64) J)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 #s(literal 2 binary64) J)) (*.f64 l l))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (+ (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 #s(literal 2 binary64) J) (/.f64 U l)) (.f64 l l))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (.f64 (.f64 (.f64 (.f64 l l) J) #s(literal 1/3 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* (pow l 2) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 #s(literal 2 binary64) J)) (.f64 l l))) (.f64 l l)))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* 1/3 (* J (pow l 2)))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) (.f64 (.f64 (*.f64 l l) J) #s(literal 1/3 binary64)))
#s(approx (* J (+ (* (* l l) 1/3) 2)) #s(hole binary64 (* (pow l 2) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (* J (+ (* (* l l) 1/3) 2)) (.f64 (.f64 (fma.f64 (/.f64 J (.f64 l l)) #s(literal 2 binary64) (.f64 #s(literal 1/3 binary64) J)) l) l))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) (.f64 (.f64 l l) #s(literal 1/3 binary64)))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (+ (* (* l l) 1/3) 2) (.f64 (.f64 (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 l l)) #s(literal 1/3 binary64)) l) l))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J) U))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* l (+ (* -2 (* J (cos (* -1/2 K)))) (* -1 (/ U l)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (fma.f64 (.f64 #s(literal -2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U (neg.f64 l))) (neg.f64 l)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (pow.f64 (neg.f64 l) #s(literal 3 binary64)) (fma.f64 (.f64 #s(literal -1/3 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 (.f64 (.f64 #s(literal -2 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (*.f64 l l)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 (* J (cos (* -1/2 K))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (pow.f64 (neg.f64 l) #s(literal 3 binary64)) (fma.f64 (.f64 #s(literal -1/3 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 (fma.f64 (.f64 #s(literal -2 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 U (neg.f64 l))) (.f64 l l)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) J) (*.f64 K K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 K K) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (fma.f64 (.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal -1/46080 binary64) (.f64 (.f64 K K) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (.f64 K K))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) J) (*.f64 K K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 K K) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (fma.f64 (.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal -1/46080 binary64) (.f64 (.f64 K K) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (.f64 K K))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 K K)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 K K) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (fma.f64 (.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal -1/46080 binary64) (.f64 (.f64 K K) J)) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))) (.f64 K K))) (.f64 K K) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (fma.f64 #s(literal 1/192 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal -1/4 binary64) (.f64 l J))) K) K (.f64 (.f64 l J) #s(literal 2 binary64))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l)))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 #s(literal 2 binary64) l) J (.f64 (fma.f64 (.f64 (fma.f64 #s(literal -1/23040 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 1/192 binary64) (.f64 l J))) K) K (.f64 #s(literal -1/4 binary64) (.f64 l J))) (*.f64 K K))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l J)) (.f64 K K) U)))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 (fma.f64 #s(literal 1/192 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal -1/4 binary64) (.f64 l J))) K) K (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (fma.f64 (.f64 (fma.f64 #s(literal -1/23040 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 1/192 binary64) (.f64 l J))) K) K (.f64 #s(literal -1/4 binary64) (.f64 l J))) (.f64 K K) (fma.f64 (.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J (fma.f64 (.f64 (.f64 K K) #s(literal -1/8 binary64)) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) J) l) (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) J) l) (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/46080 binary64) (.f64 (.f64 K K) J)) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (.f64 K K))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (* J (+ 2 (* 1/3 (pow l 2))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* J (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 K K) J)) (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)) K) K)) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) #s(hole binary64 (+ (* J (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* J (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (.f64 (fma.f64 (.f64 #s(literal 1/384 binary64) (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))) J (.f64 (.f64 #s(literal -1/46080 binary64) (.f64 (.f64 K K) J)) (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) (.f64 K K))) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) J)))
#s(approx (cos (* -1/2 K)) #s(hole binary64 1))
#s(approx (cos (* -1/2 K)) #s(literal 1 binary64))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(literal 1 binary64))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K -2)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64)))
#s(approx (* 1/384 (* K K)) #s(hole binary64 (* 1/384 (pow K 2))))
#s(approx (* 1/384 (* K K)) (.f64 #s(literal 1/384 binary64) (.f64 K K)))
#s(approx (* -1/2 K) #s(hole binary64 (* -1/2 K)))
#s(approx (* -1/2 K) (*.f64 #s(literal -1/2 binary64) K))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (* -1/2 K)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (fma.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (fma.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* U (+ 1 (* 2 (/ (* J (* l (cos (* -1/2 K)))) U))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (fma.f64 (.f64 (.f64 l J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 J U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (neg.f64 U) (fma.f64 (neg.f64 J) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)) #s(literal -1 binary64))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (neg.f64 U) (fma.f64 (neg.f64 J) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)) #s(literal -1 binary64))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* U (- (* -2 (/ (* J (* l (cos (* -1/2 K)))) U)) 1)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (neg.f64 U) (fma.f64 (.f64 #s(literal -2 binary64) J) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 l U)) #s(literal -1 binary64))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)) 1)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (neg.f64 U) (fma.f64 (neg.f64 J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 l U)) #s(literal -1 binary64))))

rewrite101.0ms (1.1%)

Memory

-7.9MiB live, 132.3MiB allocated; 22ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	62	367
0	90	357
1	318	357
0	2294	355

Stop Event

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

Counts

25 → 268

Calls

Call 1

Inputs
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l))
(*.f64 J #s(literal 2 binary64))
(sinh.f64 l)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))
(.f64 (.f64 l J) #s(literal 2 binary64))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))))
(.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))
(.f64 (.f64 #s(literal 2 binary64) J) l)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U)
(*.f64 l J)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U)
(.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
#s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
(.f64 #s(literal 1/384 binary64) (.f64 K K))
(*.f64 #s(literal -1/2 binary64) K)
(.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))

Outputs
(/.f64 (-.f64 (.f64 U U) (pow.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 U (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 U U))) (neg.f64 (-.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64)))) (pow.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 U U)) (-.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) U))
(/.f64 (+.f64 (pow.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) U))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64)))) (pow.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) J U)
(fma.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (*.f64 #s(literal 2 binary64) J)) (sinh.f64 l) U)
(fma.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64)) U)
(fma.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (sinh.f64 l)) (*.f64 #s(literal 2 binary64) J) U)
(fma.f64 (.f64 (sinh.f64 l) #s(literal 2 binary64)) (.f64 J #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) U)
(fma.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64)) U)
(fma.f64 (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)
(fma.f64 (sinh.f64 l) (.f64 (.f64 #s(literal 2 binary64) J) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) U)
(fma.f64 (.f64 #s(literal 2 binary64) J) (.f64 #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (sinh.f64 l)) U)
(fma.f64 #s(literal 2 binary64) (.f64 J (.f64 #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (sinh.f64 l))) U)
(fma.f64 J (.f64 (.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) U)
(fma.f64 J (.f64 #s(literal 2 binary64) (.f64 #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (sinh.f64 l))) U)
(-.f64 (/.f64 (pow.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))) U)) (/.f64 (.f64 U U) (-.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (*.f64 (sinh.f64 l) J) #s(literal 2 binary64))) U)))
(-.f64 U (.f64 (neg.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))))
(-.f64 U (.f64 (neg.f64 (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))))
(-.f64 U (.f64 (neg.f64 (.f64 #s(literal 2 binary64) J)) (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (sinh.f64 l))))
(+.f64 (/.f64 (pow.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64)))) (pow.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64)))) (pow.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(+.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))) U)
(+.f64 U (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))))
(.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))
(.f64 (.f64 (sinh.f64 l) #s(literal 2 binary64)) J)
(.f64 (sinh.f64 l) (.f64 #s(literal 2 binary64) J))
(.f64 (.f64 #s(literal 2 binary64) J) (sinh.f64 l))
(.f64 #s(literal 2 binary64) (.f64 J (sinh.f64 l)))
(.f64 #s(literal 2 binary64) (.f64 (sinh.f64 l) J))
(.f64 J (.f64 (sinh.f64 l) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l)) (.f64 (sinh.f64 l) #s(literal 2 binary64))) J) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) J) (fma.f64 (exp.f64 (neg.f64 l)) (.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 (sinh.f64 l) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) J)) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) J) (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (.f64 J (.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l)) (.f64 (sinh.f64 l) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (.f64 J (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(fma.f64 (sinh.f64 l) J (*.f64 (sinh.f64 l) J))
(fma.f64 J (sinh.f64 l) (*.f64 J (sinh.f64 l)))
(+.f64 (.f64 J (sinh.f64 l)) (.f64 J (sinh.f64 l)))
(+.f64 (.f64 (sinh.f64 l) J) (.f64 (sinh.f64 l) J))
(*.f64 #s(literal 2 binary64) J)
(*.f64 J #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 J J) (.f64 J J)) (-.f64 J J))
(/.f64 (+.f64 (pow.f64 J #s(literal 3 binary64)) (pow.f64 J #s(literal 3 binary64))) (fma.f64 J J (-.f64 (.f64 J J) (.f64 J J))))
(neg.f64 (*.f64 J #s(literal -2 binary64)))
(neg.f64 (*.f64 #s(literal -2 binary64) J))
(fma.f64 #s(literal 1 binary64) J (*.f64 #s(literal 1 binary64) J))
(fma.f64 J #s(literal 1 binary64) (*.f64 J #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) J) (.f64 #s(literal 1 binary64) J))
(+.f64 (.f64 J #s(literal 1 binary64)) (.f64 J #s(literal 1 binary64)))
(+.f64 J J)
(*.f64 #s(literal 2 binary64) (/.f64 (sinh.f64 l) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64))) #s(literal -2 binary64))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l)) (.f64 (sinh.f64 l) #s(literal 2 binary64))) (.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (.f64 (fma.f64 (exp.f64 (neg.f64 l)) (.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal 2 binary64))
(sinh.f64 l)
(neg.f64 (/.f64 (*.f64 (sinh.f64 l) #s(literal 2 binary64)) #s(literal -2 binary64)))
(-.f64 (/.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 U U) (pow.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 U U))) (neg.f64 (-.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64))))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 U U)) (-.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U))
(/.f64 (+.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64))))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)) (/.f64 (.f64 U U) (-.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)))
(+.f64 (/.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64))))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64))))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
(+.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 2 binary64) l) J)
(.f64 (.f64 l #s(literal 2 binary64)) J)
(.f64 (.f64 l J) #s(literal 2 binary64))
(.f64 l (.f64 #s(literal 2 binary64) J))
(.f64 (.f64 #s(literal 2 binary64) J) l)
(.f64 #s(literal 2 binary64) (.f64 l J))
(.f64 J (.f64 #s(literal 2 binary64) l))
(.f64 J (.f64 l #s(literal 2 binary64)))
(neg.f64 (.f64 (.f64 l J) #s(literal -2 binary64)))
(neg.f64 (.f64 #s(literal -2 binary64) (.f64 l J)))
(fma.f64 #s(literal 1 binary64) (.f64 l J) (.f64 #s(literal 1 binary64) (*.f64 l J)))
(fma.f64 (.f64 l J) #s(literal 1 binary64) (.f64 (*.f64 l J) #s(literal 1 binary64)))
(fma.f64 l J (*.f64 l J))
(fma.f64 J l (*.f64 l J))
(+.f64 (.f64 #s(literal 1 binary64) (.f64 l J)) (.f64 #s(literal 1 binary64) (.f64 l J)))
(+.f64 (.f64 (.f64 l J) #s(literal 1 binary64)) (.f64 (.f64 l J) #s(literal 1 binary64)))
(+.f64 (.f64 l J) (.f64 l J))
(/.f64 (-.f64 (.f64 U U) (pow.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 U #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (*.f64 l J) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 U U))) (neg.f64 (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (*.f64 l J) #s(literal 2 binary64)))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (.f64 l J) #s(literal 2 binary64))))) (pow.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (*.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 U U)) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (*.f64 l J) #s(literal 2 binary64)))) U))
(/.f64 (+.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (*.f64 l J) #s(literal 2 binary64)))) U))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (.f64 l J) #s(literal 2 binary64))))) (pow.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (*.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)) (/.f64 (.f64 U U) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (*.f64 l J) #s(literal 2 binary64)))) U)))
(+.f64 (/.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (.f64 l J) #s(literal 2 binary64))))) (pow.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (.f64 l J) #s(literal 2 binary64))))) (pow.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (*.f64 l J) #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (*.f64 l J) #s(literal 2 binary64)))) U)
(+.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (*.f64 l J) #s(literal 2 binary64))))
(.f64 (.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 l J)) #s(literal 2 binary64))
(.f64 (.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 #s(literal 2 binary64) J)) l)
(.f64 (.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) #s(literal 2 binary64)) (.f64 l J))
(.f64 (.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) l) (.f64 #s(literal 2 binary64) J))
(.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 (*.f64 l J) #s(literal 2 binary64)))
(.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))
(.f64 (.f64 l J) (.f64 #s(literal 2 binary64) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))))
(.f64 l (.f64 (.f64 #s(literal 2 binary64) J) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))))
(.f64 (.f64 #s(literal 2 binary64) J) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) l))
(.f64 #s(literal 2 binary64) (.f64 (.f64 l J) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))))
(.f64 #s(literal 2 binary64) (.f64 J (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) l)))
(.f64 J (.f64 #s(literal 2 binary64) (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) l)))
(.f64 (.f64 #s(literal 2 binary64) l) J)
(.f64 (.f64 l #s(literal 2 binary64)) J)
(.f64 (.f64 l J) #s(literal 2 binary64))
(.f64 l (.f64 #s(literal 2 binary64) J))
(.f64 (.f64 #s(literal 2 binary64) J) l)
(.f64 #s(literal 2 binary64) (.f64 l J))
(.f64 J (.f64 #s(literal 2 binary64) l))
(.f64 J (.f64 l #s(literal 2 binary64)))
(neg.f64 (.f64 (.f64 l J) #s(literal -2 binary64)))
(neg.f64 (.f64 #s(literal -2 binary64) (.f64 l J)))
(fma.f64 #s(literal 1 binary64) (.f64 l J) (.f64 #s(literal 1 binary64) (*.f64 l J)))
(fma.f64 (.f64 l J) #s(literal 1 binary64) (.f64 (*.f64 l J) #s(literal 1 binary64)))
(fma.f64 l J (*.f64 l J))
(fma.f64 J l (*.f64 l J))
(+.f64 (.f64 #s(literal 1 binary64) (.f64 l J)) (.f64 #s(literal 1 binary64) (.f64 l J)))
(+.f64 (.f64 (.f64 l J) #s(literal 1 binary64)) (.f64 (.f64 l J) #s(literal 1 binary64)))
(+.f64 (.f64 l J) (.f64 l J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
(/.f64 (-.f64 (.f64 U U) (pow.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))) (-.f64 U (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)) (.f64 U U))) (neg.f64 (-.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (pow.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)) (.f64 U U)) (-.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U))
(/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 (.f64 (*.f64 l J) #s(literal 2 binary64)) U)))))
(/.f64 (+.f64 (pow.f64 U #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 3 binary64))) (fma.f64 U (-.f64 U (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (pow.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 l J)) #s(literal 2 binary64) U)
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J)) l U)
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64)) (*.f64 l J) U)
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) l) (*.f64 #s(literal 2 binary64) J) U)
(fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U)
(fma.f64 (.f64 l J) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64)) U)
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 (*.f64 l J) #s(literal 2 binary64)) U)
(fma.f64 l (.f64 J (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64))) U)
(fma.f64 l (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)
(fma.f64 (.f64 #s(literal 2 binary64) J) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l) U)
(fma.f64 #s(literal 2 binary64) (.f64 (.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)
(fma.f64 #s(literal 2 binary64) (.f64 J (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l)) U)
(fma.f64 J (.f64 l (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64))) U)
(fma.f64 J (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l)) U)
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) U)) (/.f64 (.f64 U U) (-.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)))
(-.f64 U (.f64 (neg.f64 (.f64 (.f64 l J) #s(literal 2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))
(-.f64 U (.f64 (neg.f64 (.f64 l J)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) #s(literal 2 binary64))))
(-.f64 U (.f64 (neg.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 l J) #s(literal 2 binary64))))
(-.f64 U (.f64 (neg.f64 (.f64 #s(literal 2 binary64) J)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) l)))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (pow.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (pow.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) U)
(+.f64 U (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))
(*.f64 l J)
(*.f64 J l)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) U))
(/.f64 (-.f64 (.f64 U U) (pow.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))) (-.f64 U (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)) (.f64 U U))) (neg.f64 (-.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (pow.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)) (.f64 U U)) (-.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 l U)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (pow.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64))))
(fma.f64 (.f64 l (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J)) (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) U)
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) l) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) U)
(fma.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) U)
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) U)
(fma.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) l U)
(fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) l) U)
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) U)
(fma.f64 l (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) U)
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) U)) (/.f64 (.f64 U U) (-.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) U)))
(-.f64 U (.f64 (neg.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l))
(-.f64 U (.f64 (neg.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l)))
(-.f64 U (.f64 (neg.f64 l) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (pow.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (pow.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)
(+.f64 U (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64))) J)
(.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)))
(.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))
(.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J))
(.f64 J (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))
(/.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) (fma.f64 #s(literal 1/27 binary64) (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 8 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (.f64 l l) #s(literal 2/3 binary64))))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) (.f64 #s(literal 1/3 binary64) (.f64 l l)) (.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) #s(literal 2 binary64)))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) (.f64 #s(literal 1/3 binary64) (*.f64 l l))))
(fma.f64 (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J)))
(fma.f64 #s(literal 2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)))
(+.f64 (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J)))
(+.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J)) (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J)))
(+.f64 (.f64 (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))
(+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) (.f64 #s(literal 1/3 binary64) (.f64 l l))) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) (.f64 #s(literal 1/3 binary64) (.f64 l l))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 #s(literal 2 binary64) J)))
(fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) K)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) K (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal -1/2 binary64) K (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) K)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) K)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
#s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 K K) #s(literal 1/384 binary64)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
(.f64 (.f64 #s(literal 1/384 binary64) (neg.f64 K)) (neg.f64 K))
(.f64 (.f64 #s(literal 1/384 binary64) (fabs.f64 K)) (fabs.f64 K))
(.f64 (.f64 #s(literal 1/384 binary64) K) K)
(.f64 (neg.f64 K) (.f64 (neg.f64 K) #s(literal 1/384 binary64)))
(.f64 (fabs.f64 K) (.f64 (fabs.f64 K) #s(literal 1/384 binary64)))
(.f64 (.f64 K K) #s(literal 1/384 binary64))
(.f64 #s(literal 1/384 binary64) (.f64 K K))
(.f64 K (.f64 #s(literal 1/384 binary64) K))
(*.f64 #s(literal -1/2 binary64) K)
(*.f64 K #s(literal -1/2 binary64))
(.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J)
(.f64 J (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) J) (-.f64 (.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)))
(/.f64 (.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 8 binary64)) J) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (.f64 l l) #s(literal 2/3 binary64))))
(/.f64 (.f64 J (-.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64))) (-.f64 (.f64 #s(literal 1/3 binary64) (*.f64 l l)) #s(literal 2 binary64)))
(/.f64 (.f64 J (fma.f64 #s(literal 1/27 binary64) (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 8 binary64))) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (.f64 l l) #s(literal 2/3 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J) (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J)) (.f64 (.f64 #s(literal 2 binary64) J) (.f64 #s(literal 2 binary64) J))) (-.f64 (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J) (.f64 #s(literal 2 binary64) J)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 2 binary64) J) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J) (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J) (-.f64 (.f64 (.f64 #s(literal 2 binary64) J) (.f64 #s(literal 2 binary64) J)) (.f64 (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J) (.f64 #s(literal 2 binary64) J)))))
(fma.f64 (.f64 J #s(literal 1/3 binary64)) (.f64 l l) (*.f64 #s(literal 2 binary64) J))
(fma.f64 (.f64 J (.f64 l l)) #s(literal 1/3 binary64) (*.f64 #s(literal 2 binary64) J))
(fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J (*.f64 #s(literal 2 binary64) J))
(fma.f64 #s(literal 1/3 binary64) (.f64 (.f64 l l) J) (*.f64 #s(literal 2 binary64) J))
(fma.f64 (.f64 l l) (.f64 #s(literal 1/3 binary64) J) (*.f64 #s(literal 2 binary64) J))
(fma.f64 (.f64 l J) (.f64 #s(literal 1/3 binary64) l) (*.f64 #s(literal 2 binary64) J))
(fma.f64 l (.f64 (.f64 #s(literal 1/3 binary64) l) J) (*.f64 #s(literal 2 binary64) J))
(fma.f64 #s(literal 2 binary64) J (.f64 (.f64 #s(literal 1/3 binary64) (*.f64 l l)) J))
(fma.f64 J (.f64 #s(literal 1/3 binary64) (.f64 l l)) (*.f64 #s(literal 2 binary64) J))
(fma.f64 J #s(literal 2 binary64) (.f64 (.f64 #s(literal 1/3 binary64) (*.f64 l l)) J))
(-.f64 (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J) (.f64 #s(literal -2 binary64) J))
(-.f64 (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J) (.f64 (neg.f64 J) #s(literal 2 binary64)))
(+.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J J) J)
(+.f64 (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J) (.f64 #s(literal 2 binary64) J))
(+.f64 (.f64 #s(literal 2 binary64) J) (.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) J))
(/.f64 (-.f64 #s(literal 4 binary64) (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64))) (-.f64 #s(literal 2 binary64) (.f64 #s(literal 1/3 binary64) (.f64 l l))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64))) (neg.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 8 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) (.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 8 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (fabs.f64 l)) (fabs.f64 l) #s(literal 2 binary64))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (neg.f64 l)) (neg.f64 l) #s(literal 2 binary64))
(fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))
(fma.f64 (fabs.f64 l) (*.f64 (fabs.f64 l) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(fma.f64 (neg.f64 l) (*.f64 (neg.f64 l) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(fma.f64 l (*.f64 #s(literal 1/3 binary64) l) #s(literal 2 binary64))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64))))
(-.f64 #s(literal 2 binary64) (.f64 #s(literal -1/3 binary64) (.f64 l l)))
(-.f64 #s(literal 2 binary64) (.f64 (neg.f64 (.f64 l l)) #s(literal 1/3 binary64)))
(-.f64 #s(literal 2 binary64) (.f64 (neg.f64 l) (.f64 #s(literal 1/3 binary64) l)))
(+.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 (/.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (.f64 l l) #s(literal 2/3 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (.f64 l l) #s(literal 2/3 binary64)))))
(+.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 l l))))
(+.f64 #s(literal 2 binary64) (.f64 #s(literal 1/3 binary64) (.f64 l l)))

eval90.0ms (1%)

Memory: -1.7MiB live, 90.0MiB allocated; 8ms collecting garbage
Compiler: Compiled 15 840 to 1 563 computations (90.1% saved)

prune22.0ms (0.2%)

Memory

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

Pruning

19 alts after pruning (18 fresh and 1 done)

	Pruned	Kept	Total
New	398	14	412
Fresh	6	4	10
Picked	5	0	5
Done	0	1	1
Total	409	19	428

Accuracy

100.0%

Counts

428 → 19

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	100.0%	(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
	82.5%	(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)
	96.9%	(fma.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) U)
	91.3%	(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) l (*.f64 #s(literal 2 binary64) l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
	93.3%	(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 #s(approx (+ ( 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
▶	47.5%	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
	48.3%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
	51.3%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
	65.3%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J)) l U))
	86.9%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (fma.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
▶	56.5%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
	45.1%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l J)) (.f64 K K) U))))
	30.0%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))))
	60.1%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
	64.7%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
▶	35.2%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
	75.6%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
▶	55.9%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
✓	37.6%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)

Compiler

Compiled 1 357 to 1 001 computations (26.2% saved)

simplify104.0ms (1.1%)

Memory

-25.8MiB live, 120.9MiB allocated; 11ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)
cost-diff	0	(.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
cost-diff	0	#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
cost-diff	0	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
cost-diff	0	(fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))
cost-diff	0	#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
cost-diff	0	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
cost-diff	11	(fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)))
cost-diff	0	#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))
cost-diff	0	#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64)))))
cost-diff	0	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
cost-diff	4	(fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64)))
cost-diff	0	(*.f64 l J)
cost-diff	0	(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
cost-diff	0	#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
cost-diff	0	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
cost-diff	0	(sinh.f64 l)
cost-diff	0	(+.f64 J J)
cost-diff	0	(*.f64 (+.f64 J J) (sinh.f64 l))
cost-diff	0	(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	80	695
0	112	695
1	244	695
2	787	643
3	3830	643
0	8195	626

Stop Event

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

Calls

Call 1

Inputs
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
(*.f64 (+.f64 J J) (sinh.f64 l))
(+.f64 J J)
J
(sinh.f64 l)
l
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(*.f64 #s(literal -1/2 binary64) K)
#s(literal -1/2 binary64)
K
U
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(*.f64 l J)
l
J
#s(literal 2 binary64)
U
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64)))
(.f64 (.f64 (*.f64 K K) l) J)
(.f64 (.f64 K K) l)
(*.f64 K K)
K
l
J
#s(literal -1/4 binary64)
(.f64 (.f64 l J) #s(literal 2 binary64))
(*.f64 l J)
#s(literal 2 binary64)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
(fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))
(fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)))
(.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K)
(.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64))
(.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)
(.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(*.f64 l l)
l
#s(literal 1/3 binary64)
#s(literal 2 binary64)
J
#s(literal 1/384 binary64)
K
(.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))
#s(literal -1/8 binary64)
(*.f64 K K)
(fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)
(.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(*.f64 l l)
l
#s(literal 1/3 binary64)
#s(literal 2 binary64)
J
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal 1/2 binary64) K)
#s(literal 1/2 binary64)
K

Outputs
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
(fma.f64 (.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) U)
(*.f64 (+.f64 J J) (sinh.f64 l))
(.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))
(+.f64 J J)
(*.f64 #s(literal 2 binary64) J)
J
(sinh.f64 l)
l
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal -1/2 binary64) K)
#s(literal -1/2 binary64)
K
U
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(*.f64 l J)
l
J
#s(literal 2 binary64)
U
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64)))
(.f64 (.f64 l J) (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64)))
(.f64 (.f64 (*.f64 K K) l) J)
(.f64 (.f64 K K) l)
(*.f64 K K)
K
l
J
#s(literal -1/4 binary64)
(.f64 (.f64 l J) #s(literal 2 binary64))
(.f64 (.f64 #s(literal 2 binary64) J) l)
(*.f64 l J)
#s(literal 2 binary64)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (fma.f64 (.f64 #s(literal 1/384 binary64) K) K #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (fma.f64 (.f64 #s(literal 1/384 binary64) K) K #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
(fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))
(fma.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (fma.f64 (.f64 #s(literal 1/384 binary64) K) K #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))
(fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)))
(.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (fma.f64 (*.f64 #s(literal 1/384 binary64) K) K #s(literal -1/8 binary64)))
(.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K)
(.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)) K)
(.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64))
(.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))
(.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)
(.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(*.f64 l l)
l
#s(literal 1/3 binary64)
#s(literal 2 binary64)
J
#s(literal 1/384 binary64)
K
(.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))
(.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))
#s(literal -1/8 binary64)
(*.f64 K K)
(fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)
U
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)
(.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(*.f64 l l)
l
#s(literal 1/3 binary64)
#s(literal 2 binary64)
J
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(*.f64 #s(literal 1/2 binary64) K)
#s(literal 1/2 binary64)
K

localize386.0ms (4.1%)

Memory

35.1MiB live, 407.9MiB allocated; 87ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.078125	(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
accuracy	5.228022808908469	(.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)
accuracy	10.759605687912025	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
accuracy	25.356751886061524	#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
accuracy	8.956992030773913	(fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))
accuracy	10.759605687912025	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
accuracy	16.38607391861432	(fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)))
accuracy	21.398854409382217	#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
accuracy	4.677658802007304	(.f64 (.f64 (*.f64 K K) l) J)
accuracy	7.816442440031674	(.f64 (.f64 K K) l)
accuracy	22.3512176657657	#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64)))))
accuracy	25.70125504980935	#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))
accuracy	0.0	(*.f64 l J)
accuracy	0.0078125	(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
accuracy	10.636923165734224	#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
accuracy	22.191625130985024	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
accuracy	0.0	(sinh.f64 l)
accuracy	0.0	#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
accuracy	0.00390625	(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
accuracy	0.0234375	(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)

Samples

223.0ms	110×	1	valid
69.0ms	131×	0	valid
26.0ms	15×	2	valid

Compiler

Compiled 463 to 69 computations (85.1% saved)

Precisions

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

ival-cos: 88.0ms (36.3% of total)

ival-mult: 58.0ms (23.9% of total)

adjust: 41.0ms (16.9% of total)

ival-exp: 20.0ms (8.3% of total)

ival-add: 18.0ms (7.4% of total)

const: 8.0ms (3.3% of total)

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

ival-sub: 2.0ms (0.8% of total)

ival-sinh: 2.0ms (0.8% of total)

exact: 1.0ms (0.4% of total)

ival-neg: 1.0ms (0.4% of total)

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

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

series106.0ms (1.1%)

Memory

-11.0MiB live, 182.5MiB allocated; 34ms collecting garbage

Counts

25 → 185

Calls

Call 1

Inputs
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
(*.f64 (+.f64 J J) (sinh.f64 l))
(+.f64 J J)
(sinh.f64 l)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(*.f64 l J)
(fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
(fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
(.f64 (.f64 K K) l)
(.f64 (.f64 (*.f64 K K) l) J)
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))

Outputs
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 U))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (* (+ J J) (sinh l)) #s(hole binary64 (* J (- (exp l) (/ 1 (exp l))))))
#s(approx (+ J J) #s(hole binary64 (* 2 J)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 U))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 U))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (* l J) #s(hole binary64 (* J l)))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* J (+ (* -1/4 (* (pow K 2) l)) (* 2 l)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J (* l (cos (* -1/2 K)))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* J (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 U))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* J (* l (* (cos (* 1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (* (* K K) l) J) #s(hole binary64 (* J (* (pow K 2) l))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* 2 (* J (* l (cos (* -1/2 K)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* J (+ (* 2 (* l (cos (* -1/2 K)))) (/ U J)))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* 2 (* J l))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* J (+ (* 2 l) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (+ (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (/ U J)))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (+ (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))) (/ U J))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* J (+ (* -2 (* l (cos (* -1/2 K)))) (* -1 (/ U J)))))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* -1 (* J (+ (* -2 l) (* 1/4 (* (pow K 2) l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* -1 (* J (+ (* -1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/8 (* l (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) (* -1 (/ U J)))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/8 (* l (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (+ (* -1 (/ U J)) (* (pow K 2) (+ (* -1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/8 (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (* (+ J J) (sinh l)) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (+ J J) (sinh l)) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* (+ J J) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* (+ J J) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* l (+ (* -1/4 (* J (pow K 2))) (* 2 J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* l (+ (* -1/4 J) (* 1/192 (* J (pow K 2)))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* l (+ (* -1/4 J) (+ (* 1/192 (* J (pow K 2))) (* (pow l 2) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (* l (+ (* 2 J) (* (pow K 2) (+ (* -1/4 J) (* 1/192 (* J (pow K 2))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (* l (+ (* 2 J) (+ (* (pow K 2) (+ (* -1/4 J) (* 1/192 (* J (pow K 2))))) (* (pow l 2) (+ (* 1/3 J) (* (pow K 2) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2)))))))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* (* K K) l) #s(hole binary64 (* (pow K 2) l)))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* l (+ (* 2 (* J (cos (* -1/2 K)))) (/ U l)))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* l (+ (* 2 J) (/ U l)))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* (pow l 3) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2)))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* (pow l 3) (+ (* -1/4 (/ J (pow l 2))) (+ (* -1/24 J) (+ (* 1/1152 (* J (pow K 2))) (* 1/192 (/ (* J (pow K 2)) (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* -1/2 K)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (+ (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* (pow K 2) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (+ (* (pow K 2) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2))))) (/ (* (pow K 2) (+ (* -1/4 J) (* 1/192 (* J (pow K 2))))) (pow l 2))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (+ (* (pow K 2) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2))))) (+ (/ U (pow l 3)) (/ (* (pow K 2) (+ (* -1/4 J) (* 1/192 (* J (pow K 2))))) (pow l 2)))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* 1/2 K)))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* 2 (/ (* J (cos (* 1/2 K))) (pow l 2)))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* 1/3 (* J (pow l 3)))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* l (+ (* -2 (* J (cos (* -1/2 K)))) (* -1 (/ U l)))))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* -1 (* l (+ (* -2 J) (* 1/4 (* J (pow K 2))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -1/1152 (* J (pow K 2))) (* 1/24 J))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -1/192 (/ (* J (pow K 2)) (pow l 2))) (+ (* -1/1152 (* J (pow K 2))) (+ (* 1/24 J) (* 1/4 (/ J (pow l 2))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 (* J (cos (* -1/2 K))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -1/3 J) (* (pow K 2) (+ (* -1/1152 (* J (pow K 2))) (* 1/24 J))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1/3 J) (+ (* (pow K 2) (+ (* -1/1152 (* J (pow K 2))) (* 1/24 J))) (/ (* (pow K 2) (+ (* -1/192 (* J (pow K 2))) (* 1/4 J))) (pow l 2)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (+ (* -1/3 J) (+ (* (pow K 2) (+ (* -1/1152 (* J (pow K 2))) (* 1/24 J))) (/ (* (pow K 2) (+ (* -1/192 (* J (pow K 2))) (* 1/4 J))) (pow l 2))))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* 1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* 1/2 K)))))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* 2 (* J l))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l)))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 1))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* -1/4 (* J (* (pow K 2) l)))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* (pow K 2) (+ (* -1/4 (* J l)) (* 2 (/ (* J l) (pow K 2)))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* (pow K 2) (+ (* -1/8 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (pow K 2))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* 1/384 (* J (* (pow K 4) (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* (pow K 4) (+ (* -1/8 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (pow K 2))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* (pow K 4) (+ (* -1/8 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (pow K 2))) (+ (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (+ (/ U (pow K 4)) (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (pow K 4))))))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* U (+ 1 (* 2 (/ (* J (* l (cos (* -1/2 K)))) U))))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* U (+ 1 (* 2 (/ (* J l) U))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* U (+ 1 (+ (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U) (/ (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))) U))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* U (- (* -2 (/ (* J (* l (cos (* -1/2 K)))) U)) 1)))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* -1 (* U (- (* -2 (/ (* J l) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)) 1)))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* U (- (* -1 (/ (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))) U)) 1)))))

Calls

12 calls:

Time	Variable		Point	Expression
29.0ms	J	@	0	((+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) (* (+ J J) (sinh l)) (+ J J) (sinh l) (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (+ (* (* l J) 2) U) (* l J) (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* -1/2 K)) (cos (/ K -2)) (* (* K K) l) (* (* (* K K) l) J) (+ (* (* l l) 1/3) 2))
14.0ms	J	@	-inf	((+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) (* (+ J J) (sinh l)) (+ J J) (sinh l) (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (+ (* (* l J) 2) U) (* l J) (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* -1/2 K)) (cos (/ K -2)) (* (* K K) l) (* (* (* K K) l) J) (+ (* (* l l) 1/3) 2))
10.0ms	l	@	-inf	((+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) (* (+ J J) (sinh l)) (+ J J) (sinh l) (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (+ (* (* l J) 2) U) (* l J) (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* -1/2 K)) (cos (/ K -2)) (* (* K K) l) (* (* (* K K) l) J) (+ (* (* l l) 1/3) 2))
8.0ms	l	@	inf	((+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) (* (+ J J) (sinh l)) (+ J J) (sinh l) (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (+ (* (* l J) 2) U) (* l J) (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* -1/2 K)) (cos (/ K -2)) (* (* K K) l) (* (* (* K K) l) J) (+ (* (* l l) 1/3) 2))
8.0ms	J	@	inf	((+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) (* (+ J J) (sinh l)) (+ J J) (sinh l) (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (+ (* (* l J) 2) U) (* l J) (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (* (* (* 2 J) l) (cos (* -1/2 K))) (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* -1/2 K)) (cos (/ K -2)) (* (* K K) l) (* (* (* K K) l) J) (+ (* (* l l) 1/3) 2))

simplify176.0ms (1.9%)

Memory

6.8MiB live, 193.9MiB allocated; 18ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	749	7412
1	2419	7303
2	7953	7303
0	8002	6701

Stop Event

1×	iter limit
1×	node limit

Counts

185 → 185

Calls

Call 1

Inputs
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 U))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (* (+ J J) (sinh l)) #s(hole binary64 (* J (- (exp l) (/ 1 (exp l))))))
#s(approx (+ J J) #s(hole binary64 (* 2 J)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 U))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 U))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (* l J) #s(hole binary64 (* J l)))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* J (+ (* -1/4 (* (pow K 2) l)) (* 2 l)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J (* l (cos (* -1/2 K)))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* J (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 U))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* J (* l (* (cos (* 1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (* (* K K) l) J) #s(hole binary64 (* J (* (pow K 2) l))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* 2 (* J (* l (cos (* -1/2 K)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* J (+ (* 2 (* l (cos (* -1/2 K)))) (/ U J)))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* 2 (* J l))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* J (+ (* 2 l) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (+ (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (/ U J)))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (+ (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))) (/ U J))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* J (+ (* -2 (* l (cos (* -1/2 K)))) (* -1 (/ U J)))))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* -1 (* J (+ (* -2 l) (* 1/4 (* (pow K 2) l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* -1 (* J (+ (* -1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/8 (* l (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) (* -1 (/ U J)))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/8 (* l (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (+ (* -1 (/ U J)) (* (pow K 2) (+ (* -1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/8 (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (* (+ J J) (sinh l)) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (+ J J) (sinh l)) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* (+ J J) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* (+ J J) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* l (+ (* -1/4 (* J (pow K 2))) (* 2 J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* l (+ (* -1/4 J) (* 1/192 (* J (pow K 2)))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* l (+ (* -1/4 J) (+ (* 1/192 (* J (pow K 2))) (* (pow l 2) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (* l (+ (* 2 J) (* (pow K 2) (+ (* -1/4 J) (* 1/192 (* J (pow K 2))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (* l (+ (* 2 J) (+ (* (pow K 2) (+ (* -1/4 J) (* 1/192 (* J (pow K 2))))) (* (pow l 2) (+ (* 1/3 J) (* (pow K 2) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2)))))))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* (* K K) l) #s(hole binary64 (* (pow K 2) l)))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* l (+ (* 2 (* J (cos (* -1/2 K)))) (/ U l)))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* l (+ (* 2 J) (/ U l)))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* (pow l 3) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2)))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* (pow l 3) (+ (* -1/4 (/ J (pow l 2))) (+ (* -1/24 J) (+ (* 1/1152 (* J (pow K 2))) (* 1/192 (/ (* J (pow K 2)) (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* -1/2 K)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (+ (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* (pow K 2) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (+ (* (pow K 2) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2))))) (/ (* (pow K 2) (+ (* -1/4 J) (* 1/192 (* J (pow K 2))))) (pow l 2))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (+ (* (pow K 2) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2))))) (+ (/ U (pow l 3)) (/ (* (pow K 2) (+ (* -1/4 J) (* 1/192 (* J (pow K 2))))) (pow l 2)))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* 1/2 K)))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* 2 (/ (* J (cos (* 1/2 K))) (pow l 2)))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* 1/3 (* J (pow l 3)))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* l (+ (* -2 (* J (cos (* -1/2 K)))) (* -1 (/ U l)))))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* -1 (* l (+ (* -2 J) (* 1/4 (* J (pow K 2))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -1/1152 (* J (pow K 2))) (* 1/24 J))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -1/192 (/ (* J (pow K 2)) (pow l 2))) (+ (* -1/1152 (* J (pow K 2))) (+ (* 1/24 J) (* 1/4 (/ J (pow l 2))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 (* J (cos (* -1/2 K))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -1/3 J) (* (pow K 2) (+ (* -1/1152 (* J (pow K 2))) (* 1/24 J))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1/3 J) (+ (* (pow K 2) (+ (* -1/1152 (* J (pow K 2))) (* 1/24 J))) (/ (* (pow K 2) (+ (* -1/192 (* J (pow K 2))) (* 1/4 J))) (pow l 2)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (+ (* -1/3 J) (+ (* (pow K 2) (+ (* -1/1152 (* J (pow K 2))) (* 1/24 J))) (/ (* (pow K 2) (+ (* -1/192 (* J (pow K 2))) (* 1/4 J))) (pow l 2))))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* 1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* 1/2 K)))))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* 2 (* J l))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l)))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 1))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* -1/4 (* J (* (pow K 2) l)))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* (pow K 2) (+ (* -1/4 (* J l)) (* 2 (/ (* J l) (pow K 2)))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* (pow K 2) (+ (* -1/8 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (pow K 2))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* 1/384 (* J (* (pow K 4) (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* (pow K 4) (+ (* -1/8 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (pow K 2))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* (pow K 4) (+ (* -1/8 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (pow K 2))) (+ (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (+ (/ U (pow K 4)) (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (pow K 4))))))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* U (+ 1 (* 2 (/ (* J (* l (cos (* -1/2 K)))) U))))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* U (+ 1 (* 2 (/ (* J l) U))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* U (+ 1 (+ (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U) (/ (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))) U))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* U (- (* -2 (/ (* J (* l (cos (* -1/2 K)))) U)) 1)))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* -1 (* U (- (* -2 (/ (* J l) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)) 1)))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* U (- (* -1 (/ (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))) U)) 1)))))

Outputs
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) U)
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
#s(approx (* (+ J J) (sinh l)) #s(hole binary64 (* J (- (exp l) (/ 1 (exp l))))))
#s(approx (* (+ J J) (sinh l)) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx (+ J J) #s(hole binary64 (* 2 J)))
#s(approx (+ J J) (*.f64 #s(literal 2 binary64) J))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 U))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) U)
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 U))
#s(approx (+ (* (* l J) 2) U) U)
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (+ (* (* l J) 2) U) (fma.f64 (*.f64 #s(literal 2 binary64) J) l U))
#s(approx (* l J) #s(hole binary64 (* J l)))
#s(approx (* l J) (*.f64 l J))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* J (+ (* -1/4 (* (pow K 2) l)) (* 2 l)))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 l (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))) J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J (* l (cos (* -1/2 K)))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* J (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (*.f64 K K) #s(literal -1/8 binary64))) J))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) U)
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 l J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) U))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 U))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) U)
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (.f64 K K) #s(literal -1/8 binary64))) (.f64 K K) (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) J U))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* J (* l (* (cos (* 1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 l J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))
#s(approx (* (* (* K K) l) J) #s(hole binary64 (* J (* (pow K 2) l))))
#s(approx (* (* (* K K) l) J) (.f64 (.f64 (*.f64 K K) l) J))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* J (+ (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l)))) (/ U J)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* 2 (* J (* l (cos (* -1/2 K)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* J (+ (* 2 (* l (cos (* -1/2 K)))) (/ U J)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (fma.f64 (.f64 #s(literal 2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* 2 (* J l))))
#s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* J (+ (* 2 l) (/ U J)))))
#s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* J (+ (* (cos (* 1/2 K)) (- (exp l) (exp (neg l)))) (/ U J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)) J))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 l J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* J (+ (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2))))) (/ U J)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) l (/.f64 U J)) J))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (.f64 K K) #s(literal -1/8 binary64))) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) J))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* J (+ (* l (+ 2 (* 1/3 (pow l 2)))) (+ (* (pow K 2) (+ (* -1/8 (* l (+ 2 (* 1/3 (pow l 2))))) (* 1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))) (/ U J))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (.f64 K K) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J))) J))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (neg.f64 J) (neg.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (neg.f64 J) (neg.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* J (+ (* -2 (* l (cos (* -1/2 K)))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (neg.f64 J) (fma.f64 (.f64 #s(literal -2 binary64) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 (neg.f64 U) J))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* -1 (* J (+ (* -2 l) (* -1 (/ U J)))))))
#s(approx (+ (* (* l J) 2) U) (*.f64 (neg.f64 J) (fma.f64 #s(literal -2 binary64) l (/.f64 (neg.f64 U) J))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* -1 (* J (+ (* -2 l) (* 1/4 (* (pow K 2) l)))))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (neg.f64 J) (.f64 l (fma.f64 #s(literal 1/4 binary64) (*.f64 K K) #s(literal -2 binary64)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (neg.f64 J) (neg.f64 (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 U J)))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* -1 (* J (+ (* -1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/8 (* l (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (.f64 (neg.f64 J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal -1/384 binary64) (*.f64 K K) #s(literal 1/8 binary64)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) (* -1 (/ U J)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (neg.f64 J) (neg.f64 (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) l (/.f64 U J)))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/8 (* l (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (neg.f64 J) (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal -1/384 binary64) (.f64 K K) #s(literal 1/8 binary64))) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (neg.f64 l)))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* J (+ (* -1 (* l (+ 2 (* 1/3 (pow l 2))))) (+ (* -1 (/ U J)) (* (pow K 2) (+ (* -1/384 (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/8 (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (neg.f64 J) (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal -1/384 binary64) (.f64 K K) #s(literal 1/8 binary64))) (.f64 K K) (neg.f64 (fma.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l (/.f64 U J))))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) J) (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/60 binary64) J) (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 #s(literal 1/3 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (.f64 l l) (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (* (+ J J) (sinh l)) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (+ J J) (sinh l)) (.f64 (.f64 l J) #s(literal 2 binary64)))
#s(approx (* (+ J J) (sinh l)) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* (+ J J) (sinh l)) (.f64 (fma.f64 (.f64 (.f64 l l) J) #s(literal 1/3 binary64) (.f64 #s(literal 2 binary64) J)) l))
#s(approx (* (+ J J) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/60 (* J (pow l 2))) (* 1/3 J)))))))
#s(approx (* (+ J J) (sinh l)) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 l l) J) #s(literal 1/60 binary64) (.f64 #s(literal 1/3 binary64) J)) (.f64 l l) (.f64 #s(literal 2 binary64) J)) l))
#s(approx (* (+ J J) (sinh l)) #s(hole binary64 (* l (+ (* 2 J) (* (pow l 2) (+ (* 1/3 J) (* (pow l 2) (+ (* 1/2520 (* J (pow l 2))) (* 1/60 J)))))))))
#s(approx (* (+ J J) (sinh l)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 (.f64 l l) J) (.f64 #s(literal 1/60 binary64) J)) (.f64 l l) (.f64 #s(literal 1/3 binary64) J)) (.f64 l l) (.f64 #s(literal 2 binary64) J)) l))
#s(approx (sinh l) #s(hole binary64 l))
#s(approx (sinh l) l)
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* 1/6 (pow l 2))))))
#s(approx (sinh l) (.f64 (fma.f64 #s(literal 1/6 binary64) (.f64 l l) #s(literal 1 binary64)) l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* 1/120 (pow l 2))))))))
#s(approx (sinh l) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 l l) #s(literal 1/6 binary64)) (*.f64 l l) #s(literal 1 binary64)) l))
#s(approx (sinh l) #s(hole binary64 (* l (+ 1 (* (pow l 2) (+ 1/6 (* (pow l 2) (+ 1/120 (* 1/5040 (pow l 2))))))))))
#s(approx (sinh l) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/5040 binary64) (.f64 l l) #s(literal 1/120 binary64)) (.f64 l l) #s(literal 1/6 binary64)) (.f64 l l) #s(literal 1 binary64)) l))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) J) (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* -1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 1/3 (* J (cos (* -1/2 K)))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/60 binary64) J) (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 #s(literal 1/3 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (.f64 l l) (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* l (+ (* -1/4 (* J (pow K 2))) (* 2 J)))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (fma.f64 (.f64 (.f64 K K) J) #s(literal -1/4 binary64) (.f64 #s(literal 2 binary64) J)) l))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* 1/2 K))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K)))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) J) (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K)))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/60 binary64) J) (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 #s(literal 1/3 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (.f64 l l) (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) J) (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) l))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/60 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/3 (* J (cos (* 1/2 K))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/60 binary64) J) (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 #s(literal 1/3 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (.f64 l l) (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) l))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* l (+ (* 2 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* (pow l 2) (+ (* 1/2520 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 1/60 (* J (cos (* 1/2 K))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/2520 binary64) J) (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 #s(literal 1/60 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (.f64 l l) (.f64 (.f64 #s(literal 1/3 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (.f64 l l) (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) l))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* l (+ (* -1/4 J) (* 1/192 (* J (pow K 2)))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (.f64 (fma.f64 #s(literal 1/192 binary64) (.f64 (.f64 K K) J) (.f64 #s(literal -1/4 binary64) J)) l))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* l (+ (* -1/4 J) (+ (* 1/192 (* J (pow K 2))) (* (pow l 2) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2))))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (.f64 (fma.f64 (fma.f64 #s(literal 1/1152 binary64) (.f64 (.f64 K K) J) (.f64 #s(literal -1/24 binary64) J)) (.f64 l l) (fma.f64 #s(literal 1/192 binary64) (.f64 (.f64 K K) J) (.f64 #s(literal -1/4 binary64) J))) l))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* 2 (* J (* l (cos (* -1/2 K))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* -1/2 K))))) (* 2 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) J) (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) l U))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (* l (+ (* 2 J) (* (pow K 2) (+ (* -1/4 J) (* 1/192 (* J (pow K 2))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/192 binary64) (.f64 (.f64 K K) J) (.f64 #s(literal -1/4 binary64) J)) (.f64 K K) (*.f64 #s(literal 2 binary64) J)) l U))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (* l (+ (* 2 J) (+ (* (pow K 2) (+ (* -1/4 J) (* 1/192 (* J (pow K 2))))) (* (pow l 2) (+ (* 1/3 J) (* (pow K 2) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2)))))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/1152 binary64) (.f64 (.f64 K K) J) (.f64 #s(literal -1/24 binary64) J)) (.f64 K K) (.f64 #s(literal 1/3 binary64) J)) (.f64 l l) (fma.f64 (fma.f64 #s(literal 1/192 binary64) (.f64 (.f64 K K) J) (.f64 #s(literal -1/4 binary64) J)) (.f64 K K) (*.f64 #s(literal 2 binary64) J))) l U))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* 2 (* J (* l (cos (* 1/2 K)))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* l (+ (* 1/3 (* J (* (pow l 2) (cos (* 1/2 K))))) (* 2 (* J (cos (* 1/2 K))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) J) (.f64 (.f64 l l) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) l))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) (.f64 (.f64 l J) #s(literal 2 binary64)))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* l (+ (* 1/3 (* J (pow l 2))) (* 2 J)))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) (.f64 (fma.f64 (.f64 (.f64 l l) J) #s(literal 1/3 binary64) (.f64 #s(literal 2 binary64) J)) l))
#s(approx (* (* K K) l) #s(hole binary64 (* (pow K 2) l)))
#s(approx (* (* K K) l) (.f64 (.f64 K K) l))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 2))
#s(approx (+ (* (* l l) 1/3) 2) #s(literal 2 binary64))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (+ 2 (* 1/3 (pow l 2)))))
#s(approx (+ (* (* l l) 1/3) 2) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))
#s(approx (sinh l) #s(hole binary64 (* 1/2 (- (exp l) (/ 1 (exp l))))))
#s(approx (sinh l) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* l (+ (* 2 (* J (cos (* -1/2 K)))) (/ U l)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (fma.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U l)) l))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* l (+ (* 2 J) (/ U l)))))
#s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) J (/.f64 U l)) l))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* (pow l 3) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2)))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 #s(literal 1/1152 binary64) (.f64 (.f64 K K) J) (.f64 #s(literal -1/24 binary64) J))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* (pow l 3) (+ (* -1/4 (/ J (pow l 2))) (+ (* -1/24 J) (+ (* 1/1152 (* J (pow K 2))) (* 1/192 (/ (* J (pow K 2)) (pow l 2)))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (.f64 (+.f64 (fma.f64 #s(literal 1/1152 binary64) (.f64 (.f64 K K) J) (.f64 #s(literal -1/24 binary64) J)) (/.f64 (/.f64 (fma.f64 #s(literal 1/192 binary64) (.f64 (.f64 K K) J) (*.f64 #s(literal -1/4 binary64) J)) l) l)) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* -1/2 K)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 #s(literal 1/3 binary64) J) (.f64 (pow.f64 l #s(literal 3 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (*.f64 l l))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* -1/2 K)))) (+ (* 2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (/ U (pow l 3)))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 J (.f64 l l))) #s(literal 2 binary64) (/.f64 U (pow.f64 l #s(literal 3 binary64))))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* (pow K 2) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (pow.f64 l #s(literal 3 binary64)) (fma.f64 (fma.f64 #s(literal 1/1152 binary64) (.f64 (.f64 K K) J) (.f64 #s(literal -1/24 binary64) J)) (.f64 K K) (.f64 #s(literal 1/3 binary64) J))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (+ (* (pow K 2) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2))))) (/ (* (pow K 2) (+ (* -1/4 J) (* 1/192 (* J (pow K 2))))) (pow l 2))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) l) (/.f64 J l) (fma.f64 (.f64 K K) (+.f64 (/.f64 (/.f64 (fma.f64 #s(literal 1/192 binary64) (.f64 (.f64 K K) J) (.f64 #s(literal -1/4 binary64) J)) l) l) (fma.f64 #s(literal 1/1152 binary64) (.f64 (.f64 K K) J) (.f64 #s(literal -1/24 binary64) J))) (*.f64 #s(literal 1/3 binary64) J))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (+ (* 2 (/ J (pow l 2))) (+ (* (pow K 2) (+ (* -1/24 J) (* 1/1152 (* J (pow K 2))))) (+ (/ U (pow l 3)) (/ (* (pow K 2) (+ (* -1/4 J) (* 1/192 (* J (pow K 2))))) (pow l 2)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 #s(literal 1/3 binary64) J (fma.f64 (/.f64 #s(literal 2 binary64) l) (/.f64 J l) (fma.f64 (.f64 K K) (+.f64 (/.f64 (/.f64 (fma.f64 #s(literal 1/192 binary64) (.f64 (.f64 K K) J) (.f64 #s(literal -1/4 binary64) J)) l) l) (fma.f64 #s(literal 1/1152 binary64) (.f64 (.f64 K K) J) (.f64 #s(literal -1/24 binary64) J))) (/.f64 U (pow.f64 l #s(literal 3 binary64)))))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* 1/3 (* J (* (pow l 3) (cos (* 1/2 K)))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 #s(literal 1/3 binary64) J) (.f64 (pow.f64 l #s(literal 3 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* (pow l 3) (+ (* 1/3 (* J (cos (* 1/2 K)))) (* 2 (/ (* J (cos (* 1/2 K))) (pow l 2)))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 (.f64 (.f64 #s(literal 2 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (*.f64 l l))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* 1/3 (* J (pow l 3)))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) (.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) J) #s(literal 1/3 binary64)))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* (pow l 3) (+ (* 1/3 J) (* 2 (/ J (pow l 2)))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) (.f64 (fma.f64 (/.f64 J (.f64 l l)) #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) J)) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* 1/3 (pow l 2))))
#s(approx (+ (* (* l l) 1/3) 2) (.f64 (.f64 l l) #s(literal 1/3 binary64)))
#s(approx (+ (* (* l l) 1/3) 2) #s(hole binary64 (* (pow l 2) (+ 1/3 (* 2 (/ 1 (pow l 2)))))))
#s(approx (+ (* (* l l) 1/3) 2) (.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 l l)) #s(literal 1/3 binary64)) (*.f64 l l)))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* l (+ (* -2 (* J (cos (* -1/2 K)))) (* -1 (/ U l)))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (fma.f64 (.f64 #s(literal -2 binary64) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 U (neg.f64 l))) (neg.f64 l)))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* -1 (* l (+ (* -2 J) (* -1 (/ U l)))))))
#s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal -2 binary64) J (/.f64 U (neg.f64 l))) (neg.f64 l)))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* -1 (* l (+ (* -2 J) (* 1/4 (* J (pow K 2))))))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (fma.f64 (.f64 (.f64 K K) J) #s(literal 1/4 binary64) (.f64 #s(literal -2 binary64) J)) (neg.f64 l)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (* (cos (* 1/2 K)) (- (exp l) (exp (* -1 l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -1/1152 (* J (pow K 2))) (* 1/24 J))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (.f64 (neg.f64 (fma.f64 #s(literal 1/24 binary64) J (.f64 #s(literal -1/1152 binary64) (.f64 (.f64 K K) J)))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -1/192 (/ (* J (pow K 2)) (pow l 2))) (+ (* -1/1152 (* J (pow K 2))) (+ (* 1/24 J) (* 1/4 (/ J (pow l 2))))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (.f64 (neg.f64 (pow.f64 l #s(literal 3 binary64))) (+.f64 (fma.f64 #s(literal 1/24 binary64) J (.f64 #s(literal -1/1152 binary64) (.f64 (.f64 K K) J))) (/.f64 (/.f64 (fma.f64 #s(literal -1/192 binary64) (.f64 (.f64 K K) J) (*.f64 #s(literal 1/4 binary64) J)) l) l))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* -1/2 K)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (neg.f64 (pow.f64 l #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -1/3 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 (.f64 (.f64 #s(literal -2 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (*.f64 l l)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* -1/2 K))) (pow l 2))) (+ (* -1 (/ U (pow l 3))) (* -1/3 (* J (cos (* -1/2 K))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (neg.f64 (pow.f64 l #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -1/3 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 J (.f64 l l))) #s(literal -2 binary64) (/.f64 (neg.f64 U) (pow.f64 l #s(literal 3 binary64)))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -1/3 J) (* (pow K 2) (+ (* -1/1152 (* J (pow K 2))) (* 1/24 J))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (neg.f64 (pow.f64 l #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(literal 1/24 binary64) J (.f64 #s(literal -1/1152 binary64) (.f64 (.f64 K K) J))) (.f64 K K) (.f64 #s(literal -1/3 binary64) J))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1/3 J) (+ (* (pow K 2) (+ (* -1/1152 (* J (pow K 2))) (* 1/24 J))) (/ (* (pow K 2) (+ (* -1/192 (* J (pow K 2))) (* 1/4 J))) (pow l 2)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (neg.f64 (pow.f64 l #s(literal 3 binary64))) (fma.f64 (/.f64 #s(literal -2 binary64) l) (/.f64 J l) (fma.f64 #s(literal -1/3 binary64) J (.f64 (.f64 K K) (+.f64 (/.f64 (/.f64 (fma.f64 #s(literal -1/192 binary64) (.f64 (.f64 K K) J) (.f64 #s(literal 1/4 binary64) J)) l) l) (fma.f64 #s(literal 1/24 binary64) J (.f64 #s(literal -1/1152 binary64) (.f64 (*.f64 K K) J)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (+ (* -1 (/ U (pow l 3))) (+ (* -1/3 J) (+ (* (pow K 2) (+ (* -1/1152 (* J (pow K 2))) (* 1/24 J))) (/ (* (pow K 2) (+ (* -1/192 (* J (pow K 2))) (* 1/4 J))) (pow l 2))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (neg.f64 (pow.f64 l #s(literal 3 binary64))) (fma.f64 (/.f64 #s(literal -2 binary64) l) (/.f64 J l) (fma.f64 #s(literal -1/3 binary64) J (fma.f64 (.f64 K K) (+.f64 (/.f64 (/.f64 (fma.f64 #s(literal -1/192 binary64) (.f64 (.f64 K K) J) (.f64 #s(literal 1/4 binary64) J)) l) l) (fma.f64 #s(literal 1/24 binary64) J (.f64 #s(literal -1/1152 binary64) (.f64 (.f64 K K) J)))) (/.f64 (neg.f64 U) (pow.f64 l #s(literal 3 binary64))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ (* J (cos (* 1/2 K))) (pow l 2))) (* -1/3 (* J (cos (* 1/2 K)))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (neg.f64 (pow.f64 l #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -1/3 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (/.f64 (.f64 (.f64 #s(literal -2 binary64) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (*.f64 l l)))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) #s(hole binary64 (* -1 (* (pow l 3) (+ (* -2 (/ J (pow l 2))) (* -1/3 J))))))
#s(approx (* (* (+ (* (* l l) 1/3) 2) l) J) (.f64 (neg.f64 (fma.f64 #s(literal -1/3 binary64) J (.f64 (/.f64 J (*.f64 l l)) #s(literal -2 binary64)))) (pow.f64 l #s(literal 3 binary64))))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) (.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (fma.f64 (.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal -1/46080 binary64) J) (.f64 (.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) (.f64 K K))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (* J (- (exp l) (/ 1 (exp l)))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* J (- (exp l) (/ 1 (exp l))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l))))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) (.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (/ 1 (exp l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (/ 1 (exp l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (/ 1 (exp l)))))) (* 1/384 (* J (- (exp l) (/ 1 (exp l)))))))))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (fma.f64 (.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal -1/46080 binary64) J) (.f64 (.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) (.f64 K K))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (* 2 (* J l)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) J) l U))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (fma.f64 (.f64 #s(literal 2 binary64) J) l U)))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l)))))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (fma.f64 #s(literal 1/192 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 (.f64 #s(literal -1/4 binary64) J) l)) (.f64 K K) (fma.f64 (*.f64 #s(literal 2 binary64) J) l U)))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (+ U (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l))))))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/23040 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 1/192 binary64) (.f64 l J))) (.f64 K K) (.f64 (.f64 #s(literal -1/4 binary64) J) l)) (.f64 K K) (fma.f64 (.f64 #s(literal 2 binary64) J) l U)))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* 2 (* J l))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 l J) #s(literal 2 binary64)))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (fma.f64 (.f64 #s(literal -1/4 binary64) J) (.f64 (.f64 K K) l) (.f64 (*.f64 l J) #s(literal 2 binary64))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (* J (- (exp l) (exp (neg l)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (*.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) (.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (+ U (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l)))))))))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (fma.f64 (.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal -1/46080 binary64) J) (.f64 (.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) (.f64 K K))) (*.f64 K K) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (* J (- (exp l) (exp (neg l))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* J (- (exp l) (exp (neg l)))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* 1/384 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) (.f64 K K) (*.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(hole binary64 (+ (* J (- (exp l) (exp (neg l)))) (* (pow K 2) (+ (* -1/8 (* J (- (exp l) (exp (neg l))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (- (exp l) (exp (neg l)))))) (* 1/384 (* J (- (exp l) (exp (neg l))))))))))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (fma.f64 (.f64 #s(literal 1/384 binary64) J) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (.f64 (.f64 #s(literal -1/46080 binary64) J) (.f64 (.f64 K K) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))))) (.f64 K K))) (.f64 K K) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J)))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (* 2 (* J l))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* -1/4 (* J (* (pow K 2) l))) (* 2 (* J l)))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 #s(literal -1/4 binary64) J) (.f64 (.f64 K K) l) (.f64 (*.f64 l J) #s(literal 2 binary64))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* 1/192 (* J (* (pow K 2) l))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (fma.f64 #s(literal 1/192 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 (.f64 #s(literal -1/4 binary64) J) l)) (.f64 K K) (.f64 (.f64 l J) #s(literal 2 binary64))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(hole binary64 (+ (* 2 (* J l)) (* (pow K 2) (+ (* -1/4 (* J l)) (* (pow K 2) (+ (* -1/23040 (* J (* (pow K 2) l))) (* 1/192 (* J l)))))))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/23040 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 1/192 binary64) (.f64 l J))) (.f64 K K) (.f64 (.f64 #s(literal -1/4 binary64) J) l)) (.f64 K K) (.f64 (*.f64 l J) #s(literal 2 binary64))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (*.f64 K K)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)) (fma.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (fma.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal -1/46080 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)) (fma.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ U (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (+ (* -1/8 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* J (* l (+ 2 (* 1/3 (pow l 2))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) #s(hole binary64 (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* (pow K 2) (+ (* -1/46080 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2)))))))))))))
#s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (fma.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal -1/46080 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K))) (.f64 K K) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))
#s(approx (cos (* -1/2 K)) #s(hole binary64 1))
#s(approx (cos (* -1/2 K)) #s(literal 1 binary64))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (* -1/2 K)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) (.f64 K K)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 1))
#s(approx (cos (/ K -2)) #s(literal 1 binary64))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* -1/8 (pow K 2)))))
#s(approx (cos (/ K -2)) (fma.f64 #s(literal -1/8 binary64) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* 1/384 (pow K 2)) 1/8)))))
#s(approx (cos (/ K -2)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64)))
#s(approx (cos (/ K -2)) #s(hole binary64 (+ 1 (* (pow K 2) (- (* (pow K 2) (+ 1/384 (* -1/46080 (pow K 2)))) 1/8)))))
#s(approx (cos (/ K -2)) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) (.f64 K K)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64)))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* -1/4 (* J (* (pow K 2) l)))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64)))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) #s(hole binary64 (* (pow K 2) (+ (* -1/4 (* J l)) (* 2 (/ (* J l) (pow K 2)))))))
#s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) K) (/.f64 (.f64 l J) K) (.f64 (.f64 #s(literal -1/4 binary64) J) l)) (*.f64 K K)))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) #s(hole binary64 (* (pow K 2) (+ (* -1/8 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (pow K 2))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (.f64 (fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) J) K) (/.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) K) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64))) (*.f64 K K)))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* 1/384 (* J (* (pow K 4) (* l (+ 2 (* 1/3 (pow l 2)))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (pow.f64 K #s(literal 4 binary64)) l) (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* (pow K 4) (+ (* -1/8 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (pow K 2))) (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (pow.f64 K #s(literal 4 binary64)) (fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) J) K) (/.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) K) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* (pow K 4) (+ (* -1/8 (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (pow K 2))) (+ (* 1/384 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (+ (/ U (pow K 4)) (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (pow K 4))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) J) K) (/.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) K) (fma.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (/.f64 (fma.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U) (pow.f64 K #s(literal 4 binary64))))) (pow.f64 K #s(literal 4 binary64))))
#s(approx (cos (* -1/2 K)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (* -1/2 K)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
#s(approx (cos (/ K -2)) #s(hole binary64 (cos (* -1/2 K))))
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (fma.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (fma.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* U (+ 1 (* 2 (/ (* J (* l (cos (* -1/2 K)))) U))))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (fma.f64 (.f64 (.f64 l J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (/.f64 #s(literal 2 binary64) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* U (+ 1 (* 2 (/ (* J l) U))))))
#s(approx (+ (* (* l J) 2) U) (.f64 (fma.f64 (/.f64 (.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* U (+ 1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (fma.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* U (+ 1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (fma.f64 J (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (/.f64 l U)) #s(literal 1 binary64)) U))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* U (+ 1 (+ (/ (* J (* l (+ 2 (* 1/3 (pow l 2))))) U) (/ (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2))))))))) U))))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)) U) U U))
#s(approx (+ (* (* (+ J J) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (neg.f64 U) (-.f64 (.f64 (neg.f64 J) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) U))) #s(literal 1 binary64))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* -1/2 K)) (- (exp l) (/ 1 (exp l))))) U)) 1)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (neg.f64 U) (-.f64 (.f64 (neg.f64 J) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) U))) #s(literal 1 binary64))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(hole binary64 (* -1 (* U (- (* -2 (/ (* J (* l (cos (* -1/2 K)))) U)) 1)))))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (neg.f64 U) (-.f64 (.f64 (.f64 J (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (/.f64 l U))) #s(literal -2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (* l J) 2) U) #s(hole binary64 (* -1 (* U (- (* -2 (/ (* J l) U)) 1)))))
#s(approx (+ (* (* l J) 2) U) (.f64 (neg.f64 U) (-.f64 (.f64 (/.f64 (*.f64 l J) U) #s(literal -2 binary64)) #s(literal 1 binary64))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* (cos (* 1/2 K)) (- (exp l) (exp (neg l))))) U)) 1)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (neg.f64 U) (-.f64 (.f64 (neg.f64 J) (.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) U))) #s(literal 1 binary64))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(hole binary64 (* -1 (* U (- (* -1 (/ (* J (* l (* (cos (* -1/2 K)) (+ 2 (* 1/3 (pow l 2)))))) U)) 1)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (neg.f64 U) (-.f64 (/.f64 (.f64 (.f64 l J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (neg.f64 U)) #s(literal 1 binary64))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) #s(hole binary64 (* -1 (* U (- (* -1 (/ (+ (* J (* l (+ 2 (* 1/3 (pow l 2))))) (* (pow K 2) (+ (* -1/8 (* J (* l (+ 2 (* 1/3 (pow l 2)))))) (* 1/384 (* J (* (pow K 2) (* l (+ 2 (* 1/3 (pow l 2)))))))))) U)) 1)))))
#s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (neg.f64 U) (-.f64 (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)) (neg.f64 U)) #s(literal 1 binary64))))

rewrite136.0ms (1.4%)

Memory

-32.7MiB live, 111.2MiB allocated; 18ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	80	555
0	112	547
1	401	510
0	3178	498

Stop Event

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

Counts

25 → 315

Calls

Call 1

Inputs
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
(*.f64 (+.f64 J J) (sinh.f64 l))
(+.f64 J J)
(sinh.f64 l)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U))
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(*.f64 l J)
(fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64)))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
(fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)))
(.f64 (.f64 K K) l)
(.f64 (.f64 (*.f64 K K) l) J)
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))

Outputs
(/.f64 (-.f64 (.f64 U U) (pow.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) #s(literal 2 binary64))) (-.f64 U (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) #s(literal 2 binary64)) (.f64 U U))) (neg.f64 (-.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) U)))
(/.f64 (neg.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (sinh.f64 l)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))) (pow.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) #s(literal 2 binary64)) (.f64 U U)) (-.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) U))
(/.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (sinh.f64 l)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) #s(literal 2 binary64)) (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)))))
(/.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (sinh.f64 l)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))) (pow.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) #s(literal 2 binary64))))
(fma.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) #s(literal 2 binary64)) (sinh.f64 l) U)
(fma.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) J) (*.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (sinh.f64 l)) #s(literal 2 binary64) U)
(fma.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) J U)
(fma.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) (.f64 J #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) U)
(fma.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) U)
(fma.f64 #s(literal 2 binary64) (.f64 J (.f64 #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (sinh.f64 l))) U)
(fma.f64 #s(literal 2 binary64) (.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (sinh.f64 l)) U)
(fma.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))) (.f64 #s(literal 2 binary64) (sinh.f64 l)) U)
(fma.f64 (sinh.f64 l) (.f64 #s(literal 2 binary64) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) U)
(fma.f64 J (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) U)
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) U)) (/.f64 (.f64 U U) (-.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) U)))
(-.f64 U (.f64 #s(literal -2 binary64) (.f64 #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) (sinh.f64 l))))
(-.f64 U (.f64 (neg.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
(-.f64 U (.f64 (neg.f64 #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) (*.f64 #s(literal 2 binary64) (sinh.f64 l))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))) (pow.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))) (pow.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))) U)
(+.f64 U (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
(.f64 (.f64 (sinh.f64 l) J) #s(literal 2 binary64))
(.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) J)
(.f64 #s(literal 2 binary64) (.f64 J (sinh.f64 l)))
(.f64 #s(literal 2 binary64) (.f64 (sinh.f64 l) J))
(*.f64 #s(literal 2 binary64) (sinh.f64 l))
(*.f64 (sinh.f64 l) #s(literal 2 binary64))
(.f64 J (.f64 #s(literal 2 binary64) (sinh.f64 l)))
(/.f64 (*.f64 #s(literal 0 binary64) (sinh.f64 l)) #s(literal 0 binary64))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (pow.f64 J #s(literal 3 binary64))) (sinh.f64 l)) (fma.f64 J J #s(literal 0 binary64)))
(/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l)) (.f64 #s(literal 2 binary64) (sinh.f64 l))) J) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) J) (fma.f64 (exp.f64 (neg.f64 l)) (.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 2 binary64))
(/.f64 (*.f64 (sinh.f64 l) #s(literal 0 binary64)) #s(literal 0 binary64))
(/.f64 (.f64 (sinh.f64 l) (.f64 #s(literal 2 binary64) (pow.f64 J #s(literal 3 binary64)))) (fma.f64 J J #s(literal 0 binary64)))
(/.f64 (.f64 J (.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l)) (.f64 #s(literal 2 binary64) (sinh.f64 l)))) (*.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (.f64 J (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)))) (fma.f64 (exp.f64 (neg.f64 l)) (.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l)) (.f64 #s(literal 2 binary64) (sinh.f64 l)))) (neg.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))))
(/.f64 (.f64 #s(literal 0 binary64) (.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal 0 binary64))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (pow.f64 J #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (sinh.f64 l))) (.f64 #s(literal 2 binary64) (pow.f64 J #s(literal 3 binary64))))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 0 binary64)) #s(literal 0 binary64))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 l)) (.f64 #s(literal 2 binary64) (pow.f64 J #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 J J #s(literal 0 binary64))))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l)) (.f64 #s(literal 2 binary64) (sinh.f64 l))) (.f64 #s(literal 2 binary64) (cosh.f64 l)))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (fma.f64 (exp.f64 (neg.f64 l)) (*.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))))
(neg.f64 (*.f64 #s(literal -2 binary64) (sinh.f64 l)))
(fma.f64 #s(literal 2 binary64) (/.f64 (sinh.f64 l) #s(literal 2 binary64)) (sinh.f64 l))
(fma.f64 (sinh.f64 l) J (*.f64 (sinh.f64 l) J))
(fma.f64 J (sinh.f64 l) (*.f64 J (sinh.f64 l)))
(-.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 (neg.f64 l)))
(-.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cosh.f64 l))) (/.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (cosh.f64 l))))
(-.f64 (/.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (fma.f64 (exp.f64 (neg.f64 l)) (.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64)) (fma.f64 (exp.f64 (neg.f64 l)) (.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64)))))
(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))
(+.f64 (-.f64 (exp.f64 l) (cosh.f64 l)) (sinh.f64 l))
(+.f64 (.f64 J (sinh.f64 l)) (.f64 J (sinh.f64 l)))
(+.f64 (.f64 (sinh.f64 l) J) (.f64 (sinh.f64 l) J))
(+.f64 (cosh.f64 l) (-.f64 (sinh.f64 l) (exp.f64 (neg.f64 l))))
(+.f64 (sinh.f64 l) (sinh.f64 l))
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) (/.f64 (sinh.f64 l) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l))) #s(literal -2 binary64))
(/.f64 (.f64 (.f64 #s(literal 2 binary64) (cosh.f64 l)) (.f64 #s(literal 2 binary64) (sinh.f64 l))) (.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 l)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (exp.f64 l) #s(literal 3 binary64)) (pow.f64 (exp.f64 (neg.f64 l)) #s(literal 3 binary64))) (.f64 (fma.f64 (exp.f64 (neg.f64 l)) (.f64 #s(literal 2 binary64) (cosh.f64 l)) (pow.f64 (exp.f64 l) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal 2 binary64))
(sinh.f64 l)
(neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 l)) #s(literal -2 binary64)))
(-.f64 (/.f64 (exp.f64 l) #s(literal 2 binary64)) (/.f64 (exp.f64 (neg.f64 l)) #s(literal 2 binary64)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 #s(literal 2 binary64) l U)))
#s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 #s(literal 2 binary64) l U))
(/.f64 (-.f64 (.f64 U U) (.f64 #s(literal 4 binary64) (.f64 l l))) (-.f64 U (.f64 #s(literal 2 binary64) l)))
(/.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (neg.f64 U) U))) (neg.f64 (-.f64 (*.f64 #s(literal 2 binary64) l) U)))
(/.f64 (neg.f64 (fma.f64 (pow.f64 l #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 U (-.f64 U (*.f64 #s(literal 2 binary64) l))))))
(/.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (neg.f64 U) U)) (-.f64 (*.f64 #s(literal 2 binary64) l) U))
(/.f64 (fma.f64 (pow.f64 l #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (.f64 (.f64 #s(literal 2 binary64) l) U))))
(/.f64 (fma.f64 (pow.f64 l #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 U #s(literal 3 binary64))) (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 U (-.f64 U (*.f64 #s(literal 2 binary64) l)))))
(fma.f64 (*.f64 #s(literal 2 binary64) l) J U)
(fma.f64 (*.f64 l J) #s(literal 2 binary64) U)
(fma.f64 #s(literal 2 binary64) (*.f64 l J) U)
(fma.f64 #s(literal 2 binary64) l U)
(fma.f64 l #s(literal 2 binary64) U)
(fma.f64 J (*.f64 #s(literal 2 binary64) l) U)
(-.f64 (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (-.f64 (.f64 #s(literal 2 binary64) l) U)) (/.f64 (.f64 U U) (-.f64 (*.f64 #s(literal 2 binary64) l) U)))
(-.f64 U (*.f64 #s(literal -2 binary64) l))
(-.f64 U (.f64 #s(literal -2 binary64) (.f64 l J)))
(-.f64 U (*.f64 (neg.f64 l) #s(literal 2 binary64)))
(-.f64 U (neg.f64 (*.f64 #s(literal 2 binary64) l)))
(+.f64 (/.f64 (pow.f64 (.f64 #s(literal 2 binary64) l) #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 U (-.f64 U (.f64 #s(literal 2 binary64) l))))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 U (-.f64 U (*.f64 #s(literal 2 binary64) l))))))
(+.f64 (*.f64 #s(literal 2 binary64) l) U)
(+.f64 U (*.f64 #s(literal 2 binary64) l))
(*.f64 l J)
(*.f64 J l)
(/.f64 (-.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (pow.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 2 binary64) l) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (*.f64 K K) l) J))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 #s(literal 2 binary64) l)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) (neg.f64 (.f64 #s(literal 2 binary64) l))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) #s(literal 2 binary64)) (.f64 #s(literal 4 binary64) (.f64 l l)))) (neg.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 K K) l)) J (.f64 #s(literal -2 binary64) l))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/64 binary64) (pow.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 2 binary64) l) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal 2 binary64) l) (-.f64 (.f64 #s(literal 2 binary64) l) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J))) (pow.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) #s(literal 2 binary64)) (.f64 #s(literal 4 binary64) (.f64 l l))) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 K K) l)) J (.f64 #s(literal -2 binary64) l)))
(/.f64 (fma.f64 #s(literal -1/64 binary64) (pow.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 2 binary64) l) #s(literal 3 binary64))) (fma.f64 #s(literal 4 binary64) (.f64 l l) (-.f64 (pow.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (*.f64 K K) l) J)) #s(literal 2 binary64)) l))))
(/.f64 (fma.f64 #s(literal -1/64 binary64) (pow.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 2 binary64) l) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 2 binary64) l) (-.f64 (.f64 #s(literal 2 binary64) l) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J))) (pow.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) #s(literal 2 binary64))))
(fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 K K) l)) J (.f64 (neg.f64 (*.f64 (neg.f64 l) J)) #s(literal 2 binary64)))
(fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 K K) l)) J (.f64 #s(literal 2 binary64) l))
(fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 K K)) (.f64 l J) (.f64 (neg.f64 (*.f64 (neg.f64 l) J)) #s(literal 2 binary64)))
(fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 K K)) (.f64 l J) (.f64 #s(literal 2 binary64) l))
(fma.f64 (.f64 #s(literal -1/4 binary64) J) (.f64 (.f64 K K) l) (.f64 (neg.f64 (*.f64 (neg.f64 l) J)) #s(literal 2 binary64)))
(fma.f64 (.f64 #s(literal -1/4 binary64) J) (.f64 (.f64 K K) l) (.f64 #s(literal 2 binary64) l))
(fma.f64 (.f64 #s(literal 2 binary64) l) J (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (*.f64 K K) l) J)))
(fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 (neg.f64 (*.f64 (neg.f64 l) J)) #s(literal 2 binary64)))
(fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l))
(fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (neg.f64 (*.f64 (neg.f64 l) J)) #s(literal 2 binary64)))
(fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 #s(literal 2 binary64) l))
(fma.f64 (.f64 (.f64 K K) l) (.f64 #s(literal -1/4 binary64) J) (.f64 (neg.f64 (*.f64 (neg.f64 l) J)) #s(literal 2 binary64)))
(fma.f64 (.f64 (.f64 K K) l) (.f64 #s(literal -1/4 binary64) J) (.f64 #s(literal 2 binary64) l))
(fma.f64 (.f64 K K) (.f64 (.f64 l J) #s(literal -1/4 binary64)) (.f64 (neg.f64 (*.f64 (neg.f64 l) J)) #s(literal 2 binary64)))
(fma.f64 (.f64 K K) (.f64 (.f64 l J) #s(literal -1/4 binary64)) (.f64 #s(literal 2 binary64) l))
(fma.f64 (.f64 K K) (.f64 l (.f64 #s(literal -1/4 binary64) J)) (.f64 (neg.f64 (*.f64 (neg.f64 l) J)) #s(literal 2 binary64)))
(fma.f64 (.f64 K K) (.f64 l (.f64 #s(literal -1/4 binary64) J)) (.f64 #s(literal 2 binary64) l))
(fma.f64 (.f64 l J) #s(literal 2 binary64) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (*.f64 K K) l) J)))
(fma.f64 #s(literal 2 binary64) (.f64 l J) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (*.f64 K K) l) J)))
(fma.f64 #s(literal 2 binary64) l (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)))
(fma.f64 K (.f64 (.f64 K l) (.f64 #s(literal -1/4 binary64) J)) (.f64 (neg.f64 (*.f64 (neg.f64 l) J)) #s(literal 2 binary64)))
(fma.f64 K (.f64 (.f64 K l) (.f64 #s(literal -1/4 binary64) J)) (.f64 #s(literal 2 binary64) l))
(fma.f64 l (.f64 (.f64 K K) (.f64 #s(literal -1/4 binary64) J)) (.f64 (neg.f64 (*.f64 (neg.f64 l) J)) #s(literal 2 binary64)))
(fma.f64 l (.f64 (.f64 K K) (.f64 #s(literal -1/4 binary64) J)) (.f64 #s(literal 2 binary64) l))
(fma.f64 l #s(literal 2 binary64) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)))
(fma.f64 J (.f64 (.f64 (.f64 K K) l) #s(literal -1/4 binary64)) (.f64 (neg.f64 (*.f64 (neg.f64 l) J)) #s(literal 2 binary64)))
(fma.f64 J (.f64 (.f64 (.f64 K K) l) #s(literal -1/4 binary64)) (.f64 #s(literal 2 binary64) l))
(fma.f64 J (.f64 #s(literal 2 binary64) l) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (*.f64 K K) l) J)))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) #s(literal 2 binary64)) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 K K) l)) J (.f64 #s(literal -2 binary64) l))) (/.f64 (.f64 #s(literal 4 binary64) (.f64 l l)) (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 K K) l)) J (.f64 #s(literal -2 binary64) l))))
(-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) (*.f64 #s(literal -2 binary64) l))
(-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) (.f64 #s(literal -2 binary64) (.f64 l J)))
(-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) (*.f64 (neg.f64 l) #s(literal 2 binary64)))
(-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) (neg.f64 (*.f64 #s(literal 2 binary64) l)))
(-.f64 (.f64 #s(literal 2 binary64) l) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (*.f64 K K) l) J)))
(-.f64 (.f64 #s(literal 2 binary64) l) (.f64 (neg.f64 (.f64 (.f64 (*.f64 K K) l) J)) #s(literal -1/4 binary64)))
(-.f64 (.f64 #s(literal 2 binary64) l) (.f64 (neg.f64 (.f64 (.f64 K K) l)) (*.f64 #s(literal -1/4 binary64) J)))
(+.f64 (/.f64 (pow.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) #s(literal 3 binary64)) (fma.f64 (.f64 #s(literal 2 binary64) l) (-.f64 (.f64 #s(literal 2 binary64) l) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J))) (pow.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 #s(literal 2 binary64) l) #s(literal 3 binary64)) (fma.f64 (.f64 #s(literal 2 binary64) l) (-.f64 (.f64 #s(literal 2 binary64) l) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J))) (pow.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (*.f64 K K) l) J)) #s(literal 2 binary64)))))
(+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) (.f64 (neg.f64 (.f64 (neg.f64 l) J)) #s(literal 2 binary64)))
(+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J)) (*.f64 #s(literal 2 binary64) l))
(+.f64 (.f64 #s(literal 2 binary64) l) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (*.f64 K K) l) J)))
(/.f64 (-.f64 (.f64 U U) (pow.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) #s(literal 2 binary64))) (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) #s(literal 2 binary64)) (.f64 U U))) (neg.f64 (-.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) U)))
(/.f64 (neg.f64 (+.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64)))) (neg.f64 (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l))))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) #s(literal 2 binary64)) (.f64 U U)) (-.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) U))
(/.f64 (+.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U U (-.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) #s(literal 2 binary64)) (.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) U))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l))))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) #s(literal 2 binary64)) (-.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) U)) (/.f64 (.f64 U U) (-.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) U)))
(+.f64 (/.f64 (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) #s(literal 3 binary64)) (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l))))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 U #s(literal 3 binary64)) (fma.f64 U (-.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l))))) (pow.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) #s(literal 2 binary64)))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))) U)
(+.f64 U #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))))
#s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l))))
#s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 K K) l) J) (.f64 #s(literal 2 binary64) l)))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) #s(literal 2 binary64)) (fma.f64 #s(literal 1/64 binary64) (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) (neg.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) #s(literal 2 binary64)) (pow.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 K (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 #s(literal 1/384 binary64) K) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/512 binary64) (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K)) (pow.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)) K) K) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) #s(literal 2 binary64)) (pow.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) #s(literal 2 binary64))) (fma.f64 (.f64 K (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 #s(literal 1/384 binary64) K) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J))))
(/.f64 (fma.f64 #s(literal -1/512 binary64) (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) #s(literal 3 binary64))) (fma.f64 #s(literal 1/64 binary64) (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) #s(literal -1/8 binary64)) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)))))
(/.f64 (fma.f64 #s(literal -1/512 binary64) (pow.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K)) (pow.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)) K) K) #s(literal 2 binary64))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) J (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)) K) K))
(fma.f64 (.f64 #s(literal -1/8 binary64) (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64))) (.f64 l J) (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)) K) K))
(fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (neg.f64 K)) (neg.f64 K) (.f64 (neg.f64 (.f64 (neg.f64 J) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal -1/8 binary64)))
(fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (neg.f64 K)) (neg.f64 K) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)))
(fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (fabs.f64 K)) (fabs.f64 K) (.f64 (neg.f64 (.f64 (neg.f64 J) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal -1/8 binary64)))
(fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (fabs.f64 K)) (fabs.f64 K) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)))
(fma.f64 (.f64 K (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 #s(literal 1/384 binary64) K) (.f64 (neg.f64 (.f64 (neg.f64 J) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal -1/8 binary64)))
(fma.f64 (.f64 K (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 #s(literal 1/384 binary64) K) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)))
(fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)) K) K))
(fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)) K) K))
(fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 (neg.f64 (.f64 (neg.f64 J) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal -1/8 binary64)))
(fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)))
(fma.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 K K) (.f64 (neg.f64 (.f64 (neg.f64 J) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal -1/8 binary64)))
(fma.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 K K) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)))
(fma.f64 #s(literal 1/384 binary64) (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) (.f64 K K)) (.f64 (neg.f64 (.f64 (neg.f64 J) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal -1/8 binary64)))
(fma.f64 #s(literal 1/384 binary64) (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) (.f64 K K)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)))
(fma.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) (.f64 (.f64 #s(literal 1/384 binary64) K) K) (.f64 (neg.f64 (.f64 (neg.f64 J) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal -1/8 binary64)))
(fma.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) (.f64 (.f64 #s(literal 1/384 binary64) K) K) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)))
(fma.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) (.f64 #s(literal 1/384 binary64) (.f64 K K)) (.f64 (neg.f64 (.f64 (neg.f64 J) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal -1/8 binary64)))
(fma.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) (.f64 #s(literal 1/384 binary64) (.f64 K K)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)))
(fma.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64) (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)) K) K))
(fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 K K)) (.f64 (neg.f64 (.f64 (neg.f64 J) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal -1/8 binary64)))
(fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 K K)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)))
(fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) (.f64 #s(literal -1/8 binary64) J) (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)) K) K))
(fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (.f64 (.f64 l J) #s(literal -1/8 binary64)) (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)) K) K))
(fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (.f64 l (.f64 #s(literal -1/8 binary64) J)) (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)) K) K))
(fma.f64 (.f64 K K) (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 (neg.f64 (.f64 (neg.f64 J) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal -1/8 binary64)))
(fma.f64 (.f64 K K) (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)))
(fma.f64 K (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) (.f64 (neg.f64 (.f64 (neg.f64 J) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))) #s(literal -1/8 binary64)))
(fma.f64 K (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)))
(fma.f64 l (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (.f64 #s(literal -1/8 binary64) J)) (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)) K) K))
(fma.f64 J (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) #s(literal -1/8 binary64)) (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)) K) K))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) #s(literal 2 binary64)) (fma.f64 (.f64 K (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 #s(literal 1/384 binary64) K) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)))) (/.f64 (pow.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) #s(literal 2 binary64)) (fma.f64 (.f64 K (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 #s(literal 1/384 binary64) K) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)))))
(-.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)))
(-.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) (.f64 (neg.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l)) (.f64 #s(literal -1/8 binary64) J)))
(-.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) (neg.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))))
(-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 (neg.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K)) K))
(-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 (neg.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) (.f64 K K)))
(-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 (neg.f64 K) (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K)))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) #s(literal 3 binary64)) (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K)) (pow.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) #s(literal 3 binary64)) (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K)) (pow.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) (.f64 (neg.f64 (.f64 (neg.f64 J) (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l))) #s(literal -1/8 binary64)))
(+.f64 (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)))
(+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U)))
(/.f64 (-.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (fma.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) (.f64 U U)) (-.f64 (fma.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)) U))
(/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K) #s(literal 2 binary64))) (-.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K)))
(/.f64 (+.f64 (pow.f64 (fma.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) #s(literal 3 binary64)) (pow.f64 U #s(literal 3 binary64))) (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (fma.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) (-.f64 (.f64 U U) (.f64 (fma.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) U))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K) (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) (-.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K)) (pow.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J))) K) K) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K) #s(literal 2 binary64)) (pow.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K) (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U)))
(/.f64 (+.f64 (pow.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K) #s(literal 3 binary64))) (+.f64 (pow.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) (.f64 K (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U))))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K) #s(literal 3 binary64))) (fma.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) (-.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K)) (pow.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J))) K) K) #s(literal 2 binary64))))
(fma.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) (neg.f64 K)) (neg.f64 K) (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U))
(fma.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) (fabs.f64 K)) (fabs.f64 K) (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U))
(fma.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U))
(fma.f64 (neg.f64 K) (.f64 (neg.f64 K) (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)))) (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U))
(fma.f64 (fabs.f64 K) (.f64 (fabs.f64 K) (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)))) (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U))
(fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l (+.f64 U (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J))) K) K)))
(fma.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) (.f64 K K) (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U))
(fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J (+.f64 U (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J))) K) K)))
(fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (.f64 l J) (+.f64 U (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J))) K) K)))
(fma.f64 (.f64 K K) (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U))
(fma.f64 (.f64 l J) (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (+.f64 U (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J))) K) K)))
(fma.f64 K (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U))
(fma.f64 l (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) (+.f64 U (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J))) K) K)))
(fma.f64 J (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) (+.f64 U (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J))) K) K)))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K) (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U))) (/.f64 (pow.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K) (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l U))))
(-.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) (.f64 (neg.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J))) K)) K))
(-.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) (.f64 (neg.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)))) (*.f64 K K)))
(-.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) (.f64 (neg.f64 (.f64 K K)) (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)))))
(+.f64 (fma.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K U) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K) #s(literal 3 binary64)) (fma.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) (-.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K)) (pow.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K) #s(literal 2 binary64)))) (/.f64 (pow.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) #s(literal 3 binary64)) (fma.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) (-.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K)) (pow.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J))) K) K) #s(literal 2 binary64)))))
(+.f64 (fma.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)) U)
(+.f64 (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K) (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l U))
(+.f64 (fma.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) l U) (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J))) K) K))
(+.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) (+.f64 U (.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K)))
(+.f64 U (fma.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal 1/384 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J)) K) K (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J))) K) K (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64))) (*.f64 l J))
(.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l)) J)
(.f64 (.f64 l (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J)) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) l) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J))
(.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) J) (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))
(.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))) l)
(.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) l))
(.f64 (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J))
(.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (.f64 (.f64 l J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (.f64 l (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J))
(.f64 l (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(.f64 J (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) l) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))
(.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J) l)
(.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l) J)
(.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (*.f64 l J))
(.f64 (.f64 l J) (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)))
(.f64 l (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) J))
(.f64 J (.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64)) l))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 l J)) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)))
(/.f64 (.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 8 binary64)) (.f64 l J)) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) K)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) K)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) K (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (fma.f64 #s(literal -1/2 binary64) K (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) K))
(cos.f64 (*.f64 #s(literal -1/2 binary64) K))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) K)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) K)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))
(.f64 (.f64 l (neg.f64 K)) (neg.f64 K))
(.f64 (.f64 l (fabs.f64 K)) (fabs.f64 K))
(.f64 (.f64 K l) K)
(.f64 (neg.f64 K) (.f64 (neg.f64 K) l))
(.f64 (fabs.f64 K) (.f64 (fabs.f64 K) l))
(.f64 (.f64 K K) l)
(.f64 K (.f64 K l))
(.f64 l (.f64 K K))
(.f64 (.f64 (*.f64 K K) J) l)
(.f64 (.f64 J (*.f64 K K)) l)
(.f64 (.f64 J K) (*.f64 K l))
(.f64 (neg.f64 K) (.f64 (neg.f64 K) (*.f64 l J)))
(.f64 (fabs.f64 K) (.f64 (fabs.f64 K) (*.f64 l J)))
(.f64 (.f64 (*.f64 K K) l) J)
(.f64 (.f64 K K) (*.f64 l J))
(.f64 (.f64 l J) (*.f64 K K))
(.f64 K (.f64 (*.f64 K l) J))
(.f64 K (.f64 K (*.f64 l J)))
(.f64 l (.f64 (*.f64 K K) J))
(.f64 J (.f64 (*.f64 K K) l))
(/.f64 (-.f64 #s(literal 4 binary64) (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64))) (-.f64 #s(literal 2 binary64) (.f64 #s(literal 1/3 binary64) (.f64 l l))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64))) (neg.f64 (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 8 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)))
(/.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) (.f64 (*.f64 l l) #s(literal 2/3 binary64)))))
(/.f64 (fma.f64 #s(literal 1/27 binary64) (pow.f64 (.f64 l l) #s(literal 3 binary64)) #s(literal 8 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (*.f64 l l) #s(literal 2/3 binary64))))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (fabs.f64 l)) (fabs.f64 l) #s(literal 2 binary64))
(fma.f64 (*.f64 #s(literal 1/3 binary64) (neg.f64 l)) (neg.f64 l) #s(literal 2 binary64))
(fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64))
(fma.f64 (fabs.f64 l) (*.f64 (fabs.f64 l) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(fma.f64 #s(literal 1/3 binary64) (*.f64 l l) #s(literal 2 binary64))
(fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64))
(fma.f64 (neg.f64 l) (*.f64 (neg.f64 l) #s(literal 1/3 binary64)) #s(literal 2 binary64))
(fma.f64 l (*.f64 #s(literal 1/3 binary64) l) #s(literal 2 binary64))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (-.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64))))
(-.f64 #s(literal 2 binary64) (.f64 #s(literal -1/3 binary64) (.f64 l l)))
(-.f64 #s(literal 2 binary64) (.f64 (neg.f64 (.f64 l l)) #s(literal 1/3 binary64)))
(-.f64 #s(literal 2 binary64) (.f64 (neg.f64 l) (.f64 #s(literal 1/3 binary64) l)))
(+.f64 (fma.f64 (*.f64 #s(literal 1/3 binary64) l) l #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 (/.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 3 binary64)) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (.f64 l l) #s(literal 2/3 binary64)))) (/.f64 #s(literal 8 binary64) (-.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64)) #s(literal 4 binary64)) (.f64 (.f64 l l) #s(literal 2/3 binary64)))))
(+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/3 binary64) (.f64 l l))))
(+.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) #s(literal 2 binary64))
(+.f64 #s(literal 2 binary64) (.f64 #s(literal 1/3 binary64) (.f64 l l)))

eval141.0ms (1.5%)

Memory: -9.8MiB live, 143.5MiB allocated; 26ms collecting garbage
Compiler: Compiled 37 200 to 2 755 computations (92.6% saved)

prune54.0ms (0.6%)

Memory

15.1MiB live, 104.9MiB allocated; 9ms collecting garbage

Pruning

29 alts after pruning (26 fresh and 3 done)

	Pruned	Kept	Total
New	576	19	595
Fresh	6	7	13
Picked	3	2	5
Done	0	1	1
Total	585	29	614

Accuracy

100.0%

Counts

614 → 29

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	100.0%	(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
	82.5%	(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U)
	96.9%	(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/5040 binary64) (.f64 l l) #s(literal 1/120 binary64)) (.f64 l l) #s(literal 1/6 binary64)) (.f64 l l) #s(literal 1 binary64)) l))) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
	93.3%	(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 l l) #s(literal 1/6 binary64)) (.f64 l l) #s(literal 1 binary64)) l))) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
	65.3%	(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
	96.9%	(fma.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) U)
	45.9%	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 K (.f64 (.f64 K l) J)) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
	36.9%	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64))))) U)
	51.8%	(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 l (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))) J)))) U)
	48.3%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
	51.3%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
	65.3%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J)) l U))
	86.9%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (fma.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
✓	56.5%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
	56.5%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
	34.0%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
	34.2%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (/.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (neg.f64 U) U)) (-.f64 (*.f64 #s(literal 2 binary64) l) U))))
	58.6%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (fma.f64 (/.f64 (.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
	53.5%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
	21.4%	#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
	60.1%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
	64.7%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
	35.2%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
	50.7%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (.f64 l J)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
	13.7%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))))
	36.1%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)) U) U U))))
	23.0%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (.f64 K K) #s(literal -1/8 binary64))) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) J))))
	40.6%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
✓	37.6%	#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)

Compiler

Compiled 3 633 to 1 242 computations (65.8% saved)

regimes183.0ms (1.9%)

Memory

8.4MiB live, 198.6MiB allocated; 20ms collecting garbage

Counts

58 → 1

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 l (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))) J)))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (fma.f64 (/.f64 (.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l J)) (.f64 K K) U))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 K (.f64 (.f64 K l) J)) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (/.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (neg.f64 U) U)) (-.f64 (*.f64 #s(literal 2 binary64) l) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (.f64 K K) #s(literal -1/8 binary64))) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)) U) U U))))
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(literal 1 binary64)) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J)) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 #s(literal 2 binary64) J)) l)) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (.f64 l J)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) l (*.f64 #s(literal 2 binary64) l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 l l) #s(literal 1/6 binary64)) (.f64 l l) #s(literal 1 binary64)) l))) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 #s(approx (+ ( 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/5040 binary64) (.f64 l l) #s(literal 1/120 binary64)) (.f64 l l) #s(literal 1/6 binary64)) (.f64 l l) #s(literal 1 binary64)) l))) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
(fma.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) (cos.f64 (/.f64 K #s(literal -2 binary64))) U)
(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (.f64 (fma.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (*.f64 (/.f64 J U) (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #s(literal 1 binary64)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (fma.f64 (.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (.f64 (fma.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) K)) J) (/.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) U) #s(literal 1 binary64)) U))

Outputs
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)

Calls

10 calls:

51.0ms	(/.f64 K #s(literal 2 binary64))
23.0ms	J
17.0ms	U
14.0ms	K
14.0ms	l

Results

Accuracy	Segments	Branch
100.0%	1	`(/.f64 K #s(literal 2 binary64))`
100.0%	1	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`
100.0%	1	`(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))`
100.0%	1	`(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))`
100.0%	1	`(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))`
100.0%	1	`(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)`
100.0%	1	`J`
100.0%	1	`l`
100.0%	1	`K`
100.0%	1	`U`

Compiler

Compiled 53 to 73 computations (-37.7% saved)

regimes155.0ms (1.6%)

Memory

27.4MiB live, 213.9MiB allocated; 18ms collecting garbage

Counts

51 → 1

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 l (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))) J)))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (fma.f64 (/.f64 (.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l J)) (.f64 K K) U))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 K (.f64 (.f64 K l) J)) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (/.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (neg.f64 U) U)) (-.f64 (*.f64 #s(literal 2 binary64) l) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (.f64 K K) #s(literal -1/8 binary64))) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)) U) U U))))
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(literal 1 binary64)) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J)) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 #s(literal 2 binary64) J)) l)) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (.f64 l J)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) l (*.f64 #s(literal 2 binary64) l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 l l) #s(literal 1/6 binary64)) (.f64 l l) #s(literal 1 binary64)) l))) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 #s(approx (+ ( 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/5040 binary64) (.f64 l l) #s(literal 1/120 binary64)) (.f64 l l) #s(literal 1/6 binary64)) (.f64 l l) #s(literal 1 binary64)) l))) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
(fma.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))) J U))

Outputs

(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (*.f64 l l) #s(literal 1/60 binary64)) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)

Calls

10 calls:

25.0ms	(cos.f64 (/.f64 K #s(literal 2 binary64)))
23.0ms	J
23.0ms	K
13.0ms	U
13.0ms	(/.f64 K #s(literal 2 binary64))

Results

Accuracy	Segments	Branch
96.9%	1	`(/.f64 K #s(literal 2 binary64))`
96.9%	1	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`
96.9%	1	`(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))`
96.9%	1	`(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))`
96.9%	1	`(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))`
96.9%	1	`(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)`
96.9%	1	`J`
96.9%	1	`l`
96.9%	1	`K`
96.9%	1	`U`

Compiler

Compiled 53 to 73 computations (-37.7% saved)

regimes129.0ms (1.4%)

Memory

-19.2MiB live, 219.7MiB allocated; 24ms collecting garbage

Counts

49 → 1

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 l (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))) J)))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (fma.f64 (/.f64 (.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l J)) (.f64 K K) U))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 K (.f64 (.f64 K l) J)) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (/.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (neg.f64 U) U)) (-.f64 (*.f64 #s(literal 2 binary64) l) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (.f64 K K) #s(literal -1/8 binary64))) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)) U) U U))))
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(literal 1 binary64)) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J)) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 #s(literal 2 binary64) J)) l)) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (.f64 l J)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) l (*.f64 #s(literal 2 binary64) l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 l l) #s(literal 1/6 binary64)) (.f64 l l) #s(literal 1 binary64)) l))) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 #s(approx (+ ( 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/5040 binary64) (.f64 l l) #s(literal 1/120 binary64)) (.f64 l l) #s(literal 1/6 binary64)) (.f64 l l) #s(literal 1 binary64)) l))) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
(fma.f64 (.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) J) #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l)) U)

Outputs

(fma.f64 (*.f64 (+.f64 J J) #s(approx (sinh l) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/5040 binary64) (*.f64 l l) #s(literal 1/120 binary64)) (*.f64 l l) #s(literal 1/6 binary64)) (*.f64 l l) #s(literal 1 binary64)) l))) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)

Calls

10 calls:

17.0ms	K
16.0ms	U
15.0ms	(cos.f64 (/.f64 K #s(literal 2 binary64)))
14.0ms	l
12.0ms	(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)

Results

Accuracy	Segments	Branch
96.9%	1	`(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))`
96.9%	1	`l`
96.9%	1	`(/.f64 K #s(literal 2 binary64))`
96.9%	1	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`
96.9%	1	`(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))`
96.9%	1	`(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))`
96.9%	1	`(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)`
96.9%	1	`J`
96.9%	1	`K`
96.9%	1	`U`

Compiler

Compiled 53 to 73 computations (-37.7% saved)

regimes137.0ms (1.4%)

Memory

-13.0MiB live, 180.7MiB allocated; 24ms collecting garbage

Counts

47 → 2

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 l (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))) J)))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (fma.f64 (/.f64 (.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l J)) (.f64 K K) U))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 K (.f64 (.f64 K l) J)) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (/.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (neg.f64 U) U)) (-.f64 (*.f64 #s(literal 2 binary64) l) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (.f64 K K) #s(literal -1/8 binary64))) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)) U) U U))))
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(literal 1 binary64)) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J)) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 #s(literal 2 binary64) J)) l)) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (.f64 l J)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) l (*.f64 #s(literal 2 binary64) l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 l l) #s(literal 1/6 binary64)) (.f64 l l) #s(literal 1 binary64)) l))) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 #s(approx (+ ( 1/2520 (* l l)) 1/60) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)

Outputs

(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (*.f64 l l) #s(literal 1/3 binary64)) (*.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)

(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)

Calls

10 calls:

29.0ms	K
14.0ms	(/.f64 K #s(literal 2 binary64))
13.0ms	(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
12.0ms	J
12.0ms	U

Results

Accuracy	Segments	Branch
93.3%	1	`(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))`
96.7%	3	`l`
96.4%	2	`(/.f64 K #s(literal 2 binary64))`
96.6%	2	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`
93.3%	1	`(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))`
93.3%	1	`(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))`
93.3%	1	`(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)`
93.3%	1	`J`
96.4%	2	`K`
93.3%	1	`U`

Compiler

Compiled 53 to 73 computations (-37.7% saved)

regimes13.0ms (0.1%)

Memory

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

Counts

45 → 2

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 l (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))) J)))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (fma.f64 (/.f64 (.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l J)) (.f64 K K) U))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 K (.f64 (.f64 K l) J)) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (/.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (neg.f64 U) U)) (-.f64 (*.f64 #s(literal 2 binary64) l) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (.f64 K K) #s(literal -1/8 binary64))) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)) U) U U))))
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(literal 1 binary64)) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J)) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 #s(literal 2 binary64) J)) l)) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (.f64 l J)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) l (*.f64 #s(literal 2 binary64) l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 l l) #s(literal 1/6 binary64)) (.f64 l l) #s(literal 1 binary64)) l))) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)

Outputs

(fma.f64 (*.f64 (+.f64 J J) #s(approx (sinh l) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 l l) #s(literal 1/6 binary64)) (*.f64 l l) #s(literal 1 binary64)) l))) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)

(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)

Calls

1 calls:

11.0ms

(cos.f64 (/.f64 K #s(literal 2 binary64)))

Results

Accuracy	Segments	Branch
96.6%	2	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`

Compiler

Compiled 4 to 7 computations (-75% saved)

regimes58.0ms (0.6%)

Memory

-29.0MiB live, 70.4MiB allocated; 8ms collecting garbage

Counts

44 → 2

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 l (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))) J)))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (fma.f64 (/.f64 (.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l J)) (.f64 K K) U))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 K (.f64 (.f64 K l) J)) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (/.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (neg.f64 U) U)) (-.f64 (*.f64 #s(literal 2 binary64) l) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (.f64 K K) #s(literal -1/8 binary64))) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)) U) U U))))
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(literal 1 binary64)) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J)) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 #s(literal 2 binary64) J)) l)) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (.f64 l J)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (fma.f64 (.f64 #s(literal 1/3 binary64) (.f64 l l)) l (*.f64 #s(literal 2 binary64) l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)

Outputs

(+.f64 (*.f64 (*.f64 J #s(approx (- (exp l) (exp (neg l))) (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)

(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)

Calls

3 calls:

31.0ms	(/.f64 K #s(literal 2 binary64))
13.0ms	(cos.f64 (/.f64 K #s(literal 2 binary64)))
11.0ms	K

Results

Accuracy	Segments	Branch
95.2%	2	`(/.f64 K #s(literal 2 binary64))`
95.2%	2	`K`
95.9%	2	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`

Compiler

Compiled 8 to 17 computations (-112.5% saved)

regimes12.0ms (0.1%)

Memory

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

Counts

42 → 2

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 l (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))) J)))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (fma.f64 (/.f64 (.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l J)) (.f64 K K) U))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 K (.f64 (.f64 K l) J)) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (/.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (neg.f64 U) U)) (-.f64 (*.f64 #s(literal 2 binary64) l) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (.f64 K K) #s(literal -1/8 binary64))) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)) U) U U))))
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(literal 1 binary64)) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J)) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 #s(literal 2 binary64) J)) l)) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (.f64 l J)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))

Outputs

#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))

(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)

Calls

1 calls:

10.0ms

(cos.f64 (/.f64 K #s(literal 2 binary64)))

Results

Accuracy	Segments	Branch
95.5%	2	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`

Compiler

Compiled 4 to 7 computations (-75% saved)

regimes143.0ms (1.5%)

Memory

-3.9MiB live, 181.3MiB allocated; 19ms collecting garbage

Counts

41 → 4

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 l (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))) J)))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (fma.f64 (/.f64 (.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l J)) (.f64 K K) U))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 K (.f64 (.f64 K l) J)) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (/.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (neg.f64 U) U)) (-.f64 (*.f64 #s(literal 2 binary64) l) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (.f64 K K) #s(literal -1/8 binary64))) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)) U) U U))))
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(literal 1 binary64)) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J)) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 #s(literal 2 binary64) J)) l)) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 l l) #s(literal 2 binary64)) (.f64 l J)) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))

Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K)))))

Calls

10 calls:

38.0ms	K
21.0ms	(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
15.0ms	U
10.0ms	(/.f64 K #s(literal 2 binary64))
10.0ms	J

Results

Accuracy	Segments	Branch
92.7%	3	`(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))`
91.3%	3	`(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))`
87.0%	3	`J`
82.5%	1	`U`
91.3%	3	`(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))`
91.2%	3	`(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)`
95.8%	4	`l`
85.6%	2	`(/.f64 K #s(literal 2 binary64))`
85.6%	2	`K`
90.4%	3	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`

Compiler

Compiled 53 to 73 computations (-37.7% saved)

regimes80.0ms (0.8%)

Memory

-17.0MiB live, 130.8MiB allocated; 13ms collecting garbage

Counts

39 → 3

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 l (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))) J)))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (fma.f64 (/.f64 (.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l J)) (.f64 K K) U))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 K (.f64 (.f64 K l) J)) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (/.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (neg.f64 U) U)) (-.f64 (*.f64 #s(literal 2 binary64) l) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (.f64 K K) #s(literal -1/8 binary64))) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)) U) U U))))
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(literal 1 binary64)) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J)) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 #s(literal 2 binary64) J)) l)) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U)

Outputs

(fma.f64 (*.f64 (*.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U)

(fma.f64 (*.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)

(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)

Calls

6 calls:

29.0ms	l
14.0ms	(cos.f64 (/.f64 K #s(literal 2 binary64)))
10.0ms	(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))
9.0ms	(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
8.0ms	(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))

Results

Accuracy	Segments	Branch
90.4%	3	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`
88.1%	3	`(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)`
89.1%	3	`(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))`
88.3%	3	`(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))`
88.6%	3	`(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))`
90.6%	4	`l`

Compiler

Compiled 47 to 55 computations (-17% saved)

regimes11.0ms (0.1%)

Memory

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

Counts

38 → 2

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 l (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))) J)))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (fma.f64 (/.f64 (.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l J)) (.f64 K K) U))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 K (.f64 (.f64 K l) J)) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (/.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (neg.f64 U) U)) (-.f64 (*.f64 #s(literal 2 binary64) l) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (.f64 K K) #s(literal -1/8 binary64))) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)) U) U U))))
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(literal 1 binary64)) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) K)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (*.f64 #s(literal 2 binary64) J)) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K)) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) K)) (.f64 #s(literal 2 binary64) J)) l)) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U)

Outputs

(fma.f64 (*.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) K))) U)

(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)

Calls

1 calls:

9.0ms

(cos.f64 (/.f64 K #s(literal 2 binary64)))

Results

Accuracy	Segments	Branch
88.6%	2	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`

Compiler

Compiled 4 to 7 computations (-75% saved)

regimes42.0ms (0.4%)

Memory

-17.0MiB live, 27.9MiB allocated; 7ms collecting garbage

Counts

31 → 2

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 l (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))) J)))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (fma.f64 (/.f64 (.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l J)) (.f64 K K) U))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 K (.f64 (.f64 K l) J)) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (/.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (neg.f64 U) U)) (-.f64 (*.f64 #s(literal 2 binary64) l) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (.f64 K K) #s(literal -1/8 binary64))) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)) U) U U))))
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(literal 1 binary64)) U)
(fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)

Outputs

#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))

(fma.f64 (*.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)

Calls

1 calls:

40.0ms

(cos.f64 (/.f64 K #s(literal 2 binary64)))

Results

Accuracy	Segments	Branch
88.4%	2	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`

Compiler

Compiled 4 to 7 computations (-75% saved)

regimes90.0ms (0.9%)

Memory

18.0MiB live, 110.0MiB allocated; 8ms collecting garbage

Counts

28 → 2

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 l (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))) J)))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (fma.f64 (/.f64 (.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l J)) (.f64 K K) U))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 K (.f64 (.f64 K l) J)) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (/.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (neg.f64 U) U)) (-.f64 (*.f64 #s(literal 2 binary64) l) U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (*.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 #s(literal 1/384 binary64) (.f64 K K)) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))) (.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/46080 binary64) (.f64 K K) #s(literal 1/384 binary64)) K) K) #s(literal 1/8 binary64)) (.f64 K K) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (fma.f64 #s(literal 1/384 binary64) (.f64 K K) #s(literal -1/8 binary64))) (.f64 K K) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l)) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/3 binary64) l) l #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal 1/384 binary64)) K) K (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) #s(literal -1/8 binary64))) (.f64 K K) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (+ (* (+ (* (* (* (* (* (+ (* (* l l) 1/3) 2) l) J) 1/384) K) K) (* (* (* (+ (* (* l l) 1/3) 2) l) J) -1/8)) (* K K)) (+ (* (* (+ (* (* l l) 1/3) 2) l) J) U)) (fma.f64 (/.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) J) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 (.f64 #s(literal 1/384 binary64) J) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) (.f64 K K)))) (.f64 K K) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)) U) U U))))

Outputs

#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (*.f64 #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (*.f64 J (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U))

#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))

Calls

10 calls:

14.0ms	(/.f64 K #s(literal 2 binary64))
7.0ms	U
7.0ms	l
7.0ms	J
7.0ms	K

Results

Accuracy	Segments	Branch
75.6%	1	`U`
75.6%	1	`J`
75.6%	1	`(/.f64 K #s(literal 2 binary64))`
75.6%	1	`K`
75.6%	1	`(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)`
75.6%	1	`(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))`
77.5%	2	`(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))`
78.3%	2	`l`
75.6%	1	`(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))`
81.5%	2	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`

Compiler

Compiled 53 to 73 computations (-37.7% saved)

regimes32.0ms (0.3%)

Memory

-39.4MiB live, 18.5MiB allocated; 10ms collecting garbage

Counts

18 → 2

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 l (fma.f64 #s(literal -1/4 binary64) (*.f64 K K) #s(literal 2 binary64))) J)))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (fma.f64 (/.f64 (.f64 l J) U) #s(literal 2 binary64) #s(literal 1 binary64)) U))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) (fma.f64 (.f64 (.f64 l J) #s(literal 2 binary64)) #s(approx (cos (* -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) #s(approx (cos ( -1/2 K)) (fma.f64 (*.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J (fma.f64 (.f64 #s(literal -1/4 binary64) (.f64 l J)) (.f64 K K) U))))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 K (.f64 (.f64 K l) J)) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (fma.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64) (.f64 (*.f64 l J) #s(literal 2 binary64))))) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (/.f64 (fma.f64 #s(literal 4 binary64) (.f64 l l) (.f64 (neg.f64 U) U)) (-.f64 (*.f64 #s(literal 2 binary64) l) U))))

Outputs

(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (*.f64 (*.f64 (*.f64 (*.f64 K K) l) J) #s(literal -1/4 binary64))))) U)

#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))

Calls

1 calls:

31.0ms

(cos.f64 (/.f64 K #s(literal 2 binary64)))

Results

Accuracy	Segments	Branch
80.0%	2	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`

Compiler

Compiled 4 to 7 computations (-75% saved)

regimes14.0ms (0.1%)

Memory

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

Counts

9 → 1

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (fma.f64 #s(literal 2 binary64) l (/.f64 U J)) J))))

Outputs

#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))

Calls

5 calls:

3.0ms	l
3.0ms	(cos.f64 (/.f64 K #s(literal 2 binary64)))
3.0ms	(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
2.0ms	(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))
2.0ms	(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))

Results

Accuracy	Segments	Branch
75.6%	1	`(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))`
75.6%	1	`(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)`
75.6%	1	`(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))`
75.6%	1	`l`
75.6%	1	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`

Compiler

Compiled 39 to 46 computations (-17.9% saved)

regimes56.0ms (0.6%)

Memory

-12.0MiB live, 33.8MiB allocated; 3ms collecting garbage

Counts

7 → 3

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))

Outputs

#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))

#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))

#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (*.f64 (*.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))

Calls

10 calls:

35.0ms	l
3.0ms	(/.f64 K #s(literal 2 binary64))
2.0ms	U
2.0ms	J
2.0ms	K

Results

Accuracy	Segments	Branch
56.5%	1	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`
60.7%	3	`(/.f64 K #s(literal 2 binary64))`
75.6%	3	`(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))`
75.5%	3	`(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))`
60.0%	3	`J`
75.6%	3	`l`
60.7%	3	`K`
56.5%	1	`U`
75.5%	3	`(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))`
75.5%	3	`(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)`

Compiler

Compiled 53 to 73 computations (-37.7% saved)

regimes17.0ms (0.2%)

Memory

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

Counts

6 → 1

Calls

Call 1

Inputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 l J) #s(literal 2 binary64) U)))
(+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) (.f64 (.f64 l J) #s(literal 2 binary64)))) U)

Outputs
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))

Calls

8 calls:

2.0ms	J
2.0ms	l
2.0ms	(/.f64 K #s(literal 2 binary64))
2.0ms	K
2.0ms	(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)

Results

Accuracy	Segments	Branch
56.5%	1	`J`
56.5%	1	`(/.f64 K #s(literal 2 binary64))`
56.5%	1	`K`
56.5%	1	`(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))`
56.5%	1	`(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))`
56.5%	1	`(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)`
56.5%	1	`(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))`
56.5%	1	`l`

Compiler

Compiled 48 to 62 computations (-29.2% saved)

regimes28.0ms (0.3%)

Memory

-24.5MiB live, 22.6MiB allocated; 2ms collecting garbage

Counts

3 → 3

Calls

Call 1

Inputs

#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)

#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))

#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))

Outputs

#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))

#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)

#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (*.f64 (*.f64 l J) #s(literal 2 binary64)))))

Calls

10 calls:

15.0ms	(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
2.0ms	U
2.0ms	l
1.0ms	(/.f64 K #s(literal 2 binary64))
1.0ms	J

Results

Accuracy	Segments	Branch
48.2%	3	`l`
37.6%	1	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`
48.1%	3	`(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))`
42.7%	3	`U`
48.4%	3	`(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))`
48.4%	3	`(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))`
47.9%	3	`(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)`
47.9%	3	`J`
37.6%	1	`(/.f64 K #s(literal 2 binary64))`
37.6%	1	`K`

Compiler

Compiled 53 to 73 computations (-37.7% saved)

regimes10.0ms (0.1%)

Memory

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

Accuracy

Total -2.8b remaining (-7.1%)

Threshold costs -2.8b (-7.1%)

Counts

2 → 1

Calls

Call 1

Inputs

#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)

#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 l #s(literal 2 binary64) U)))

Outputs
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)

Calls

8 calls:

1.0ms	U
1.0ms	l
1.0ms	J
1.0ms	(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
1.0ms	(cos.f64 (/.f64 K #s(literal 2 binary64)))

Results

Accuracy	Segments	Branch
37.6%	1	`(cos.f64 (/.f64 K #s(literal 2 binary64)))`
37.6%	1	`U`
37.6%	1	`J`
37.6%	1	`(+.f64 (.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)`
37.6%	1	`(-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))`
37.6%	1	`l`
37.6%	1	`(.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) (cos.f64 (/.f64 K #s(literal 2 binary64))))`
37.6%	1	`(*.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l))))`

Compiler

Compiled 49 to 63 computations (-28.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.8402415393290373	0.8453034751145841

Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.8402415393290373	0.8453034751145841

Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.467868226971353	0.49233479273838887

Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.467868226971353	0.49233479273838887

Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch95.0ms (1%)

Memory

-30.3MiB live, 111.4MiB allocated; 13ms collecting garbage

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
22.0ms	2.453295193806138e+67	3.8146901951607246e+78
32.0ms	1.8148048956989428e-21	0.0035795155854807677
29.0ms	-835136.5119996851	-7.177678664654656e-6

Samples

58.0ms	467×	0	valid
3.0ms	13×	1	valid

Compiler

Compiled 1 918 to 1 601 computations (16.5% saved)

Precisions

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

ival-exp: 18.0ms (38.7% of total)

ival-cos: 10.0ms (21.5% of total)

ival-mult: 7.0ms (15.1% of total)

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

ival-sub: 2.0ms (4.3% of total)

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

ival-neg: 2.0ms (4.3% of total)

adjust: 1.0ms (2.2% 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

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	-0.03746691591288101	-0.02540563635070794
0.0ms	-0.8482268184145607	-0.8222989987436493

Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.03746691591288101	-0.02540563635070794

Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.03746691591288101	-0.02540563635070794

Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.03746691591288101	-0.02540563635070794

Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.03746691591288101	-0.02540563635070794

Compiler

Compiled 18 to 21 computations (-16.7% saved)

bsearch39.0ms (0.4%)

Memory

6.2MiB live, 52.8MiB allocated; 3ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
16.0ms	0.0035795155854807677	0.026755127630456316
20.0ms	-6531097932389.699	-835136.5119996851

Samples

23.0ms

240×

valid

Compiler

Compiled 1 443 to 1 026 computations (28.9% saved)

Precisions

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

ival-exp: 4.0ms (24.6% of total)

ival-cos: 4.0ms (24.6% of total)

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

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

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

ival-sub: 1.0ms (6.1% of total)

ival-neg: 1.0ms (6.1% 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.8MiB live, 0.8MiB allocated; 0ms collecting garbage

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	6.53211724350308e+78	6.22011041338055e+108
0.0ms	-3.7063229359334637e+21	-0.0

Compiler

Compiled 18 to 21 computations (-16.7% saved)

simplify62.0ms (0.7%)

Memory

10.9MiB live, 57.7MiB allocated; 3ms collecting garbage

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	201	1122
1	314	1122
2	697	1118
3	2731	1086
4	7935	1086

Stop Event

1×	node limit

Calls

Call 1

Inputs
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/5040 binary64) (.f64 l l) #s(literal 1/120 binary64)) (.f64 l l) #s(literal 1/6 binary64)) (.f64 l l) #s(literal 1 binary64)) l))) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 3805541685128069/4503599627370496 binary64)) (+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 3805541685128069/4503599627370496 binary64)) (fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 l l) #s(literal 1/6 binary64)) (.f64 l l) #s(literal 1 binary64)) l))) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U) (fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 1080863910568919/2251799813685248 binary64)) (+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 1080863910568919/2251799813685248 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U)) (fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U))
(if (<=.f64 l #s(literal -780 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))) (if (<=.f64 l #s(literal 6456360425798343/18446744073709551616 binary64)) (+.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U) (if (<=.f64 l #s(literal 3799999999999999908862919648930418147743017021674002466695806667752138491297792 binary64)) (fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -7566047373982433/9007199254740992 binary64)) (fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U) (if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1080863910568919/36028797018963968 binary64)) (fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U) (fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1080863910568919/36028797018963968 binary64)) (fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U) (fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1080863910568919/36028797018963968 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U)) (fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1080863910568919/36028797018963968 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U)) #s(approx (+ ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1080863910568919/36028797018963968 binary64)) (+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64))))) U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
(if (<=.f64 l #s(literal -205000000000 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))) (if (<=.f64 l #s(literal 7638104968020361/288230376151711744 binary64)) #s(approx (+ ( (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J U))) #s(approx (+ ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
(if (<=.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #s(literal -2000000000000000000000 binary64)) #s(approx (+ ( (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64))))) (if (<=.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #s(literal 9999999999999999673560075006595519222746403606649979913266024618633003221909504 binary64)) #s(approx (+ ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U) #s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)

Outputs
(fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
(+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/2520 binary64) (.f64 l l) #s(literal 1/60 binary64)) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U)
(fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/5040 binary64) (.f64 l l) #s(literal 1/120 binary64)) (.f64 l l) #s(literal 1/6 binary64)) (.f64 l l) #s(literal 1 binary64)) l))) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U)
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 3805541685128069/4503599627370496 binary64)) (+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (fma.f64 #s(literal 1/60 binary64) (.f64 l l) #s(literal 1/3 binary64)) (.f64 l l) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 3805541685128069/4503599627370496 binary64)) (fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 l l) #s(literal 1/6 binary64)) (.f64 l l) #s(literal 1 binary64)) l))) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U) (fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 1080863910568919/2251799813685248 binary64)) (+.f64 (.f64 (.f64 J #s(approx (- (exp l) (exp (neg l))) (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l))) (cos.f64 (/.f64 K #s(literal 2 binary64)))) U) (fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal 1080863910568919/2251799813685248 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 (cos.f64 (.f64 #s(literal -1/2 binary64) K)) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U)) (fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U))
(if (<=.f64 l #s(literal -780 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (.f64 #s(literal 1/2 binary64) K))))) (if (<=.f64 l #s(literal 6456360425798343/18446744073709551616 binary64)) (+.f64 #s(approx ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) (.f64 (.f64 (.f64 #s(literal 2 binary64) J) l) (cos.f64 (.f64 #s(literal -1/2 binary64) K)))) U) (if (<=.f64 l #s(literal 3799999999999999908862919648930418147743017021674002466695806667752138491297792 binary64)) (fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (.f64 (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J) (cos.f64 (*.f64 #s(literal 1/2 binary64) K))))))))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -7566047373982433/9007199254740992 binary64)) (fma.f64 (.f64 (.f64 J #s(literal 2 binary64)) (sinh.f64 l)) #s(approx (cos (/ K -2)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) U) (if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1080863910568919/36028797018963968 binary64)) (fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U) (fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U)))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1080863910568919/36028797018963968 binary64)) (fma.f64 (.f64 (+.f64 J J) #s(approx (sinh l) l)) #s(approx (cos (/ K -2)) (cos.f64 (.f64 #s(literal -1/2 binary64) K))) U) (fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos ( -1/2 K)) #s(literal 1 binary64))) U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1080863910568919/36028797018963968 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U)) (fma.f64 (.f64 (+.f64 J J) (sinh.f64 l)) #s(approx (cos (/ K -2)) #s(approx (cos (* -1/2 K)) #s(literal 1 binary64))) U))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1080863910568919/36028797018963968 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) (fma.f64 (.f64 #s(approx (cos ( -1/2 K)) (fma.f64 (.f64 K K) #s(literal -1/8 binary64) #s(literal 1 binary64))) (.f64 J (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)))) l U)) #s(approx (+ ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
(if (<=.f64 (cos.f64 (/.f64 K #s(literal 2 binary64))) #s(literal -1080863910568919/36028797018963968 binary64)) (+.f64 #s(approx (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) #s(approx (* (* (* 2 J) l) (cos (* -1/2 K))) #s(approx (+ (* (* (* (* K K) l) J) -1/4) (* (* l J) 2)) (.f64 (.f64 (.f64 (.f64 K K) l) J) #s(literal -1/4 binary64))))) U) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U))))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) (fma.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J U)))
(if (<=.f64 l #s(literal -205000000000 binary64)) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))) (if (<=.f64 l #s(literal 7638104968020361/288230376151711744 binary64)) #s(approx (+ ( (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (.f64 #s(literal 2 binary64) l) J U))) #s(approx (+ ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (*.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J))))))
(if (or (<=.f64 l #s(literal -205000000000 binary64)) (not (<=.f64 l #s(literal 7638104968020361/288230376151711744 binary64)))) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) #s(approx (+ (* (* (cos (* -1/2 K)) (* J (+ (* (* l l) 1/3) 2))) l) U) #s(approx (* (* (* (+ (* (* l l) 1/3) 2) l) J) (cos (* 1/2 K))) (.f64 (.f64 (fma.f64 (.f64 l l) #s(literal 1/3 binary64) #s(literal 2 binary64)) l) J)))) #s(approx (+ ( (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U))))
#s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) (fma.f64 (*.f64 #s(literal 2 binary64) l) J U)))
(if (<=.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #s(literal -2000000000000000000000 binary64)) #s(approx (+ ( (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64))))) (if (<=.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #s(literal 9999999999999999673560075006595519222746403606649979913266024618633003221909504 binary64)) #s(approx (+ ( (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U) #s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64)))))))
(if (or (<=.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #s(literal -2000000000000000000000 binary64)) (not (<=.f64 (.f64 J (-.f64 (exp.f64 l) (exp.f64 (neg.f64 l)))) #s(literal 9999999999999999673560075006595519222746403606649979913266024618633003221909504 binary64)))) #s(approx (+ (* (* (* J 2) (sinh l)) (cos (/ K -2))) U) #s(approx (+ (* (* (* l J) 2) (cos (* -1/2 K))) U) #s(approx (+ (* (* l J) 2) U) (.f64 (.f64 l J) #s(literal 2 binary64))))) #s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U))
#s(approx (+ (* (* J (- (exp l) (exp (neg l)))) (cos (/ K 2))) U) U)

derivations802.0ms (8.5%)

Memory

-6.4MiB live, 661.9MiB allocated; 139ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 1 122 to 208 computations (81.5% saved)

preprocess97.0ms (1%)

Memory: 22.6MiB live, 208.3MiB allocated; 19ms collecting garbage
Remove: (abs K)
Compiler: Compiled 2 308 to 474 computations (79.5% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze1.0ms (0%)

sample2.3s (24.1%)

explain310.0ms (3.3%)

preprocess218.0ms (2.3%)

eval0.0ms (0%)

prune0.0ms (0%)

simplify155.0ms (1.6%)

localize83.0ms (0.9%)

series22.0ms (0.2%)

simplify253.0ms (2.7%)

rewrite65.0ms (0.7%)

eval24.0ms (0.3%)

prune8.0ms (0.1%)

simplify288.0ms (3%)

localize360.0ms (3.8%)

series101.0ms (1.1%)

simplify159.0ms (1.7%)

rewrite104.0ms (1.1%)

eval59.0ms (0.6%)

prune48.0ms (0.5%)

simplify172.0ms (1.8%)

localize229.0ms (2.4%)

series58.0ms (0.6%)

simplify835.0ms (8.8%)

rewrite101.0ms (1.1%)

eval90.0ms (1%)

prune22.0ms (0.2%)

simplify104.0ms (1.1%)

localize386.0ms (4.1%)

series106.0ms (1.1%)

simplify176.0ms (1.9%)

rewrite136.0ms (1.4%)

eval141.0ms (1.5%)

prune54.0ms (0.6%)

regimes183.0ms (1.9%)

regimes155.0ms (1.6%)

regimes129.0ms (1.4%)

regimes137.0ms (1.4%)

regimes13.0ms (0.1%)

regimes58.0ms (0.6%)

regimes12.0ms (0.1%)

regimes143.0ms (1.5%)

regimes80.0ms (0.8%)

regimes11.0ms (0.1%)

regimes42.0ms (0.4%)

regimes90.0ms (0.9%)

regimes32.0ms (0.3%)

regimes14.0ms (0.1%)

regimes56.0ms (0.6%)

regimes17.0ms (0.2%)

regimes28.0ms (0.3%)

regimes10.0ms (0.1%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch1.0ms (0%)

bsearch95.0ms (1%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch39.0ms (0.4%)

bsearch1.0ms (0%)

simplify62.0ms (0.7%)

derivations802.0ms (8.5%)

preprocess97.0ms (1%)

end0.0ms (0%)

Profiling