Metrics for VandenBroeck and Keller, Equation (20)

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze235.0ms (1.4%)

Memory

14.2MiB live, 248.5MiB allocated

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	100%	0%	0%	0%	0%	0
0%	0%	100%	0%	0%	0%	0%	1
0%	0%	100%	0%	0%	0%	0%	2
0%	0%	75%	0%	0%	25%	0%	3
0%	0%	62.5%	0%	0%	37.5%	0%	4
0%	0%	56.2%	0%	0%	43.7%	0%	5
0%	0%	53.1%	0%	0%	46.9%	0%	6
3.1%	1.6%	48.4%	0%	0%	50%	0%	7
4.8%	2.3%	46.1%	0%	0%	51.5%	0%	8
5.6%	2.7%	45.7%	0%	0%	51.5%	0%	9
6.5%	3.1%	45.1%	0%	0%	51.7%	0%	10
6.9%	3.3%	44.8%	0%	0%	51.8%	0%	11
6.9%	3.3%	44.8%	0%	0%	51.9%	0%	12

Compiler

Compiled 39 to 18 computations (53.8% saved)

sample5.8s (35.9%)

Memory

114.2MiB live, 5 805.2MiB allocated

Samples

2.3s	7 061×	1	invalid
2.1s	7 601×	1	valid
147.0ms	151×	2	valid
83.0ms	504×	0	valid
2.0ms	16×	0	invalid
0.0ms	3×	0	exit

Precisions

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

ival-exp: 1.2s (28.9% of total)

ival-div: 595.0ms (14.8% of total)

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

ival-pi: 426.0ms (10.6% of total)

adjust: 344.0ms (8.5% of total)

ival-neg: 317.0ms (7.9% of total)

ival-log: 308.0ms (7.6% of total)

ival-sub: 151.0ms (3.7% of total)

ival-add: 151.0ms (3.7% of total)

exact: 16.0ms (0.4% of total)

ival-true: 12.0ms (0.3% of total)

ival-assert: 6.0ms (0.1% of total)

Bogosity

explain674.0ms (4.1%)

Memory

-27.6MiB live, 504.9MiB allocated

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
249	0	-	1	(0.019392133680119782)	`(-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))`
3	0	-	0	-	`(/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))`
1	3	(1647270.1964293139)	1	(2.8547223803454846)	`(log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))`
0	0	-	0	-	`(exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))`
0	0	-	0	-	`(exp.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))`
0	0	-	0	-	`#s(literal 1 binary64)`
0	0	-	0	-	`(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))`
0	0	-	0	-	`(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64)))`
0	0	-	0	-	`#s(literal 4 binary64)`
0	0	-	0	-	`(+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))`
0	0	-	0	-	`(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))`
0	0	-	0	-	`f`
0	0	-	0	-	`(/.f64 (PI.f64) #s(literal 4 binary64))`
0	0	-	0	-	`(*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)`
0	0	-	0	-	`(neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))`
0	0	-	0	-	`(PI.f64)`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`-.f64`	`(-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))`	cancellation	248	1
`/.f64`	`(/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))`	o/o	3	0
↳	`(exp.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))`	overflow	3
↳	`(+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))`	overflow	3
↳	`(exp.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))`	overflow	3
↳	`(-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))`	overflow	3
`log.f64`	`(log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))`	sensitivity	3	1

Confusion

	Predicted +	Predicted -
+	251	1
-	0	4

Precision

1.0

Recall

0.996031746031746

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	251	1	0
-	0	1	3

Precision?

0.9960474308300395

Recall?

1.0

Freqs

test

number	freq
0	5
1	248
2	3

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

442.0ms	476×	1	valid
6.0ms	6×	2	valid
4.0ms	30×	0	valid

Compiler

Compiled 433 to 52 computations (88% saved)

Precisions

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

ival-exp: 210.0ms (57.7% of total)

ival-add: 49.0ms (13.5% of total)

ival-log: 41.0ms (11.3% of total)

ival-div: 20.0ms (5.5% of total)

ival-neg: 13.0ms (3.6% of total)

adjust: 11.0ms (3% of total)

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

ival-pi: 4.0ms (1.1% of total)

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

exact: 1.0ms (0.3% of total)

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

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

preprocess490.0ms (3%)

Memory

-0.7MiB live, 157.1MiB allocated

Algorithm

1×	egg-herbie

Rules

8 988×	`lower-fma.f64`
8 988×	`lower-fma.f32`
2 264×	`lower-+.f32`
2 262×	`lower-+.f64`
2 004×	`lower--.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	18	81
1	53	64
2	163	64
3	458	64
4	878	64
5	1200	64
6	1440	64
7	1537	64
8	1770	64
9	1897	64
10	2161	52
11	2481	50
12	2715	50
13	3126	50
14	3765	50
15	4525	50
16	5273	50
17	6484	50
18	6758	50
19	6770	50
20	7470	50
0	16	37
0	29	37
1	58	32
2	133	32
3	278	32
4	408	32
5	513	32
6	607	32
7	742	32
8	850	32
9	1064	32
10	1288	32
11	1420	32
12	1559	32
13	1665	32
14	1873	32
15	2285	32
16	3142	32
17	4668	25
18	5411	25
19	7617	25
0	8447	22

Stop Event

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

Calls

Call 1

Inputs

(neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))

Outputs

(neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))

(*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 (-.f64 (/.f64 #s(literal -1 binary64) (expm1.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 f (PI.f64))))) (/.f64 #s(literal -1 binary64) (expm1.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 f (PI.f64))))))))

Compiler

Compiled 37 to 16 computations (56.8% saved)

eval0.0ms (0%)

Memory: 0.5MiB live, 0.5MiB allocated
Compiler: Compiled 0 to 1 computations (-∞% saved)

prune1.0ms (0%)

Memory

0.8MiB live, 0.8MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	7.4%	(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))

Status

Accuracy

Program

▶

7.4%

(neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))

Compiler

Compiled 37 to 16 computations (56.8% saved)

simplify220.0ms (1.4%)

Memory

9.8MiB live, 82.2MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

New	Metric	Score
cost-diff	128	(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))
cost-diff	320	(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64)))
cost-diff	384	(/.f64 (PI.f64) #s(literal 4 binary64))
cost-diff	38144	(/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))

Rules

8 988×	`lower-fma.f64`
8 988×	`lower-fma.f32`
2 264×	`lower-+.f32`
2 262×	`lower-+.f64`
2 004×	`lower--.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	16	196
0	29	196
1	58	177
2	133	177
3	278	177
4	408	177
5	513	177
6	607	177
7	742	177
8	850	177
9	1064	177
10	1288	177
11	1420	177
12	1559	177
13	1665	177
14	1873	177
15	2285	177
16	3142	177
17	4668	149
18	5411	149
19	7617	149
0	8447	137

Stop Event

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

Calls

Call 1

Inputs
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64)))
#s(literal 1 binary64)
(/.f64 (PI.f64) #s(literal 4 binary64))
(PI.f64)
#s(literal 4 binary64)
(log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))
(/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))
(+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))
(exp.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))
(*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)
f
(exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))
(neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))
(-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))

Outputs
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))
(.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 (-.f64 (/.f64 #s(literal -1 binary64) (expm1.f64 (.f64 #s(literal -1/2 binary64) (.f64 f (PI.f64))))) (/.f64 #s(literal -1 binary64) (expm1.f64 (.f64 #s(literal 1/2 binary64) (*.f64 f (PI.f64))))))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))
(.f64 (log.f64 (-.f64 (/.f64 #s(literal -1 binary64) (expm1.f64 (.f64 #s(literal -1/2 binary64) (.f64 f (PI.f64))))) (/.f64 #s(literal -1 binary64) (expm1.f64 (.f64 #s(literal 1/2 binary64) (*.f64 f (PI.f64))))))) (/.f64 #s(literal 4 binary64) (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64)))
(/.f64 #s(literal 4 binary64) (PI.f64))
#s(literal 1 binary64)
(/.f64 (PI.f64) #s(literal 4 binary64))
(*.f64 #s(literal 1/4 binary64) (PI.f64))
(PI.f64)
#s(literal 4 binary64)
(log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))
(log.f64 (-.f64 (/.f64 #s(literal -1 binary64) (expm1.f64 (.f64 #s(literal -1/2 binary64) (.f64 f (PI.f64))))) (/.f64 #s(literal -1 binary64) (expm1.f64 (.f64 #s(literal 1/2 binary64) (.f64 f (PI.f64)))))))
(/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))
(-.f64 (/.f64 #s(literal -1 binary64) (expm1.f64 (.f64 #s(literal -1/2 binary64) (.f64 f (PI.f64))))) (/.f64 #s(literal -1 binary64) (expm1.f64 (.f64 #s(literal 1/2 binary64) (.f64 f (PI.f64))))))
(+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))
(+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 f (PI.f64))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (.f64 f (PI.f64))))
(exp.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 f (PI.f64)))
(*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)
(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
f
(exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))
(pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 f (PI.f64)))
(neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))
(.f64 #s(literal -1/4 binary64) (.f64 f (PI.f64)))
(-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))
(-.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (.f64 f (PI.f64))) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 f (PI.f64))))

localize125.0ms (0.8%)

Memory

6.6MiB live, 91.2MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.265625	(*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)
accuracy	0.40462875976844204	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))
accuracy	1.0117270031524757	(/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))
accuracy	57.239016724689996	(-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))

Samples

105.0ms	238×	1	valid
3.0ms	3×	2	valid
2.0ms	15×	0	valid

Compiler

Compiled 198 to 18 computations (90.9% saved)

Precisions

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

ival-div: 48.0ms (50.7% of total)

ival-exp: 19.0ms (20.1% of total)

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

ival-log: 6.0ms (6.3% of total)

adjust: 5.0ms (5.3% of total)

ival-neg: 4.0ms (4.2% of total)

ival-pi: 2.0ms (2.1% of total)

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

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

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

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

exact: 0.0ms (0% of total)

series113.0ms (0.7%)

Memory

19.4MiB live, 130.2MiB allocated

Counts

7 → 60

Calls

Call 1

Inputs
#s(alt (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) (patch (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) #<representation binary64>) () ())
#s(alt (/.f64 (PI.f64) #s(literal 4 binary64)) (patch (/.f64 (PI.f64) #s(literal 4 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) #<representation binary64>) () ())
#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) #<representation binary64>) () ())
#s(alt (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (patch (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) (patch (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) #<representation binary64>) () ())

Outputs
#s(alt (/ 2 (* f (- (* 1/4 (PI)) (* -1/4 (PI))))) (taylor 0 f) (#s(alt (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) (patch (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f) (taylor 0 f) (#s(alt (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) (patch (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f) (taylor 0 f) (#s(alt (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) (patch (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f) (taylor 0 f) (#s(alt (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) (patch (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* -2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* -2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* f (- (* -2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) #<representation binary64>) () ())) ())
#s(alt (* f (- (* 1/4 (PI)) (* -1/4 (PI)))) (taylor 0 f) (#s(alt (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (patch (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* f (- (+ (* 1/4 (PI)) (* (pow f 2) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))))) (* -1/4 (PI)))) (taylor 0 f) (#s(alt (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (patch (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* f (- (+ (* 1/4 (PI)) (* (pow f 2) (- (+ (* 1/384 (pow (PI) 3)) (* (pow f 2) (- (* 1/122880 (pow (PI) 5)) (* -1/122880 (pow (PI) 5))))) (* -1/384 (pow (PI) 3))))) (* -1/4 (PI)))) (taylor 0 f) (#s(alt (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (patch (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* f (- (+ (* 1/4 (PI)) (* (pow f 2) (- (+ (* 1/384 (pow (PI) 3)) (* (pow f 2) (- (+ (* 1/122880 (pow (PI) 5)) (* (pow f 2) (- (* 1/82575360 (pow (PI) 7)) (* -1/82575360 (pow (PI) 7))))) (* -1/122880 (pow (PI) 5))))) (* -1/384 (pow (PI) 3))))) (* -1/4 (PI)))) (taylor 0 f) (#s(alt (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (patch (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (taylor 0 f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI)))))) (taylor 0 f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))) (* f (+ (* 2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI)))))))) (taylor 0 f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) (patch (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) (patch (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) (patch (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) (patch (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) (patch (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) (patch (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) (patch (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) (patch (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) #<representation binary64>) () ())) ())
#s(alt (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))) (taylor inf f) (#s(alt (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (patch (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) #<representation binary64>) () ())) ())
#s(alt (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))) (taylor inf f) (#s(alt (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (patch (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) #<representation binary64>) () ())) ())
#s(alt (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))) (taylor inf f) (#s(alt (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (patch (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) #<representation binary64>) () ())) ())
#s(alt (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))) (taylor inf f) (#s(alt (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (patch (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) (patch (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) (patch (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) (patch (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) (patch (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) (patch (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) (patch (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) (patch (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) (patch (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))) #<representation binary64>) () ())) ())
#s(alt (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))) (taylor -inf f) (#s(alt (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (patch (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) #<representation binary64>) () ())) ())
#s(alt (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))) (taylor -inf f) (#s(alt (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (patch (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) #<representation binary64>) () ())) ())
#s(alt (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))) (taylor -inf f) (#s(alt (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (patch (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) #<representation binary64>) () ())) ())
#s(alt (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))) (taylor -inf f) (#s(alt (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (patch (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) (patch (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) (patch (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) (patch (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) (patch (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f) #<representation binary64>) () ())) ())

Calls

3 calls:

Time	Variable		Point	Expression
62.0ms	f	@	inf	((/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/ (PI) 4) (/ 1 (/ (PI) 4)) (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))))) (* (/ (PI) 4) f))
40.0ms	f	@	-inf	((/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/ (PI) 4) (/ 1 (/ (PI) 4)) (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))))) (* (/ (PI) 4) f))
6.0ms	f	@	0	((/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/ (PI) 4) (/ 1 (/ (PI) 4)) (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))))) (* (/ (PI) 4) f))

Time

Variable

Point

Expression

62.0ms

inf

((/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/ (PI) 4) (/ 1 (/ (PI) 4)) (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))))) (* (/ (PI) 4) f))

40.0ms

-inf

((/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/ (PI) 4) (/ 1 (/ (PI) 4)) (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))))) (* (/ (PI) 4) f))

6.0ms

((/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/ (PI) 4) (/ 1 (/ (PI) 4)) (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))))) (* (/ (PI) 4) f))

simplify181.0ms (1.1%)

Memory

-16.2MiB live, 255.5MiB allocated

Algorithm

1×	egg-herbie

Rules

18 550×	`lower-fma.f64`
18 550×	`lower-fma.f32`
3 724×	`lower-*.f64`
3 724×	`lower-*.f32`
2 180×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	171	1490
1	484	1364
2	1754	1236
3	7067	1196
0	9194	1178

Stop Event

1×	iter limit
1×	node limit

Counts

60 → 60

Calls

Call 1

Inputs
(/ 2 (* f (- (* 1/4 (PI)) (* -1/4 (PI)))))
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(* -4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))
(- (* -2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(- (* f (- (* -2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(- (* f (- (* f (- (* -2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(* f (- (* 1/4 (PI)) (* -1/4 (PI))))
(* f (- (+ (* 1/4 (PI)) (* (pow f 2) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))))) (* -1/4 (PI))))
(* f (- (+ (* 1/4 (PI)) (* (pow f 2) (- (+ (* 1/384 (pow (PI) 3)) (* (pow f 2) (- (* 1/122880 (pow (PI) 5)) (* -1/122880 (pow (PI) 5))))) (* -1/384 (pow (PI) 3))))) (* -1/4 (PI))))
(* f (- (+ (* 1/4 (PI)) (* (pow f 2) (- (+ (* 1/384 (pow (PI) 3)) (* (pow f 2) (- (+ (* 1/122880 (pow (PI) 5)) (* (pow f 2) (- (* 1/82575360 (pow (PI) 7)) (* -1/82575360 (pow (PI) 7))))) (* -1/122880 (pow (PI) 5))))) (* -1/384 (pow (PI) 3))))) (* -1/4 (PI))))
(* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))
(+ (* 2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))))
(+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))) (* f (+ (* 2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))))))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))
(- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))
(- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))
(- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))
(- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))
(- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))
(- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))

Outputs
(/ 2 (* f (- (* 1/4 (PI)) (* -1/4 (PI)))))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(/.f64 (fma.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (*.f64 #s(literal 1/8 binary64) (PI.f64))) f) f (/.f64 #s(literal 4 binary64) (PI.f64))) f)
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(/.f64 (fma.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (*.f64 #s(literal 1/8 binary64) (PI.f64))) f) f (/.f64 #s(literal 4 binary64) (PI.f64))) f)
(* -4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))
(*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))
(- (* -2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))
(- (* f (- (* -2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))
(- (* f (- (* f (- (* -2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))
(* f (- (* 1/4 (PI)) (* -1/4 (PI))))
(.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) f)
(* f (- (+ (* 1/4 (PI)) (* (pow f 2) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))))) (* -1/4 (PI))))
(.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 f f)) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 #s(literal 1/2 binary64) (PI.f64))) f)
(* f (- (+ (* 1/4 (PI)) (* (pow f 2) (- (+ (* 1/384 (pow (PI) 3)) (* (pow f 2) (- (* 1/122880 (pow (PI) 5)) (* -1/122880 (pow (PI) 5))))) (* -1/384 (pow (PI) 3))))) (* -1/4 (PI))))
(.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 (fma.f64 (.f64 #s(literal 1/61440 binary64) (.f64 f f)) (pow.f64 (PI.f64) #s(literal 5 binary64)) (.f64 #s(literal 1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)))) (.f64 f f))) f)
(* f (- (+ (* 1/4 (PI)) (* (pow f 2) (- (+ (* 1/384 (pow (PI) 3)) (* (pow f 2) (- (+ (* 1/122880 (pow (PI) 5)) (* (pow f 2) (- (* 1/82575360 (pow (PI) 7)) (* -1/82575360 (pow (PI) 7))))) (* -1/122880 (pow (PI) 5))))) (* -1/384 (pow (PI) 3))))) (* -1/4 (PI))))
(.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 (fma.f64 #s(literal 1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (fma.f64 (.f64 #s(literal 1/41287680 binary64) (.f64 f f)) (pow.f64 (PI.f64) #s(literal 7 binary64)) (.f64 #s(literal 1/61440 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (.f64 f f))) (.f64 f f))) f)
(* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))
(*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal 4 binary64) (PI.f64)))
(+ (* 2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal 4 binary64) (PI.f64)))
(+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))))
(fma.f64 (.f64 (.f64 (/.f64 f (PI.f64)) (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64))) f) #s(literal 2 binary64) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal 4 binary64) (PI.f64))))
(+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))) (* f (+ (* 2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))))))
(fma.f64 (.f64 (.f64 (/.f64 f (PI.f64)) (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64))) f) #s(literal 2 binary64) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal 4 binary64) (PI.f64))))
(* 1/4 (* f (PI)))
(.f64 (.f64 #s(literal 1/4 binary64) f) (PI.f64))
(* 1/4 (* f (PI)))
(.f64 (.f64 #s(literal 1/4 binary64) f) (PI.f64))
(* 1/4 (* f (PI)))
(.f64 (.f64 #s(literal 1/4 binary64) f) (PI.f64))
(* 1/4 (* f (PI)))
(.f64 (.f64 #s(literal 1/4 binary64) f) (PI.f64))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f))))) (/.f64 #s(literal -4 binary64) (PI.f64)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f))))) (/.f64 #s(literal -4 binary64) (PI.f64)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f))))) (/.f64 #s(literal -4 binary64) (PI.f64)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f))))) (/.f64 #s(literal -4 binary64) (PI.f64)))
(- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))
(-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f)))
(- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))
(-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f)))
(- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))
(-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f)))
(- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))
(-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f))))) (/.f64 #s(literal 4 binary64) (PI.f64)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f))))) (/.f64 #s(literal 4 binary64) (PI.f64)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f))))) (/.f64 #s(literal 4 binary64) (PI.f64)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f))))) (/.f64 #s(literal 4 binary64) (PI.f64)))
(* 1/4 (* f (PI)))
(.f64 (.f64 #s(literal 1/4 binary64) f) (PI.f64))
(* 1/4 (* f (PI)))
(.f64 (.f64 #s(literal 1/4 binary64) f) (PI.f64))
(* 1/4 (* f (PI)))
(.f64 (.f64 #s(literal 1/4 binary64) f) (PI.f64))
(* 1/4 (* f (PI)))
(.f64 (.f64 #s(literal 1/4 binary64) f) (PI.f64))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f))))) (/.f64 #s(literal -4 binary64) (PI.f64)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f))))) (/.f64 #s(literal -4 binary64) (PI.f64)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f))))) (/.f64 #s(literal -4 binary64) (PI.f64)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f))))) (/.f64 #s(literal -4 binary64) (PI.f64)))
(- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))
(-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f)))
(- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))
(-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f)))
(- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))
(-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f)))
(- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))
(-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f))))) (/.f64 #s(literal 4 binary64) (PI.f64)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f))))) (/.f64 #s(literal 4 binary64) (PI.f64)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f))))) (/.f64 #s(literal 4 binary64) (PI.f64)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal -1/4 binary64) f))) (-.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/4 binary64)) f) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal -1/4 binary64) f))))) (/.f64 #s(literal 4 binary64) (PI.f64)))
(* 1/4 (* f (PI)))
(.f64 (.f64 #s(literal 1/4 binary64) f) (PI.f64))
(* 1/4 (* f (PI)))
(.f64 (.f64 #s(literal 1/4 binary64) f) (PI.f64))
(* 1/4 (* f (PI)))
(.f64 (.f64 #s(literal 1/4 binary64) f) (PI.f64))
(* 1/4 (* f (PI)))
(.f64 (.f64 #s(literal 1/4 binary64) f) (PI.f64))

rewrite155.0ms (1%)

Memory

4.7MiB live, 283.1MiB allocated

Rules

5 070×	`lower-*.f32`
5 066×	`lower-*.f64`
3 230×	`lower-fma.f64`
3 230×	`lower-fma.f32`
3 206×	`lower-/.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	16	129
0	29	87
1	119	49
2	783	49
0	8561	49

Stop Event

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

Counts

7 → 556

Calls

Call 1

Inputs
(/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))
(/.f64 (PI.f64) #s(literal 4 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64)))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))
(-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))
(*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)

Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval291.0ms (1.8%)

Memory: -12.2MiB live, 474.2MiB allocated
Compiler: Compiled 39 736 to 4 678 computations (88.2% saved)

prune29.0ms (0.2%)

Memory

23.1MiB live, 100.2MiB allocated

Pruning

12 alts after pruning (12 fresh and 0 done)

	Pruned	Kept	Total
New	960	12	972
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	961	12	973

Accuracy

100.0%

Counts

973 → 12

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.5%	(/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
	99.4%	(/.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/4 binary64) (PI.f64)) (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))))
	98.1%	(-.f64 (/.f64 (log.f64 (.f64 (cosh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (PI.f64))) (/.f64 (log.f64 (.f64 (sinh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (PI.f64))))
	99.4%	(.f64 (pow.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) #s(literal 1/2 binary64)) (.f64 (pow.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) #s(literal 1/2 binary64)) (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))
	97.8%	(.f64 (neg.f64 (pow.f64 (.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (/.f64 #s(literal -4 binary64) (PI.f64))) #s(literal 2 binary64))) (/.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))))
	97.8%	(neg.f64 (/.f64 (.f64 (-.f64 (pow.f64 (log.f64 (.f64 (cosh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (log.f64 (.f64 (sinh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #s(literal 2 binary64))) #s(literal 3 binary64))) #s(literal 4 binary64)) (.f64 (+.f64 (pow.f64 (log.f64 (.f64 (cosh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (log.f64 (.f64 (sinh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #s(literal 2 binary64))) (+.f64 (log.f64 (.f64 (sinh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #s(literal 2 binary64))) (log.f64 (.f64 (cosh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (PI.f64))))
	99.3%	(neg.f64 (/.f64 (.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (sqrt.f64 (PI.f64))))
▶	99.2%	(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
	97.2%	(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (fma.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (*.f64 #s(literal 1/8 binary64) (PI.f64))) f) f (/.f64 #s(literal 4 binary64) (PI.f64))) f)))))
▶	96.4%	(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
▶	97.2%	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))))
▶	96.5%	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))

Compiler

Compiled 568 to 370 computations (34.9% saved)

simplify137.0ms (0.8%)

Memory

8.7MiB live, 208.8MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	320	(.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (*.f64 #s(literal 1/8 binary64) (PI.f64))))
cost-diff	320	(.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64)))
cost-diff	704	(fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))
cost-diff	1024	(/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))
cost-diff	0	(neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
cost-diff	0	(/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64)))
cost-diff	128	(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
cost-diff	2112	(.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
cost-diff	0	(log.f64 (/.f64 #s(literal 4 binary64) (PI.f64)))
cost-diff	0	(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))
cost-diff	0	(*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))
cost-diff	0	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))
cost-diff	0	(/.f64 (PI.f64) #s(literal 4 binary64))
cost-diff	0	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))
cost-diff	128	(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
cost-diff	704	(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64)))
cost-diff	0	(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
cost-diff	0	(tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
cost-diff	0	(log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
cost-diff	0	(/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))

Rules

5 394×	`lower-fma.f32`
5 390×	`lower-fma.f64`
3 502×	`lower-*.f32`
3 480×	`lower-*.f64`
2 978×	`lower-/.f32`

Iterations

Useful iterations: 4 (0.0ms)

Iter	Nodes	Cost
0	58	586
0	94	590
1	204	532
2	553	494
3	1504	484
4	3564	481
5	6291	481
0	8019	481

Stop Event

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

Calls

Call 1

Inputs
(/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
(log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
(tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
f
(*.f64 #s(literal 1/4 binary64) (PI.f64))
#s(literal 1/4 binary64)
(PI.f64)
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64)))
#s(literal 1 binary64)
(/.f64 (PI.f64) #s(literal 4 binary64))
(PI.f64)
#s(literal 4 binary64)
(log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))
#s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(/.f64 #s(literal 4 binary64) (PI.f64))
f
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))
(*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))
(log.f64 (/.f64 #s(literal 4 binary64) (PI.f64)))
(/.f64 #s(literal 4 binary64) (PI.f64))
#s(literal 4 binary64)
(PI.f64)
(log.f64 f)
f
(/.f64 #s(literal -4 binary64) (PI.f64))
#s(literal -4 binary64)
(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64)))
(neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
(tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
f
(*.f64 #s(literal 1/4 binary64) (PI.f64))
#s(literal 1/4 binary64)
(PI.f64)
(sqrt.f64 (PI.f64))
(/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))
#s(literal 4 binary64)
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))))
(fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))
(.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64)))
(*.f64 #s(literal -2 binary64) f)
#s(literal -2 binary64)
f
(/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))
(.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64))
(.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (*.f64 #s(literal 1/8 binary64) (PI.f64))))
#s(literal 1/2 binary64)
(fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))
(*.f64 (PI.f64) #s(literal 1/48 binary64))
(PI.f64)
#s(literal 1/48 binary64)
(*.f64 #s(literal 1/8 binary64) (PI.f64))
#s(literal 1/8 binary64)
(*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))
(log.f64 (/.f64 #s(literal 4 binary64) (PI.f64)))
(/.f64 #s(literal 4 binary64) (PI.f64))
#s(literal 4 binary64)
(log.f64 f)
(/.f64 #s(literal -4 binary64) (PI.f64))
#s(literal -4 binary64)

Outputs
(/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 (tanh.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f))))
(log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
(log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))
(tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
(tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))
(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
(.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)
f
(*.f64 #s(literal 1/4 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/4 binary64))
#s(literal 1/4 binary64)
(PI.f64)
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
(.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))
(.f64 (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (/.f64 #s(literal 4 binary64) (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64)))
(/.f64 #s(literal 4 binary64) (PI.f64))
#s(literal 1 binary64)
(/.f64 (PI.f64) #s(literal 4 binary64))
(PI.f64)
#s(literal 4 binary64)
(log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))
#s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(/.f64 #s(literal 4 binary64) (PI.f64))
f
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))))
(*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))
(*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))
(log.f64 (/.f64 #s(literal 4 binary64) (PI.f64)))
(/.f64 #s(literal 4 binary64) (PI.f64))
#s(literal 4 binary64)
(PI.f64)
(log.f64 f)
f
(/.f64 #s(literal -4 binary64) (PI.f64))
#s(literal -4 binary64)
(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 (tanh.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f))))
(.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 (tanh.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f))))
(/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64)))
(/.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (neg.f64 (sqrt.f64 (PI.f64))))
(neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(neg.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))
(log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
(log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))
(tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
(tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))
(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
(.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)
f
(*.f64 #s(literal 1/4 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/4 binary64))
#s(literal 1/4 binary64)
(PI.f64)
(sqrt.f64 (PI.f64))
(/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))
#s(literal 4 binary64)
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 f f) (.f64 #s(literal -1/12 binary64) (PI.f64)) (*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)))))
(fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))
(fma.f64 (.f64 f f) (.f64 #s(literal -1/12 binary64) (PI.f64)) (*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))))
(.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64)))
(.f64 (.f64 #s(literal -1/12 binary64) (PI.f64)) f)
(*.f64 #s(literal -2 binary64) f)
#s(literal -2 binary64)
f
(/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))
(*.f64 #s(literal 1/24 binary64) (PI.f64))
(.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64))
(.f64 (.f64 #s(literal 1/24 binary64) (PI.f64)) (PI.f64))
(.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (*.f64 #s(literal 1/8 binary64) (PI.f64))))
(*.f64 #s(literal 1/24 binary64) (PI.f64))
#s(literal 1/2 binary64)
(fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))
(*.f64 #s(literal 1/12 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/48 binary64))
(*.f64 #s(literal 1/48 binary64) (PI.f64))
(PI.f64)
#s(literal 1/48 binary64)
(*.f64 #s(literal 1/8 binary64) (PI.f64))
#s(literal 1/8 binary64)
(*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))
(*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))
(log.f64 (/.f64 #s(literal 4 binary64) (PI.f64)))
(/.f64 #s(literal 4 binary64) (PI.f64))
#s(literal 4 binary64)
(log.f64 f)
(/.f64 #s(literal -4 binary64) (PI.f64))
#s(literal -4 binary64)

localize279.0ms (1.7%)

Memory

-5.8MiB live, 510.1MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	1.0	(.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64))
accuracy	1.0	(*.f64 (PI.f64) #s(literal 1/48 binary64))
accuracy	1.441396062202373	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))))
accuracy	2.0	(log.f64 (/.f64 #s(literal 4 binary64) (PI.f64)))
accuracy	0.265625	(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
accuracy	0.3125	(.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
accuracy	0.3359375	(/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64)))
accuracy	1.0	(sqrt.f64 (PI.f64))
accuracy	0.203125	(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))
accuracy	0.41634750976844204	(*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))
accuracy	1.9049993952606534	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))
accuracy	2.0	(log.f64 (/.f64 #s(literal 4 binary64) (PI.f64)))
accuracy	0.02078878162065376	(log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))
accuracy	0.40234375	(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
accuracy	0.40462875976844204	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))
accuracy	1.879648119976748	#s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))
accuracy	0.01297628162065376	(log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
accuracy	0.01953125	(tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
accuracy	0.265625	(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
accuracy	0.328125	(/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))

Samples

214.0ms	238×	1	valid
6.0ms	3×	2	valid
6.0ms	15×	0	valid

Compiler

Compiled 527 to 53 computations (89.9% saved)

Precisions

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

ival-mult: 41.0ms (23.1% of total)

ival-div: 30.0ms (16.9% of total)

ival-log: 23.0ms (13% of total)

ival-exp: 21.0ms (11.8% of total)

adjust: 15.0ms (8.5% of total)

ival-tanh: 10.0ms (5.6% of total)

ival-add: 9.0ms (5.1% of total)

ival-neg: 7.0ms (3.9% of total)

const: 7.0ms (3.9% of total)

ival-sqrt: 5.0ms (2.8% of total)

ival-pi: 4.0ms (2.3% of total)

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

exact: 1.0ms (0.6% of total)

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

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

series280.0ms (1.7%)

Memory

-12.5MiB live, 279.1MiB allocated

Counts

27 → 216

Calls

Call 1

Inputs
#s(alt (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())
#s(alt (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())
#s(alt (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())
#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) #<representation binary64>) () ())
#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())
#s(alt (/.f64 (PI.f64) #s(literal 4 binary64)) (patch (/.f64 (PI.f64) #s(literal 4 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) #<representation binary64>) () ())
#s(alt (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) (patch (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) #<representation binary64>) () ())
#s(alt (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (patch (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) #<representation binary64>) () ())
#s(alt (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (patch (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())
#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())
#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())
#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())
#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64)) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64)) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64))) (patch (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) (patch (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (patch (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) #<representation binary64>) () ())
#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())
#s(alt (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (patch (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (PI.f64)) (patch (sqrt.f64 (PI.f64)) #<representation binary64>) () ())
#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) #<representation binary64>) () ())
#s(alt (.f64 (PI.f64) #s(literal 1/48 binary64)) (patch (.f64 (PI.f64) #s(literal 1/48 binary64)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) #<representation binary64>) () ())

Outputs
#s(alt (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (taylor 0 f) (#s(alt (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2)))) (taylor 0 f) (#s(alt (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2)))))) (taylor 0 f) (#s(alt (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI)))))))) (taylor 0 f) (#s(alt (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (log (* 1/4 (PI)))) (taylor 0 f) (#s(alt (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (+ (log (* 1/4 (PI))) (* 2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI))))) (taylor 0 f) (#s(alt (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))))) (taylor 0 f) (#s(alt (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))) (* f (+ (* 1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))))))) (taylor 0 f) (#s(alt (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* f (+ (* 1/4 (PI)) (* 1/2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (taylor 0 f) (#s(alt (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))))))) (taylor 0 f) (#s(alt (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (+ (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))))) (* 1/128 (pow (PI) 3)))))))) (taylor 0 f) (#s(alt (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (- (* -2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* -2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* f (- (* -2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (taylor 0 f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI)))))) (taylor 0 f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))) (* f (+ (* 2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI)))))))) (taylor 0 f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (taylor 0 f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (- (* -2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* -2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* f (- (* -2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (- (log (/ 4 (PI))) (log f)) (PI))) (taylor 0 f) (#s(alt (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) (patch (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (- (log (/ 4 (PI))) (log f)) (PI))) (taylor 0 f) (#s(alt (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) (patch (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (- (log (/ 4 (PI))) (log f)) (PI))) (taylor 0 f) (#s(alt (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) (patch (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (- (log (/ 4 (PI))) (log f)) (PI))) (taylor 0 f) (#s(alt (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) (patch (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (- (log (/ 4 (PI))) (log f)) (taylor 0 f) (#s(alt (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (patch (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (- (log (/ 4 (PI))) (log f)) (taylor 0 f) (#s(alt (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (patch (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (- (log (/ 4 (PI))) (log f)) (taylor 0 f) (#s(alt (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (patch (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (- (log (/ 4 (PI))) (log f)) (taylor 0 f) (#s(alt (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (patch (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (taylor 0 f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* -2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI)))))) (taylor 0 f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))) (* -2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI)))))))) (taylor 0 f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (- (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* f (- (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (sqrt (/ 1 (pow (PI) 3))))) (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI))))))) (taylor 0 f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* -1/2 (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (sqrt (/ 1 (PI)))))))) (taylor 0 f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* f (+ (* -1/2 (* (sqrt (/ 1 (PI))) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* -1/6 (* (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (sqrt (/ 1 (PI)))))))))) (taylor 0 f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (log f) (log (* 1/4 (PI))))) (taylor 0 f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (- (* -2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI))) (+ (log f) (log (* 1/4 (PI))))) (taylor 0 f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* -1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI))))) (taylor 0 f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* f (- (* -1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI))))) (taylor 0 f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI))))) (taylor 0 f) (#s(alt (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) (patch (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI))))) (taylor 0 f) (#s(alt (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) (patch (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI))))) (taylor 0 f) (#s(alt (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) (patch (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI))))) (taylor 0 f) (#s(alt (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) (patch (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ 2 (* f (- (* 1/4 (PI)) (* -1/4 (PI))))) (taylor 0 f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f) (taylor 0 f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f) (taylor 0 f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f) (taylor 0 f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor 0 f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor 0 f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor 0 f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor 0 f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (taylor 0 f) (#s(alt (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (patch (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) #<representation binary64>) () ())) ())
#s(alt (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* -1 (log f)) (* 1/2 (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))) (taylor 0 f) (#s(alt (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (patch (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) #<representation binary64>) () ())) ())
#s(alt (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* -1 (log f)) (* f (+ (* 1/2 (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 1/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))))))) (taylor 0 f) (#s(alt (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (patch (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) #<representation binary64>) () ())) ())
#s(alt (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* -1 (log f)) (* f (+ (* 1/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (+ (* 1/6 (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))))))) (* 1/2 (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))))) (taylor 0 f) (#s(alt (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (patch (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (taylor 0 f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (- (* -2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* -2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* f (- (* -2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (- (log (/ 4 (PI))) (* -1 (log (/ 1 f)))) (PI))) (taylor inf f) (#s(alt (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) (patch (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (- (log (/ 4 (PI))) (* -1 (log (/ 1 f)))) (PI))) (taylor inf f) (#s(alt (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) (patch (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (- (log (/ 4 (PI))) (* -1 (log (/ 1 f)))) (PI))) (taylor inf f) (#s(alt (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) (patch (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (- (log (/ 4 (PI))) (* -1 (log (/ 1 f)))) (PI))) (taylor inf f) (#s(alt (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) (patch (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (- (log (/ 4 (PI))) (* -1 (log (/ 1 f)))) (taylor inf f) (#s(alt (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (patch (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (- (log (/ 4 (PI))) (* -1 (log (/ 1 f)))) (taylor inf f) (#s(alt (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (patch (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (- (log (/ 4 (PI))) (* -1 (log (/ 1 f)))) (taylor inf f) (#s(alt (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (patch (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (- (log (/ 4 (PI))) (* -1 (log (/ 1 f)))) (taylor inf f) (#s(alt (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (patch (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI))))) (taylor inf f) (#s(alt (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) (patch (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI))))) (taylor inf f) (#s(alt (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) (patch (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI))))) (taylor inf f) (#s(alt (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) (patch (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI))))) (taylor inf f) (#s(alt (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) (patch (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (patch (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) #<representation binary64>) () ())) ())
#s(alt (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (patch (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) #<representation binary64>) () ())) ())
#s(alt (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (patch (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) #<representation binary64>) () ())) ())
#s(alt (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (patch (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f))))) (PI))) (taylor -inf f) (#s(alt (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) (patch (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f))))) (PI))) (taylor -inf f) (#s(alt (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) (patch (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f))))) (PI))) (taylor -inf f) (#s(alt (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) (patch (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f))))) (PI))) (taylor -inf f) (#s(alt (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) (patch (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f))))) (taylor -inf f) (#s(alt (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (patch (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f))))) (taylor -inf f) (#s(alt (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (patch (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f))))) (taylor -inf f) (#s(alt (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (patch (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f))))) (taylor -inf f) (#s(alt (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (patch (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI))))) (taylor -inf f) (#s(alt (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) (patch (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI))))) (taylor -inf f) (#s(alt (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) (patch (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI))))) (taylor -inf f) (#s(alt (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) (patch (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI))))) (taylor -inf f) (#s(alt (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) (patch (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor -inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor -inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor -inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor -inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (patch (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) #<representation binary64>) () ())) ())
#s(alt (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (patch (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) #<representation binary64>) () ())) ())
#s(alt (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (patch (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) #<representation binary64>) () ())) ())
#s(alt (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (patch (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt #s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) (patch #s(approx (neg ( (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())

Calls

3 calls:

Time

Variable

Point

Expression

147.0ms

((/ (log (tanh (* f (* 1/4 (PI))))) (* 1/4 (PI))) (log (tanh (* f (* 1/4 (PI))))) (tanh (* f (* 1/4 (PI)))) (* f (* 1/4 (PI))) (/ 1 (/ (PI) 4)) (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))))) (/ (PI) 4) (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (* (- (log (/ 4 (PI))) (log f)) (/ -4 (PI))) (- (log (/ 4 (PI))) (log f)) (log (/ 4 (PI))) (* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (/ 4 (sqrt (PI)))) (neg (* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (/ 4 (sqrt (PI))))) (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (neg (log (tanh (* f (* 1/4 (PI)))))) (/ (* (* 1/2 (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI)))) (PI)) (PI)) (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI))) (* (* -2 f) (/ (* (* 1/2 (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI)))) (PI)) (PI))) (* 1/2 (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI)))) (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/ (/ 4 (PI)) f) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))) (sqrt (PI)) (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (* (PI) 1/48) (* (* 1/2 (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI)))) (PI)))

68.0ms

-inf

((/ (log (tanh (* f (* 1/4 (PI))))) (* 1/4 (PI))) (log (tanh (* f (* 1/4 (PI))))) (tanh (* f (* 1/4 (PI)))) (* f (* 1/4 (PI))) (/ 1 (/ (PI) 4)) (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))))) (/ (PI) 4) (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (* (- (log (/ 4 (PI))) (log f)) (/ -4 (PI))) (- (log (/ 4 (PI))) (log f)) (log (/ 4 (PI))) (* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (/ 4 (sqrt (PI)))) (neg (* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (/ 4 (sqrt (PI))))) (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (neg (log (tanh (* f (* 1/4 (PI)))))) (/ (* (* 1/2 (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI)))) (PI)) (PI)) (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI))) (* (* -2 f) (/ (* (* 1/2 (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI)))) (PI)) (PI))) (* 1/2 (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI)))) (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/ (/ 4 (PI)) f) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))) (sqrt (PI)) (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (* (PI) 1/48) (* (* 1/2 (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI)))) (PI)))

51.0ms

inf

((/ (log (tanh (* f (* 1/4 (PI))))) (* 1/4 (PI))) (log (tanh (* f (* 1/4 (PI))))) (tanh (* f (* 1/4 (PI)))) (* f (* 1/4 (PI))) (/ 1 (/ (PI) 4)) (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))))) (/ (PI) 4) (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (* (- (log (/ 4 (PI))) (log f)) (/ -4 (PI))) (- (log (/ 4 (PI))) (log f)) (log (/ 4 (PI))) (* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (/ 4 (sqrt (PI)))) (neg (* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (/ 4 (sqrt (PI))))) (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (neg (log (tanh (* f (* 1/4 (PI)))))) (/ (* (* 1/2 (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI)))) (PI)) (PI)) (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI))) (* (* -2 f) (/ (* (* 1/2 (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI)))) (PI)) (PI))) (* 1/2 (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI)))) (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/ (/ 4 (PI)) f) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))) (sqrt (PI)) (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (* (PI) 1/48) (* (* 1/2 (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI)))) (PI)))

simplify145.0ms (0.9%)

Memory

2.1MiB live, 157.3MiB allocated

Algorithm

1×	egg-herbie

Rules

7 172×	`lower-fma.f64`
7 172×	`lower-fma.f32`
4 316×	`lower-*.f64`
4 316×	`lower-*.f32`
2 144×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	383	6661
1	1238	5892
2	5241	5231
0	8934	5118

Stop Event

1×	iter limit
1×	node limit

Counts

216 → 216

Calls

Call 1

Inputs
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))))))
(+ (log f) (log (* 1/4 (PI))))
(+ (log f) (+ (log (* 1/4 (PI))) (* 2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI)))))
(+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI)))))))
(+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))) (* f (+ (* 1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))))))
(* 1/4 (* f (PI)))
(* f (+ (* 1/4 (PI)) (* 1/2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))))
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))))))))
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (+ (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))))) (* 1/128 (pow (PI) 3))))))))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* -4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))
(- (* -2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(- (* f (- (* -2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(- (* f (- (* f (- (* -2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))
(+ (* 2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))))
(+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))) (* f (+ (* 2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))))))
(* -4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))
(- (* -2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(- (* f (- (* -2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(- (* f (- (* f (- (* -2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(* -4 (/ (- (log (/ 4 (PI))) (log f)) (PI)))
(* -4 (/ (- (log (/ 4 (PI))) (log f)) (PI)))
(* -4 (/ (- (log (/ 4 (PI))) (log f)) (PI)))
(* -4 (/ (- (log (/ 4 (PI))) (log f)) (PI)))
(- (log (/ 4 (PI))) (log f))
(- (log (/ 4 (PI))) (log f))
(- (log (/ 4 (PI))) (log f))
(- (log (/ 4 (PI))) (log f))
(* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(+ (* -8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* -2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))))))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))) (* -2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))))))))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(- (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(- (* f (- (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(- (* f (- (* f (- (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI))))))
(+ (* -2 (* (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (sqrt (/ 1 (pow (PI) 3))))) (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))))
(+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* -1/2 (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (sqrt (/ 1 (PI))))))))
(+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* f (+ (* -1/2 (* (sqrt (/ 1 (PI))) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* -1/6 (* (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (sqrt (/ 1 (PI))))))))))
(* -1 (+ (log f) (log (* 1/4 (PI)))))
(- (* -2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI))) (+ (log f) (log (* 1/4 (PI)))))
(- (* f (- (* -1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI)))))
(- (* f (- (* f (- (* -1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI)))))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(/ 2 (* f (- (* 1/4 (PI)) (* -1/4 (PI)))))
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f)))
(+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* -1 (log f)) (* 1/2 (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))))))
(+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* -1 (log f)) (* f (+ (* 1/2 (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 1/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))
(+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* -1 (log f)) (* f (+ (* 1/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (+ (* 1/6 (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))))))) (* 1/2 (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))))))))
(* -4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))
(- (* -2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(- (* f (- (* -2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(- (* f (- (* f (- (* -2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (- (log (/ 4 (PI))) (* -1 (log (/ 1 f)))) (PI)))
(* -4 (/ (- (log (/ 4 (PI))) (* -1 (log (/ 1 f)))) (PI)))
(* -4 (/ (- (log (/ 4 (PI))) (* -1 (log (/ 1 f)))) (PI)))
(* -4 (/ (- (log (/ 4 (PI))) (* -1 (log (/ 1 f)))) (PI)))
(- (log (/ 4 (PI))) (* -1 (log (/ 1 f))))
(- (log (/ 4 (PI))) (* -1 (log (/ 1 f))))
(- (log (/ 4 (PI))) (* -1 (log (/ 1 f))))
(- (log (/ 4 (PI))) (* -1 (log (/ 1 f))))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))))
(log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))))
(log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))))
(log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f))))) (PI)))
(* -4 (/ (- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f))))) (PI)))
(* -4 (/ (- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f))))) (PI)))
(* -4 (/ (- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f))))) (PI)))
(- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f)))))
(- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f)))))
(- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f)))))
(- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f)))))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))))
(log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))))
(log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))))
(log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))

Outputs
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))))
(.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))))
(fma.f64 (.f64 f (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (/.f64 f (PI.f64)))) #s(literal 2 binary64) (.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64)))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))))))
(fma.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64) (.f64 (.f64 f f) (fma.f64 (.f64 #s(literal 2/3 binary64) f) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (PI.f64)) (.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (PI.f64)) #s(literal 2 binary64)))))
(+ (log f) (log (* 1/4 (PI))))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(+ (log f) (+ (log (* 1/4 (PI))) (* 2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI)))))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI)))))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 4 binary64) #s(literal 0 binary64)) f #s(literal 0 binary64)) f (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))) (* f (+ (* 1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) f) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 4 binary64))) f #s(literal 0 binary64)) f (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* f (+ (* 1/4 (PI)) (* 1/2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))))))))
(.f64 (fma.f64 (.f64 f f) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (*.f64 (PI.f64) #s(literal 1/4 binary64))) f)
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (+ (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))))) (* 1/128 (pow (PI) 3))))))))
(.f64 (fma.f64 (.f64 f f) (fma.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) f (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64)))) (.f64 (PI.f64) #s(literal 1/4 binary64))) f)
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* -4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))
(.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(- (* -2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(- (* f (- (* -2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(fma.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64) (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 f (PI.f64))) #s(literal -2 binary64)) f))
(- (* f (- (* f (- (* -2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(fma.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64) (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 f (PI.f64))) #s(literal -2 binary64)) f))
(* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))
(.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64))
(+ (* 2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(fma.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64) #s(literal 0 binary64))
(+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))))
(fma.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64) (fma.f64 (.f64 f #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64))) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 f (PI.f64))) #s(literal 0 binary64)))
(+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))) (* f (+ (* 2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))))))
(fma.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64) (fma.f64 (.f64 f #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64))) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 f (PI.f64))) #s(literal 0 binary64)))
(* -4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))
(.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(- (* -2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(- (* f (- (* -2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(fma.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64) (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 f (PI.f64))) #s(literal -2 binary64)) f))
(- (* f (- (* f (- (* -2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(fma.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64) (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 f (PI.f64))) #s(literal -2 binary64)) f))
(* -4 (/ (- (log (/ 4 (PI))) (log f)) (PI)))
(*.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (- (log (/ 4 (PI))) (log f)) (PI)))
(*.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (- (log (/ 4 (PI))) (log f)) (PI)))
(*.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (- (log (/ 4 (PI))) (log f)) (PI)))
(*.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(- (log (/ 4 (PI))) (log f))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))
(- (log (/ 4 (PI))) (log f))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))
(- (log (/ 4 (PI))) (log f))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))
(- (log (/ 4 (PI))) (log f))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))
(* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(.f64 #s(literal -4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)))
(+ (* -8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(fma.f64 #s(literal -4 binary64) (/.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 0 binary64))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* -2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))))))
(fma.f64 #s(literal -4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) (fma.f64 (.f64 f #s(literal -2 binary64)) (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (/.f64 f (PI.f64))) #s(literal 0 binary64)))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))) (* -2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))))))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -2/3 binary64) f) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (PI.f64)) (.f64 #s(literal -2 binary64) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (PI.f64)))) f #s(literal 0 binary64)) f (.f64 #s(literal -4 binary64) (/.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64))))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64))
(- (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64))
(- (* f (- (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(fma.f64 (.f64 f (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (/.f64 f (PI.f64)))) #s(literal 2 binary64) (.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64)))
(- (* f (- (* f (- (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(fma.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64) (.f64 (.f64 f f) (fma.f64 (.f64 #s(literal 2/3 binary64) f) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (PI.f64)) (.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (PI.f64)) #s(literal 2 binary64)))))
(* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI))))))
(.f64 (-.f64 (neg.f64 (log.f64 f)) (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64))))
(+ (* -2 (* (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (sqrt (/ 1 (pow (PI) 3))))) (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))))
(.f64 (-.f64 (neg.f64 (log.f64 f)) (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64))))
(+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* -1/2 (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (sqrt (/ 1 (PI))))))))
(+.f64 #s(literal 0 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64))) (fma.f64 f (.f64 (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64)) f) (-.f64 (neg.f64 (log.f64 f)) (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)))))))
(+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* f (+ (* -1/2 (* (sqrt (/ 1 (PI))) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* -1/6 (* (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (sqrt (/ 1 (PI))))))))))
(fma.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (.f64 (.f64 f f) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64))) (fma.f64 (.f64 #s(literal -1/6 binary64) f) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64))))))
(* -1 (+ (log f) (log (* 1/4 (PI)))))
(-.f64 (neg.f64 (log.f64 f)) (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))))
(- (* -2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI))) (+ (log f) (log (* 1/4 (PI)))))
(-.f64 (neg.f64 (log.f64 f)) (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))))
(- (* f (- (* -1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI)))))
(fma.f64 (fma.f64 (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64)) f #s(literal 0 binary64)) f (-.f64 (neg.f64 (log.f64 f)) (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)))))
(- (* f (- (* f (- (* -1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) f) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64))) f #s(literal 0 binary64)) f (-.f64 (neg.f64 (log.f64 f)) (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)))))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(.f64 (.f64 (PI.f64) f) #s(literal -1/12 binary64))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(.f64 (.f64 (PI.f64) f) #s(literal -1/12 binary64))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(.f64 (.f64 (PI.f64) f) #s(literal -1/12 binary64))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(.f64 (.f64 (PI.f64) f) #s(literal -1/12 binary64))
(/ 2 (* f (- (* 1/4 (PI)) (* -1/4 (PI)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) f))
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(/.f64 (+.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) f)
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(/.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64))) f) f (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) f)
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(/.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64))) f) f (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) f)
(/ 4 (* f (PI)))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(/ 4 (* f (PI)))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(/ 4 (* f (PI)))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(/ 4 (* f (PI)))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f)))
(-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f))
(+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* -1 (log f)) (* 1/2 (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))))))
(-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f))
(+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* -1 (log f)) (* f (+ (* 1/2 (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 1/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))
(fma.f64 (.f64 f f) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64)))) (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)))
(+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* -1 (log f)) (* f (+ (* 1/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (+ (* 1/6 (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))))))) (* 1/2 (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))))))))
(fma.f64 (.f64 f f) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64)))) (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)))
(* -4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))
(.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(- (* -2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(- (* f (- (* -2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(fma.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64) (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 f (PI.f64))) #s(literal -2 binary64)) f))
(- (* f (- (* f (- (* -2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(fma.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64) (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 f (PI.f64))) #s(literal -2 binary64)) f))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal 4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (- (log (/ 4 (PI))) (* -1 (log (/ 1 f)))) (PI)))
(*.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (- (log (/ 4 (PI))) (* -1 (log (/ 1 f)))) (PI)))
(*.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (- (log (/ 4 (PI))) (* -1 (log (/ 1 f)))) (PI)))
(*.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (- (log (/ 4 (PI))) (* -1 (log (/ 1 f)))) (PI)))
(*.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(- (log (/ 4 (PI))) (* -1 (log (/ 1 f))))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))
(- (log (/ 4 (PI))) (* -1 (log (/ 1 f))))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))
(- (log (/ 4 (PI))) (* -1 (log (/ 1 f))))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))
(- (log (/ 4 (PI))) (* -1 (log (/ 1 f))))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(.f64 (.f64 (PI.f64) f) #s(literal -1/12 binary64))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(.f64 (.f64 (PI.f64) f) #s(literal -1/12 binary64))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(.f64 (.f64 (PI.f64) f) #s(literal -1/12 binary64))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(.f64 (.f64 (PI.f64) f) #s(literal -1/12 binary64))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))))
(/ 4 (* f (PI)))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(/ 4 (* f (PI)))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(/ 4 (* f (PI)))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(/ 4 (* f (PI)))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)))))
(log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)))))
(log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)))))
(log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)))))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal 4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f))))) (PI)))
(*.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) f)))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f))))) (PI)))
(*.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) f)))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f))))) (PI)))
(*.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) f)))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f))))) (PI)))
(*.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) f)))) (PI.f64)) #s(literal -4 binary64))
(- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f)))))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) f))))
(- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f)))))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) f))))
(- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f)))))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) f))))
(- (log (/ 4 (PI))) (+ (log -1) (* -1 (log (/ -1 f)))))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) f))))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(.f64 (.f64 (PI.f64) f) #s(literal -1/12 binary64))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(.f64 (.f64 (PI.f64) f) #s(literal -1/12 binary64))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(.f64 (.f64 (PI.f64) f) #s(literal -1/12 binary64))
(* -1 (* f (+ (* -1/24 (PI)) (* 1/8 (PI)))))
(.f64 (.f64 (PI.f64) f) #s(literal -1/12 binary64))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))))
(/ 4 (* f (PI)))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(/ 4 (* f (PI)))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(/ 4 (* f (PI)))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(/ 4 (* f (PI)))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)))))
(log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)))))
(log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)))))
(log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)))))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))

rewrite167.0ms (1%)

Memory

-4.0MiB live, 189.5MiB allocated

Rules

4 156×	`lower-*.f32`
4 134×	`lower-*.f64`
3 778×	`lower-/.f32`
3 760×	`lower-/.f64`
2 772×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	58	457
0	94	309
1	360	281
2	2557	281
0	8340	275

Stop Event

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

Counts

27 → 1 136

Calls

Call 1

Inputs
(/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
(log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
(tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64)))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))
(/.f64 (PI.f64) #s(literal 4 binary64))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))
(*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))
(-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f))
(log.f64 (/.f64 #s(literal 4 binary64) (PI.f64)))
(.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64)))
(neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))
(fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))
(.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64)))
(.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (*.f64 #s(literal 1/8 binary64) (PI.f64))))
#s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))
(sqrt.f64 (PI.f64))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))))
(*.f64 (PI.f64) #s(literal 1/48 binary64))
(.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64))

Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval251.0ms (1.5%)

Memory: 32.2MiB live, 377.3MiB allocated
Compiler: Compiled 44 186 to 5 231 computations (88.2% saved)

prune63.0ms (0.4%)

Memory

-27.7MiB live, 136.3MiB allocated

Pruning

24 alts after pruning (23 fresh and 1 done)

	Pruned	Kept	Total
New	1 667	22	1 689
Fresh	6	1	7
Picked	4	1	5
Done	0	0	0
Total	1 677	24	1 701

Accuracy

100.0%

Counts

1 701 → 24

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.4%	(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))
	8.6%	(/.f64 (-.f64 (log1p.f64 (neg.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 f)))) (log1p.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 f)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
	99.3%	(/.f64 (.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f)))) (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64)))) (sqrt.f64 (PI.f64)))
✓	99.5%	(/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
	96.5%	(/.f64 (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (*.f64 #s(literal -1/4 binary64) (PI.f64)))
▶	96.5%	(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
▶	96.6%	(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
	97.9%	(neg.f64 (.f64 (/.f64 (-.f64 (.f64 (log.f64 (.f64 (cosh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #s(literal 2 binary64))) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 (.f64 (sinh.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #s(literal 2 binary64))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
	99.2%	(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
▶	96.2%	(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
	97.2%	(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (fma.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (*.f64 #s(literal 1/8 binary64) (PI.f64))) f) f (/.f64 #s(literal 4 binary64) (PI.f64))) f)))))
	96.4%	(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))))))
▶	96.0%	(neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
	97.1%	(neg.f64 (.f64 (exp.f64 (.f64 (log.f64 (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))) #s(literal -1 binary64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
	96.3%	(neg.f64 (.f64 #s(approx (/ (neg (log (tanh ( f (* 1/4 (PI)))))) (sqrt (PI))) (.f64 (-.f64 (neg.f64 (log.f64 f)) (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64))))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
	96.4%	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (neg.f64 (log.f64 f)))))
	97.1%	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 f (.f64 #s(literal -2 binary64) f)) (.f64 (fma.f64 #s(literal -1/24 binary64) (PI.f64) (.f64 #s(literal 1/8 binary64) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
	97.2%	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 #s(approx (* (* -2 f) (/ (* (* 1/2 (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI)))) (PI)) (PI))) (.f64 (.f64 (PI.f64) f) #s(literal -1/12 binary64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))))
	95.6%	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))))
	96.5%	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 #s(literal -4 binary64) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))))
	96.5%	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (neg.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))
	96.1%	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) f)) (log.f64 (PI.f64))) (/.f64 #s(literal -4 binary64) (PI.f64))))
	96.4%	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (.f64 (PI.f64) f))) (/.f64 #s(literal -4 binary64) (PI.f64))))
	96.4%	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (neg.f64 (log.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (/.f64 #s(literal -4 binary64) (PI.f64))))

Compiler

Compiled 811 to 652 computations (19.6% saved)

simplify124.0ms (0.8%)

Memory

20.6MiB live, 97.6MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(*.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
cost-diff	0	(.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))
cost-diff	128	(neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
cost-diff	384	(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
cost-diff	0	(log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)))
cost-diff	0	(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
cost-diff	0	#s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
cost-diff	0	(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
cost-diff	0	(neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))))
cost-diff	0	(/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64)))
cost-diff	128	(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
cost-diff	2112	(.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
cost-diff	0	(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
cost-diff	0	#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))
cost-diff	0	(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))
cost-diff	0	(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
cost-diff	64	(-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))))
cost-diff	320	(*.f64 #s(literal 0 binary64) (PI.f64))
cost-diff	640	(.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))
cost-diff	768	(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))

Rules

7 460×	`lower-fma.f64`
7 460×	`lower-fma.f32`
3 834×	`lower-*.f32`
3 810×	`lower-*.f64`
2 050×	`lower-/.f32`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	57	522
0	92	516
1	220	501
2	541	490
3	1810	477
4	4411	477
5	7220	477
0	8198	477

Stop Event

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

Calls

Call 1

Inputs
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))
(-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))))
(*.f64 #s(literal 0 binary64) (PI.f64))
#s(literal 0 binary64)
(PI.f64)
(.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))
(*.f64 #s(literal -1/4 binary64) (PI.f64))
#s(literal -1/4 binary64)
(.f64 (log.f64 (tanh.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))
(log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))
(tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))
(.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)
(*.f64 (PI.f64) #s(literal 1/4 binary64))
#s(literal 1/4 binary64)
f
#s(literal -4 binary64)
(.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))
#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(*.f64 (PI.f64) f)
(PI.f64)
f
#s(literal 1/4 binary64)
(*.f64 #s(literal 1/4 binary64) (PI.f64))
(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64)))
(neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))))
(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))
#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(*.f64 (PI.f64) f)
(PI.f64)
f
#s(literal 1/4 binary64)
(sqrt.f64 (PI.f64))
(/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))
#s(literal 4 binary64)
(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
#s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)))
(*.f64 (PI.f64) #s(literal 1/4 binary64))
(PI.f64)
#s(literal 1/4 binary64)
(log.f64 f)
f
(*.f64 #s(literal 1/4 binary64) (PI.f64))
(neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
(.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))
(*.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(pow.f64 (PI.f64) #s(literal -1/2 binary64))
(PI.f64)
#s(literal -1/2 binary64)
(/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))
#s(literal 4 binary64)
(sqrt.f64 (PI.f64))
(log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))
#s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(/.f64 #s(literal 4 binary64) (PI.f64))
f

Outputs
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 (tanh.f64 (.f64 (*.f64 f #s(literal 1/4 binary64)) (PI.f64)))))
(-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (tanh.f64 (.f64 (*.f64 f #s(literal 1/4 binary64)) (PI.f64)))))
(*.f64 #s(literal 0 binary64) (PI.f64))
#s(literal 0 binary64)
#s(literal 0 binary64)
(PI.f64)
(.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))
(.f64 (log.f64 (tanh.f64 (.f64 (*.f64 f #s(literal 1/4 binary64)) (PI.f64)))) (PI.f64))
(*.f64 #s(literal -1/4 binary64) (PI.f64))
#s(literal -1/4 binary64)
(.f64 (log.f64 (tanh.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))
(.f64 #s(literal -4 binary64) (log.f64 (tanh.f64 (.f64 (*.f64 f #s(literal 1/4 binary64)) (PI.f64)))))
(log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))
(log.f64 (tanh.f64 (.f64 (.f64 f #s(literal 1/4 binary64)) (PI.f64))))
(tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))
(tanh.f64 (.f64 (.f64 f #s(literal 1/4 binary64)) (PI.f64)))
(.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)
(.f64 (.f64 f #s(literal 1/4 binary64)) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (PI.f64))
#s(literal 1/4 binary64)
f
#s(literal -4 binary64)
(.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 f #s(literal 1/4 binary64)) (PI.f64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))
(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 f #s(literal 1/4 binary64)) (PI.f64))))
#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))
#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 f #s(literal 1/4 binary64)) (PI.f64)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(.f64 (.f64 f #s(literal 1/4 binary64)) (PI.f64))
(*.f64 (PI.f64) f)
(*.f64 f (PI.f64))
(PI.f64)
f
#s(literal 1/4 binary64)
(*.f64 #s(literal 1/4 binary64) (PI.f64))
(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 f #s(literal 1/4 binary64)) (PI.f64)))))
(.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 f #s(literal 1/4 binary64)) (PI.f64)))))
(/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64)))
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 f #s(literal 1/4 binary64)) (PI.f64)))) (neg.f64 (sqrt.f64 (PI.f64))))
(neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))))
(neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 f #s(literal 1/4 binary64)) (PI.f64)))))
(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))
(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 f #s(literal 1/4 binary64)) (PI.f64))))
#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))
#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 f #s(literal 1/4 binary64)) (PI.f64)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(.f64 (.f64 f #s(literal 1/4 binary64)) (PI.f64))
(*.f64 (PI.f64) f)
(*.f64 f (PI.f64))
(PI.f64)
f
#s(literal 1/4 binary64)
(sqrt.f64 (PI.f64))
(/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))
#s(literal 4 binary64)
(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 f) (log.f64 (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
#s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
#s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 f) (log.f64 (*.f64 #s(literal 1/4 binary64) (PI.f64)))))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(+.f64 (log.f64 f) (log.f64 (*.f64 #s(literal 1/4 binary64) (PI.f64))))
(log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)))
(log.f64 (*.f64 #s(literal 1/4 binary64) (PI.f64)))
(*.f64 (PI.f64) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (PI.f64))
(PI.f64)
#s(literal 1/4 binary64)
(log.f64 f)
f
(*.f64 #s(literal 1/4 binary64) (PI.f64))
(neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
(.f64 (.f64 (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64))) (pow.f64 (PI.f64) #s(literal -1/2 binary64))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 #s(literal 4 binary64) (*.f64 f (PI.f64))))))
(.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))
(.f64 (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 #s(literal 4 binary64) (.f64 f (PI.f64))))) (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(*.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(pow.f64 (PI.f64) #s(literal -1/2 binary64))
(PI.f64)
#s(literal -1/2 binary64)
(/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))
#s(literal 4 binary64)
(sqrt.f64 (PI.f64))
(log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))
(log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 #s(literal 4 binary64) (*.f64 f (PI.f64)))))
#s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))
#s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 #s(literal 4 binary64) (*.f64 f (PI.f64))))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(/.f64 #s(literal 4 binary64) (*.f64 f (PI.f64)))
(/.f64 #s(literal 4 binary64) (PI.f64))
f

localize263.0ms (1.6%)

Memory

-2.6MiB live, 266.9MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.40462875976844204	(.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))
accuracy	1.0	(*.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
accuracy	1.0	(sqrt.f64 (PI.f64))
accuracy	1.879648119976748	#s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))
accuracy	0.203125	(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
accuracy	0.328125	(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
accuracy	1.58496250072115	(log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)))
accuracy	1.9029590223154624	#s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
accuracy	0.3125	(.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
accuracy	0.3359375	(/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64)))
accuracy	1.0	(sqrt.f64 (PI.f64))
accuracy	1.879535542847709	#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))
accuracy	0.01297628162065376	(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))
accuracy	0.265625	(*.f64 (PI.f64) f)
accuracy	0.328125	(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
accuracy	1.879535542847709	#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))
accuracy	0.01953125	(tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))
accuracy	0.265625	(.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)
accuracy	0.37109375	(.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))
accuracy	0.43654252930532605	(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))

Samples

196.0ms	238×	1	valid
10.0ms	3×	2	valid
6.0ms	15×	0	valid

Compiler

Compiled 430 to 52 computations (87.9% saved)

Precisions

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

ival-mult: 42.0ms (24.7% of total)

ival-log: 35.0ms (20.6% of total)

ival-div: 26.0ms (15.3% of total)

ival-exp: 16.0ms (9.4% of total)

adjust: 14.0ms (8.2% of total)

ival-pow: 10.0ms (5.9% of total)

ival-neg: 7.0ms (4.1% of total)

ival-tanh: 5.0ms (2.9% of total)

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

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

ival-sqrt: 3.0ms (1.8% of total)

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

exact: 1.0ms (0.6% of total)

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

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

series130.0ms (0.8%)

Memory

8.3MiB live, 139.8MiB allocated

Counts

25 → 252

Calls

Call 1

Inputs
#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 0 binary64) (PI.f64)) (patch (.f64 #s(literal 0 binary64) (PI.f64)) #<representation binary64>) () ())
#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) #<representation binary64>) () ())
#s(alt (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())
#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) (patch (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())
#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())
#s(alt (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())
#s(alt (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (patch (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) #<representation binary64>) () ())
#s(alt (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())
#s(alt #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (patch #s(approx (log (tanh ( f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) #<representation binary64>) () ())
#s(alt (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (patch (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) #<representation binary64>) () ())
#s(alt (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (patch (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())
#s(alt (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())
#s(alt (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) (patch (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) #<representation binary64>) () ())
#s(alt (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) (patch (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #<representation binary64>) () ())
#s(alt (.f64 (PI.f64) f) (patch (.f64 (PI.f64) f) #<representation binary64>) () ())
#s(alt (sqrt.f64 (PI.f64)) (patch (sqrt.f64 (PI.f64)) #<representation binary64>) () ())
#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())

Outputs
#s(alt (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (taylor 0 f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2)))) (taylor 0 f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2)))))) (taylor 0 f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI)))))))) (taylor 0 f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (+ (log f) (log (* 1/4 (PI))))) (taylor 0 f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* (PI) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* f (+ (* 1/2 (* f (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* f (+ (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (+ (* 1/6 (* f (* (PI) (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))))) (* 1/2 (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))))) (* (PI) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (* -2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* (PI) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* -1/2 (* f (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* f (- (* -1/6 (* f (* (PI) (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))))) (* 1/2 (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (taylor 0 f) (#s(alt (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2)))) (taylor 0 f) (#s(alt (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2)))))) (taylor 0 f) (#s(alt (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI)))))))) (taylor 0 f) (#s(alt (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (log (* 1/4 (PI)))) (taylor 0 f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (+ (log (* 1/4 (PI))) (* 2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI))))) (taylor 0 f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))))) (taylor 0 f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))) (* f (+ (* 1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))))))) (taylor 0 f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* f (+ (* 1/4 (PI)) (* 1/2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (taylor 0 f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))))))) (taylor 0 f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (+ (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))))) (* 1/128 (pow (PI) 3)))))))) (taylor 0 f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) (patch (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) (patch (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) (patch (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) (patch (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (taylor 0 f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* -2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI)))))) (taylor 0 f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))) (* -2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI)))))))) (taylor 0 f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (- (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* f (- (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (sqrt (/ 1 (pow (PI) 3))))) (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI))))))) (taylor 0 f) (#s(alt (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* -1/2 (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (sqrt (/ 1 (PI)))))))) (taylor 0 f) (#s(alt (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* f (+ (* -1/2 (* (sqrt (/ 1 (PI))) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* -1/6 (* (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (sqrt (/ 1 (PI)))))))))) (taylor 0 f) (#s(alt (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (log f) (log (* 1/4 (PI))))) (taylor 0 f) (#s(alt (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (patch (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (* -2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI))) (+ (log f) (log (* 1/4 (PI))))) (taylor 0 f) (#s(alt (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (patch (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* -1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI))))) (taylor 0 f) (#s(alt (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (patch (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* f (- (* -1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI))))) (taylor 0 f) (#s(alt (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (patch (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (taylor 0 f) (#s(alt (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2)))) (taylor 0 f) (#s(alt (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2)))))) (taylor 0 f) (#s(alt (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI)))))))) (taylor 0 f) (#s(alt (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (log (* 1/4 (PI)))) (taylor 0 f) (#s(alt #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (patch #s(approx (log (tanh ( f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (+ (log (* 1/4 (PI))) (* 2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI))))) (taylor 0 f) (#s(alt #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (patch #s(approx (log (tanh ( f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))))) (taylor 0 f) (#s(alt #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (patch #s(approx (log (tanh ( f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))) (* f (+ (* 1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))))))) (taylor 0 f) (#s(alt #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (patch #s(approx (log (tanh ( f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (log (* 1/4 (PI)))) (taylor 0 f) (#s(alt (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (patch (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (log (* 1/4 (PI)))) (taylor 0 f) (#s(alt (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (patch (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (log (* 1/4 (PI)))) (taylor 0 f) (#s(alt (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (patch (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (log (* 1/4 (PI)))) (taylor 0 f) (#s(alt (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (patch (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor 0 f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor 0 f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor 0 f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor 0 f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (- (* -2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* -2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* f (- (* -2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (taylor 0 f) (#s(alt (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))) (taylor 0 f) (#s(alt (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI)))))) (taylor 0 f) (#s(alt (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))) (* f (+ (* 2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI)))))))) (taylor 0 f) (#s(alt (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) (patch (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) (patch (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) (patch (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) (patch (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) (patch (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #<representation binary64>) () ())) ())
#s(alt (* f (+ (* 1/4 (PI)) (* 1/2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (taylor 0 f) (#s(alt (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) (patch (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #<representation binary64>) () ())) ())
#s(alt (* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))))))) (taylor 0 f) (#s(alt (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) (patch (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #<representation binary64>) () ())) ())
#s(alt (* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (+ (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))))) (* 1/128 (pow (PI) 3)))))))) (taylor 0 f) (#s(alt (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) (patch (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #<representation binary64>) () ())) ())
#s(alt (* f (PI)) (taylor 0 f) (#s(alt (.f64 (PI.f64) f) (patch (.f64 (PI.f64) f) #<representation binary64>) () ())) ())
#s(alt (* f (PI)) (taylor 0 f) (#s(alt (.f64 (PI.f64) f) (patch (.f64 (PI.f64) f) #<representation binary64>) () ())) ())
#s(alt (* f (PI)) (taylor 0 f) (#s(alt (.f64 (PI.f64) f) (patch (.f64 (PI.f64) f) #<representation binary64>) () ())) ())
#s(alt (* f (PI)) (taylor 0 f) (#s(alt (.f64 (PI.f64) f) (patch (.f64 (PI.f64) f) #<representation binary64>) () ())) ())
#s(alt (/ 2 (* f (- (* 1/4 (PI)) (* -1/4 (PI))))) (taylor 0 f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f) (taylor 0 f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f) (taylor 0 f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f) (taylor 0 f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) (patch (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) (patch (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) (patch (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) (patch (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (patch (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (patch (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (patch (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (patch (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (patch #s(approx (log (tanh ( f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (patch #s(approx (log (tanh ( f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (patch #s(approx (log (tanh ( f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (patch #s(approx (log (tanh ( f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) #<representation binary64>) () ())) ())
#s(alt (+ (log (* 1/4 (PI))) (* -1 (log (/ 1 f)))) (taylor inf f) (#s(alt (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (patch (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (+ (log (* 1/4 (PI))) (* -1 (log (/ 1 f)))) (taylor inf f) (#s(alt (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (patch (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (+ (log (* 1/4 (PI))) (* -1 (log (/ 1 f)))) (taylor inf f) (#s(alt (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (patch (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (+ (log (* 1/4 (PI))) (* -1 (log (/ 1 f)))) (taylor inf f) (#s(alt (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (patch (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) (patch (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) (patch (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) (patch (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) (patch (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) (patch (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) (patch (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) (patch (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) (patch (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #<representation binary64>) () ())) ())
#s(alt (* f (PI)) (taylor inf f) (#s(alt (.f64 (PI.f64) f) (patch (.f64 (PI.f64) f) #<representation binary64>) () ())) ())
#s(alt (* f (PI)) (taylor inf f) (#s(alt (.f64 (PI.f64) f) (patch (.f64 (PI.f64) f) #<representation binary64>) () ())) ())
#s(alt (* f (PI)) (taylor inf f) (#s(alt (.f64 (PI.f64) f) (patch (.f64 (PI.f64) f) #<representation binary64>) () ())) ())
#s(alt (* f (PI)) (taylor inf f) (#s(alt (.f64 (PI.f64) f) (patch (.f64 (PI.f64) f) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) (patch (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) (patch (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) (patch (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) (patch (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (patch (/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (patch (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (patch (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (patch (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (patch (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (patch #s(approx (log (tanh ( f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (patch #s(approx (log (tanh ( f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (patch #s(approx (log (tanh ( f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (patch #s(approx (log (tanh ( f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) #<representation binary64>) () ())) ())
#s(alt (+ (log -1) (+ (log (* 1/4 (PI))) (* -1 (log (/ -1 f))))) (taylor -inf f) (#s(alt (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (patch (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (+ (log -1) (+ (log (* 1/4 (PI))) (* -1 (log (/ -1 f))))) (taylor -inf f) (#s(alt (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (patch (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (+ (log -1) (+ (log (* 1/4 (PI))) (* -1 (log (/ -1 f))))) (taylor -inf f) (#s(alt (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (patch (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (+ (log -1) (+ (log (* 1/4 (PI))) (* -1 (log (/ -1 f))))) (taylor -inf f) (#s(alt (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (patch (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor -inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor -inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor -inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (/ 4 (* f (PI))) (taylor -inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) (patch (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) (patch (neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) (patch (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) (patch (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) (patch (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) (patch (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) (patch (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) (patch (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) (patch (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) (patch (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) (patch (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #<representation binary64>) () ())) ())
#s(alt (* f (PI)) (taylor -inf f) (#s(alt (.f64 (PI.f64) f) (patch (.f64 (PI.f64) f) #<representation binary64>) () ())) ())
#s(alt (* f (PI)) (taylor -inf f) (#s(alt (.f64 (PI.f64) f) (patch (.f64 (PI.f64) f) #<representation binary64>) () ())) ())
#s(alt (* f (PI)) (taylor -inf f) (#s(alt (.f64 (PI.f64) f) (patch (.f64 (PI.f64) f) #<representation binary64>) () ())) ())
#s(alt (* f (PI)) (taylor -inf f) (#s(alt (.f64 (PI.f64) f) (patch (.f64 (PI.f64) f) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (patch #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) #<representation binary64>) () ())) ())

Calls

3 calls:

Time

Variable

Point

Expression

62.0ms

inf

((/ (- (* 0 (PI)) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4))) (* (* -1/4 (PI)) (PI))) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4)) (* 0 (PI)) (- (* 0 (PI)) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4))) (/ (log (tanh (* f (* 1/4 (PI))))) (* 1/4 (PI))) (log (tanh (* f (* 1/4 (PI))))) (tanh (* f (* 1/4 (PI)))) (* (* (PI) f) 1/4) (* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (/ 4 (sqrt (PI)))) (neg (* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (/ 4 (sqrt (PI))))) (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (neg (log (tanh (* f (* 1/4 (PI)))))) (/ (log (tanh (* f (* 1/4 (PI))))) (* 1/4 (PI))) (log (tanh (* f (* 1/4 (PI))))) (+ (log (* (PI) 1/4)) (log f)) (log (* (PI) 1/4)) (/ (/ 4 (PI)) f) (neg (* (* (pow (PI) -1/2) (/ 4 (sqrt (PI)))) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (* (* (pow (PI) -1/2) (/ 4 (sqrt (PI)))) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))))) (* (pow (PI) -1/2) (/ 4 (sqrt (PI)))) (* (* (PI) 1/4) f) (tanh (* (* (PI) 1/4) f)) (* (PI) f) (sqrt (PI)) (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))))

30.0ms

-inf

((/ (- (* 0 (PI)) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4))) (* (* -1/4 (PI)) (PI))) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4)) (* 0 (PI)) (- (* 0 (PI)) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4))) (/ (log (tanh (* f (* 1/4 (PI))))) (* 1/4 (PI))) (log (tanh (* f (* 1/4 (PI))))) (tanh (* f (* 1/4 (PI)))) (* (* (PI) f) 1/4) (* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (/ 4 (sqrt (PI)))) (neg (* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (/ 4 (sqrt (PI))))) (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (neg (log (tanh (* f (* 1/4 (PI)))))) (/ (log (tanh (* f (* 1/4 (PI))))) (* 1/4 (PI))) (log (tanh (* f (* 1/4 (PI))))) (+ (log (* (PI) 1/4)) (log f)) (log (* (PI) 1/4)) (/ (/ 4 (PI)) f) (neg (* (* (pow (PI) -1/2) (/ 4 (sqrt (PI)))) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (* (* (pow (PI) -1/2) (/ 4 (sqrt (PI)))) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))))) (* (pow (PI) -1/2) (/ 4 (sqrt (PI)))) (* (* (PI) 1/4) f) (tanh (* (* (PI) 1/4) f)) (* (PI) f) (sqrt (PI)) (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))))

23.0ms

((/ (- (* 0 (PI)) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4))) (* (* -1/4 (PI)) (PI))) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4)) (* 0 (PI)) (- (* 0 (PI)) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4))) (/ (log (tanh (* f (* 1/4 (PI))))) (* 1/4 (PI))) (log (tanh (* f (* 1/4 (PI))))) (tanh (* f (* 1/4 (PI)))) (* (* (PI) f) 1/4) (* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (/ 4 (sqrt (PI)))) (neg (* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (/ 4 (sqrt (PI))))) (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (sqrt (PI))) (neg (log (tanh (* f (* 1/4 (PI)))))) (/ (log (tanh (* f (* 1/4 (PI))))) (* 1/4 (PI))) (log (tanh (* f (* 1/4 (PI))))) (+ (log (* (PI) 1/4)) (log f)) (log (* (PI) 1/4)) (/ (/ 4 (PI)) f) (neg (* (* (pow (PI) -1/2) (/ 4 (sqrt (PI)))) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (* (* (pow (PI) -1/2) (/ 4 (sqrt (PI)))) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))))) (* (pow (PI) -1/2) (/ 4 (sqrt (PI)))) (* (* (PI) 1/4) f) (tanh (* (* (PI) 1/4) f)) (* (PI) f) (sqrt (PI)) (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))))

simplify136.0ms (0.8%)

Memory

-6.1MiB live, 148.4MiB allocated

Algorithm

1×	egg-herbie

Rules

6 280×	`lower-fma.f64`
6 280×	`lower-fma.f32`
4 416×	`lower-*.f64`
4 416×	`lower-*.f32`
1 816×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	384	8293
1	1248	7277
2	5425	6378
0	8533	6204

Stop Event

1×	iter limit
1×	node limit

Counts

252 → 252

Calls

Call 1

Inputs
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))))))
(* (PI) (+ (log f) (log (* 1/4 (PI)))))
(+ (* 2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(+ (* f (+ (* 1/2 (* f (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(+ (* f (+ (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (+ (* 1/6 (* f (* (PI) (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))))) (* 1/2 (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(* -1 (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(- (* -2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(- (* f (- (* -1/2 (* f (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(- (* f (- (* f (- (* -1/6 (* f (* (PI) (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))))) (* 1/2 (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))))))
(+ (log f) (log (* 1/4 (PI))))
(+ (log f) (+ (log (* 1/4 (PI))) (* 2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI)))))
(+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI)))))))
(+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))) (* f (+ (* 1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))))))
(* 1/4 (* f (PI)))
(* f (+ (* 1/4 (PI)) (* 1/2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))))
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))))))))
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (+ (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))))) (* 1/128 (pow (PI) 3))))))))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(+ (* -8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* -2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))))))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))) (* -2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))))))))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(- (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(- (* f (- (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(- (* f (- (* f (- (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI))))))
(+ (* -2 (* (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (sqrt (/ 1 (pow (PI) 3))))) (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))))
(+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* -1/2 (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (sqrt (/ 1 (PI))))))))
(+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* f (+ (* -1/2 (* (sqrt (/ 1 (PI))) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* -1/6 (* (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (sqrt (/ 1 (PI))))))))))
(* -1 (+ (log f) (log (* 1/4 (PI)))))
(- (* -2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI))) (+ (log f) (log (* 1/4 (PI)))))
(- (* f (- (* -1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI)))))
(- (* f (- (* f (- (* -1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI)))))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))))))
(+ (log f) (log (* 1/4 (PI))))
(+ (log f) (+ (log (* 1/4 (PI))) (* 2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI)))))
(+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI)))))))
(+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))) (* f (+ (* 1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))))))
(+ (log f) (log (* 1/4 (PI))))
(+ (log f) (log (* 1/4 (PI))))
(+ (log f) (log (* 1/4 (PI))))
(+ (log f) (log (* 1/4 (PI))))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(* -4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))
(- (* -2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(- (* f (- (* -2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(- (* f (- (* f (- (* -2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))
(+ (* 2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))))
(+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))) (* f (+ (* 2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))))))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* f (+ (* 1/4 (PI)) (* 1/2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))))
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))))))))
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (+ (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))))) (* 1/128 (pow (PI) 3))))))))
(* f (PI))
(* f (PI))
(* f (PI))
(* f (PI))
(/ 2 (* f (- (* 1/4 (PI)) (* -1/4 (PI)))))
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(+ (log (* 1/4 (PI))) (* -1 (log (/ 1 f))))
(+ (log (* 1/4 (PI))) (* -1 (log (/ 1 f))))
(+ (log (* 1/4 (PI))) (* -1 (log (/ 1 f))))
(+ (log (* 1/4 (PI))) (* -1 (log (/ 1 f))))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(* f (PI))
(* f (PI))
(* f (PI))
(* f (PI))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(+ (log -1) (+ (log (* 1/4 (PI))) (* -1 (log (/ -1 f)))))
(+ (log -1) (+ (log (* 1/4 (PI))) (* -1 (log (/ -1 f)))))
(+ (log -1) (+ (log (* 1/4 (PI))) (* -1 (log (/ -1 f)))))
(+ (log -1) (+ (log (* 1/4 (PI))) (* -1 (log (/ -1 f)))))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(/ 4 (* f (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(* f (PI))
(* f (PI))
(* f (PI))
(* f (PI))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))

Outputs
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))))
(.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))))
(fma.f64 (.f64 f (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (/.f64 f (PI.f64)))) #s(literal 2 binary64) (.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64)))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))))))
(fma.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64) (.f64 (.f64 f f) (fma.f64 (.f64 #s(literal 2/3 binary64) f) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (PI.f64)) (.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (PI.f64)) #s(literal 2 binary64)))))
(* (PI) (+ (log f) (log (* 1/4 (PI)))))
(.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64))
(+ (* 2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(fma.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64) #s(literal 0 binary64))
(+ (* f (+ (* 1/2 (* f (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(fma.f64 (.f64 (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 4 binary64) #s(literal 0 binary64)) f) (PI.f64)) f (.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)))
(+ (* f (+ (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (+ (* 1/6 (* f (* (PI) (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))))) (* 1/2 (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(fma.f64 (.f64 f f) (fma.f64 (.f64 (.f64 #s(literal 1/6 binary64) f) (PI.f64)) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 4 binary64) #s(literal 0 binary64)) (PI.f64))) (.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)))
(* -1 (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(.f64 (neg.f64 (PI.f64)) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(- (* -2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(.f64 (neg.f64 (PI.f64)) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(- (* f (- (* -1/2 (* f (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(fma.f64 (neg.f64 (PI.f64)) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (.f64 (.f64 (.f64 (PI.f64) f) (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64))) f))
(- (* f (- (* f (- (* -1/6 (* f (* (PI) (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))))) (* 1/2 (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(fma.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal -1/6 binary64) f) (PI.f64)) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (.f64 (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64)) (PI.f64))) f) f (.f64 (neg.f64 (PI.f64)) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))))
(.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))))
(fma.f64 (.f64 f (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (/.f64 f (PI.f64)))) #s(literal 2 binary64) (.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64)))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))))))
(fma.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64) (.f64 (.f64 f f) (fma.f64 (.f64 #s(literal 2/3 binary64) f) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (PI.f64)) (.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (PI.f64)) #s(literal 2 binary64)))))
(+ (log f) (log (* 1/4 (PI))))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(+ (log f) (+ (log (* 1/4 (PI))) (* 2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI)))))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI)))))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 4 binary64) #s(literal 0 binary64)) f #s(literal 0 binary64)) f (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))) (* f (+ (* 1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) f) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 4 binary64) #s(literal 0 binary64))) f #s(literal 0 binary64)) f (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* f (+ (* 1/4 (PI)) (* 1/2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))))))))
(.f64 (fma.f64 (.f64 f f) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (*.f64 (PI.f64) #s(literal 1/4 binary64))) f)
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (+ (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))))) (* 1/128 (pow (PI) 3))))))))
(.f64 (fma.f64 (.f64 f f) (fma.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) f (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64)))) (.f64 (PI.f64) #s(literal 1/4 binary64))) f)
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(.f64 #s(literal -4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)))
(+ (* -8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(fma.f64 #s(literal -4 binary64) (/.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 0 binary64))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* -2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))))))
(fma.f64 #s(literal -4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) (fma.f64 (.f64 #s(literal -2 binary64) f) (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (/.f64 f (PI.f64))) #s(literal 0 binary64)))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))) (* -2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))))))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -2/3 binary64) f) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (PI.f64)) (.f64 #s(literal -2 binary64) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (PI.f64)))) f #s(literal 0 binary64)) f (.f64 #s(literal -4 binary64) (/.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64))))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64))
(- (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64))
(- (* f (- (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(fma.f64 (.f64 f (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (/.f64 f (PI.f64)))) #s(literal 2 binary64) (.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64)))
(- (* f (- (* f (- (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(fma.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64) (.f64 (.f64 f f) (fma.f64 (.f64 #s(literal 2/3 binary64) f) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (PI.f64)) (.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (PI.f64)) #s(literal 2 binary64)))))
(* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI))))))
(.f64 (-.f64 (neg.f64 (log.f64 f)) (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64))))
(+ (* -2 (* (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (sqrt (/ 1 (pow (PI) 3))))) (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))))
(.f64 (-.f64 (neg.f64 (log.f64 f)) (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64))))
(+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* -1/2 (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (sqrt (/ 1 (PI))))))))
(fma.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (.f64 (.f64 f (.f64 (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64)) f)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))))
(+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* f (+ (* -1/2 (* (sqrt (/ 1 (PI))) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* -1/6 (* (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (sqrt (/ 1 (PI))))))))))
(fma.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (.f64 (.f64 f f) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64))) (fma.f64 (.f64 #s(literal -1/6 binary64) f) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64))))))
(* -1 (+ (log f) (log (* 1/4 (PI)))))
(-.f64 (neg.f64 (log.f64 f)) (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))))
(- (* -2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI))) (+ (log f) (log (* 1/4 (PI)))))
(-.f64 (neg.f64 (log.f64 f)) (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))))
(- (* f (- (* -1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI)))))
(fma.f64 (fma.f64 (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64)) f #s(literal 0 binary64)) f (-.f64 (neg.f64 (log.f64 f)) (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)))))
(- (* f (- (* f (- (* -1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) f) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64))) f #s(literal 0 binary64)) f (-.f64 (neg.f64 (log.f64 f)) (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)))))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))))
(.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))))
(fma.f64 (.f64 f (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (/.f64 f (PI.f64)))) #s(literal 2 binary64) (.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64)))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))))))
(fma.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64) (.f64 (.f64 f f) (fma.f64 (.f64 #s(literal 2/3 binary64) f) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (PI.f64)) (.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (PI.f64)) #s(literal 2 binary64)))))
(+ (log f) (log (* 1/4 (PI))))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(+ (log f) (+ (log (* 1/4 (PI))) (* 2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI)))))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI)))))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 4 binary64) #s(literal 0 binary64)) f #s(literal 0 binary64)) f (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))) (* f (+ (* 1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) f) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 4 binary64) #s(literal 0 binary64))) f #s(literal 0 binary64)) f (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(+ (log f) (log (* 1/4 (PI))))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(+ (log f) (log (* 1/4 (PI))))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(+ (log f) (log (* 1/4 (PI))))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(+ (log f) (log (* 1/4 (PI))))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(/ 4 (* f (PI)))
(/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))
(/ 4 (* f (PI)))
(/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))
(/ 4 (* f (PI)))
(/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))
(/ 4 (* f (PI)))
(/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))
(* -4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))
(.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(- (* -2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(- (* f (- (* -2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(fma.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64) (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 f (PI.f64))) #s(literal -2 binary64)) f))
(- (* f (- (* f (- (* -2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(fma.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64) (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 f (PI.f64))) #s(literal -2 binary64)) f))
(* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI)))
(.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64))
(+ (* 2 (/ (* f (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))) (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))))
(fma.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64) #s(literal 0 binary64))
(+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (PI))) (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))))))
(fma.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64) (fma.f64 (.f64 #s(literal 2 binary64) f) (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64))) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 f (PI.f64))) #s(literal 0 binary64)))
(+ (* 4 (/ (+ (log (/ 2 (- (* 1/4 (PI)) (* -1/4 (PI))))) (* -1 (log f))) (PI))) (* f (+ (* 2 (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/4 (PI)) (* -1/4 (PI)))) (PI))) (* f (+ (* 2/3 (/ (* f (+ (* -3/2 (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (+ (* 1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 3) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 3))) (* 3 (* (- (* 1/4 (PI)) (* -1/4 (PI))) (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI)))))))))) (PI))) (* 2 (/ (+ (* -1/4 (* (pow (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) 2) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2))) (* (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))) (- (* 1/4 (PI)) (* -1/4 (PI))))) (PI))))))))
(fma.f64 (/.f64 (-.f64 (log.f64 (/.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (log.f64 f)) (PI.f64)) #s(literal 4 binary64) (fma.f64 (.f64 #s(literal 2 binary64) f) (.f64 (.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64))) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 f (PI.f64))) #s(literal 0 binary64)))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* f (+ (* 1/4 (PI)) (* 1/2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))))))))
(.f64 (fma.f64 (.f64 f f) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (*.f64 (PI.f64) #s(literal 1/4 binary64))) f)
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (+ (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))))) (* 1/128 (pow (PI) 3))))))))
(.f64 (fma.f64 (.f64 f f) (fma.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) f (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64)))) (.f64 (PI.f64) #s(literal 1/4 binary64))) f)
(* f (PI))
(*.f64 (PI.f64) f)
(* f (PI))
(*.f64 (PI.f64) f)
(* f (PI))
(*.f64 (PI.f64) f)
(* f (PI))
(*.f64 (PI.f64) f)
(/ 2 (* f (- (* 1/4 (PI)) (* -1/4 (PI)))))
(/.f64 #s(literal 2 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) f))
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(/.f64 (+.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) f)
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(/.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64))) f) f (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) f)
(/ (+ (* f (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (+ (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* 1/16 (/ (pow (PI) 2) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* f (- (+ (* -1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/384 (/ (pow (PI) 3) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (/ (* (+ (* -1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI))))) (* 1/4 (/ (PI) (- (* 1/4 (PI)) (* -1/4 (PI)))))) (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3)))) (- (* 1/4 (PI)) (* -1/4 (PI))))))) (* 2 (/ (- (* 1/384 (pow (PI) 3)) (* -1/384 (pow (PI) 3))) (pow (- (* 1/4 (PI)) (* -1/4 (PI))) 2)))))))) (* 2 (/ 1 (- (* 1/4 (PI)) (* -1/4 (PI)))))) f)
(/.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal 1/192 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal -2 binary64) (.f64 (.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 1/16 binary64))) f) f (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) f)
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(+ (log (* 1/4 (PI))) (* -1 (log (/ 1 f))))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(+ (log (* 1/4 (PI))) (* -1 (log (/ 1 f))))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(+ (log (* 1/4 (PI))) (* -1 (log (/ 1 f))))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(+ (log (* 1/4 (PI))) (* -1 (log (/ 1 f))))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(/ 4 (* f (PI)))
(/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))
(/ 4 (* f (PI)))
(/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))
(/ 4 (* f (PI)))
(/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))
(/ 4 (* f (PI)))
(/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(* f (PI))
(*.f64 (PI.f64) f)
(* f (PI))
(*.f64 (PI.f64) f)
(* f (PI))
(*.f64 (PI.f64) f)
(* f (PI))
(*.f64 (PI.f64) f)
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(+ (log -1) (+ (log (* 1/4 (PI))) (* -1 (log (/ -1 f)))))
(-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) f)))
(+ (log -1) (+ (log (* 1/4 (PI))) (* -1 (log (/ -1 f)))))
(-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) f)))
(+ (log -1) (+ (log (* 1/4 (PI))) (* -1 (log (/ -1 f)))))
(-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) f)))
(+ (log -1) (+ (log (* 1/4 (PI))) (* -1 (log (/ -1 f)))))
(-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) f)))
(/ 4 (* f (PI)))
(/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))
(/ 4 (* f (PI)))
(/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))
(/ 4 (* f (PI)))
(/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))
(/ 4 (* f (PI)))
(/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal -4 binary64))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (*.f64 (PI.f64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(* f (PI))
(*.f64 (PI.f64) f)
(* f (PI))
(*.f64 (PI.f64) f)
(* f (PI))
(*.f64 (PI.f64) f)
(* f (PI))
(*.f64 (PI.f64) f)
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))))
(/ (+ (exp (neg (* 1/4 (* f (PI))))) (exp (* 1/4 (* f (PI))))) (- (exp (* 1/4 (* f (PI)))) (exp (neg (* 1/4 (* f (PI)))))))
(/.f64 (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))) (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))))

rewrite168.0ms (1%)

Memory

19.4MiB live, 209.2MiB allocated

Rules

4 826×	`lower-/.f32`
4 812×	`lower-/.f64`
3 526×	`lower-*.f32`
3 502×	`lower-*.f64`
2 548×	`lower-fma.f64`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	57	379
0	92	297
1	361	276
2	2172	275
0	8732	275

Stop Event

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

Counts

25 → 972

Calls

Call 1

Inputs
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))
(.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))
(*.f64 #s(literal 0 binary64) (PI.f64))
(-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64))))
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))
#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(/.f64 (neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64)))
(neg.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))))
(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
#s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)))
(/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)
(neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
(.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))
(*.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)
(tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))
(*.f64 (PI.f64) f)
(sqrt.f64 (PI.f64))
#s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))

Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval273.0ms (1.7%)

Memory: -9.2MiB live, 343.6MiB allocated
Compiler: Compiled 33 812 to 4 073 computations (88% saved)

prune344.0ms (2.1%)

Memory

-57.0MiB live, 145.3MiB allocated

Pruning

28 alts after pruning (25 fresh and 3 done)

	Pruned	Kept	Total
New	1 356	17	1 373
Fresh	10	8	18
Picked	3	2	5
Done	0	1	1
Total	1 369	28	1 397

Accuracy

100.0%

Counts

1 397 → 28

Alt Table

Click to see full alt table

Status	Accuracy	Program
	95.6%	(/.f64 (/.f64 (.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #s(literal 4 binary64)) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
▶	96.5%	(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))
	8.6%	(/.f64 (-.f64 (log1p.f64 (neg.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 f)))) (log1p.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 f)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
	96.3%	(/.f64 (.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64)))) (sqrt.f64 (PI.f64)))
✓	99.5%	(/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
	96.5%	(/.f64 (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (*.f64 #s(literal -1/4 binary64) (PI.f64)))
	96.5%	(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (.f64 f (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
✓	96.5%	(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
	96.4%	(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (log.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
✓	96.6%	(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
	96.5%	(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 f #s(literal 1/4 binary64))) (log.f64 (PI.f64)))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
	96.5%	(/.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))
	96.2%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (PI.f64)) (.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64))))))
	96.4%	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/4 binary64) (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (PI.f64))))
	96.2%	(.f64 (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
▶	96.4%	(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
▶	96.2%	(neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))))
	95.4%	(neg.f64 (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/4 binary64)) (neg.f64 (sqrt.f64 (PI.f64))))))
	95.6%	(neg.f64 (/.f64 #s(literal 4 binary64) (.f64 (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64)))))
	96.3%	(neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))))
	97.9%	(neg.f64 (.f64 (/.f64 (-.f64 (.f64 (log.f64 (.f64 (cosh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #s(literal 2 binary64))) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 (.f64 (sinh.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #s(literal 2 binary64))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
▶	96.2%	(neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
▶	99.2%	(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
	96.2%	(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
	97.2%	(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (fma.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (*.f64 #s(literal 1/8 binary64) (PI.f64))) f) f (/.f64 #s(literal 4 binary64) (PI.f64))) f)))))
	97.1%	(neg.f64 (.f64 (exp.f64 (.f64 (log.f64 (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))) #s(literal -1 binary64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
	97.1%	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 f (.f64 #s(literal -2 binary64) f)) (.f64 (fma.f64 #s(literal -1/24 binary64) (PI.f64) (.f64 #s(literal 1/8 binary64) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
	97.2%	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 #s(approx (* (* -2 f) (/ (* (* 1/2 (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI)))) (PI)) (PI))) (.f64 (.f64 (PI.f64) f) #s(literal -1/12 binary64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))))

Compiler

Compiled 944 to 739 computations (21.7% saved)

simplify137.0ms (0.8%)

Memory

-15.3MiB live, 105.0MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	64	(-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))
cost-diff	128	(.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
cost-diff	128	(neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
cost-diff	960	(*.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64)))
cost-diff	0	(sqrt.f64 (PI.f64))
cost-diff	0	(/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))
cost-diff	128	(neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))))
cost-diff	2496	(/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))
cost-diff	64	(-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))))
cost-diff	320	(*.f64 #s(literal 0 binary64) (PI.f64))
cost-diff	640	(.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))
cost-diff	768	(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))
cost-diff	0	(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
cost-diff	0	(PI.f64)
cost-diff	0	(/.f64 #s(literal 4 binary64) (PI.f64))
cost-diff	0	(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
cost-diff	0	(neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
cost-diff	0	(/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64))))
cost-diff	128	(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
cost-diff	512	(.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))

Rules

3 930×	`lower-*.f32`
3 906×	`lower-*.f64`
2 914×	`lower-/.f32`
2 898×	`lower-/.f64`
1 846×	`lower-fma.f64`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	50	559
0	86	522
1	218	513
2	587	505
3	2188	498
4	5282	498
0	8370	498

Stop Event

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

Calls

Call 1

Inputs
(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64))))
(neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
(tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
f
(*.f64 #s(literal 1/4 binary64) (PI.f64))
#s(literal 1/4 binary64)
(PI.f64)
(/.f64 (PI.f64) (sqrt.f64 (PI.f64)))
(sqrt.f64 (PI.f64))
(/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))
#s(literal 4 binary64)
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 #s(literal 4 binary64) (PI.f64))
#s(literal 4 binary64)
(PI.f64)
(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
f
(*.f64 #s(literal 1/4 binary64) (PI.f64))
#s(literal 1/4 binary64)
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))
(-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))))
(*.f64 #s(literal 0 binary64) (PI.f64))
#s(literal 0 binary64)
(PI.f64)
(.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))
(*.f64 #s(literal -1/4 binary64) (PI.f64))
#s(literal -1/4 binary64)
(.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))
(log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))
#s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(*.f64 (PI.f64) f)
f
#s(literal 1/4 binary64)
#s(literal -4 binary64)
(.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))
(neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))))
(/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))
(/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))
#s(literal 4 binary64)
(sqrt.f64 (PI.f64))
(PI.f64)
(/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(neg.f64 (sqrt.f64 (PI.f64)))
(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
f
(*.f64 #s(literal 1/4 binary64) (PI.f64))
#s(literal 1/4 binary64)
(neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64))
(-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))
(*.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64)))
#s(literal 0 binary64)
(sqrt.f64 (PI.f64))
(PI.f64)
(.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
f
(*.f64 #s(literal 1/4 binary64) (PI.f64))
#s(literal 1/4 binary64)
(/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))
#s(literal 4 binary64)

Outputs
(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(.f64 (.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (PI.f64)) (sqrt.f64 (PI.f64))) (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))
(.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (.f64 (/.f64 (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64))) (PI.f64)) (sqrt.f64 (PI.f64))))
(/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64))))
(/.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (/.f64 (neg.f64 (PI.f64)) (sqrt.f64 (PI.f64))))
(neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(neg.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))
(log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
(log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))
(tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
(tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))
(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
(.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)
f
(*.f64 #s(literal 1/4 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/4 binary64))
#s(literal 1/4 binary64)
(PI.f64)
(/.f64 (PI.f64) (sqrt.f64 (PI.f64)))
(sqrt.f64 (PI.f64))
(/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))
#s(literal 4 binary64)
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))
(/.f64 #s(literal 4 binary64) (PI.f64))
#s(literal 4 binary64)
(PI.f64)
(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
(log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))
#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
#s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))
(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
(.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)
f
(*.f64 #s(literal 1/4 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/4 binary64))
#s(literal 1/4 binary64)
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))
(-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))))
(.f64 (neg.f64 (PI.f64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))
(*.f64 #s(literal 0 binary64) (PI.f64))
#s(literal 0 binary64)
#s(literal 0 binary64)
(PI.f64)
(.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))
(.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (PI.f64))
(*.f64 #s(literal -1/4 binary64) (PI.f64))
#s(literal -1/4 binary64)
(.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))
(.f64 #s(literal -4 binary64) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))
(log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))
(log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))
#s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))
#s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)
(*.f64 (PI.f64) f)
f
#s(literal 1/4 binary64)
#s(literal -4 binary64)
(.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))
(neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))))
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))
(/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))
(.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))
(/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))
#s(literal 4 binary64)
(sqrt.f64 (PI.f64))
(PI.f64)
(/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))
(neg.f64 (sqrt.f64 (PI.f64)))
(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
(log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))
#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
#s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))
(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
(.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)
f
(*.f64 #s(literal 1/4 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/4 binary64))
#s(literal 1/4 binary64)
(neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (*.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (PI.f64)) (sqrt.f64 (PI.f64))))
(.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (*.f64 (/.f64 (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64))) (PI.f64)) (sqrt.f64 (PI.f64))))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64))
(.f64 (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (PI.f64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))
(-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))
(.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))
(*.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64)))
#s(literal 0 binary64)
#s(literal 0 binary64)
(sqrt.f64 (PI.f64))
(PI.f64)
(.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (sqrt.f64 (PI.f64)))
(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
(log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))
#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
#s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))
(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
(.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)
f
(*.f64 #s(literal 1/4 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/4 binary64))
#s(literal 1/4 binary64)
(/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))
#s(literal 4 binary64)

localize219.0ms (1.3%)

Memory

23.0MiB live, 211.9MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.32421875	(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64))
accuracy	0.7265448115444642	(PI.f64)
accuracy	0.98828125	(sqrt.f64 (PI.f64))
accuracy	1.217802498320132	#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
accuracy	0.37728500976844204	(/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
accuracy	0.7265448115444642	(PI.f64)
accuracy	0.98828125	(sqrt.f64 (PI.f64))
accuracy	1.217802498320132	#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
accuracy	0.37109375	(.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))
accuracy	0.43654252930532605	(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))
accuracy	0.7265448115444642	(PI.f64)
accuracy	1.217802498320132	#s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))
accuracy	0.265625	(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
accuracy	0.40462875976844204	(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
accuracy	0.7265448115444642	(PI.f64)
accuracy	1.217802498320132	#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
accuracy	0.3359375	(/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64))))
accuracy	0.7265448115444642	(PI.f64)
accuracy	0.98828125	(/.f64 (PI.f64) (sqrt.f64 (PI.f64)))
accuracy	0.98828125	(sqrt.f64 (PI.f64))

Samples

110.0ms	253×	0	valid
50.0ms	3×	4	exit

Compiler

Compiled 435 to 45 computations (89.7% saved)

Precisions

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

ival-log: 47.0ms (34.9% of total)

ival-mult: 35.0ms (26% of total)

ival-neg: 28.0ms (20.8% of total)

ival-div: 11.0ms (8.2% of total)

ival-tanh: 7.0ms (5.2% of total)

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

ival-sqrt: 2.0ms (1.5% of total)

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

exact: 1.0ms (0.7% of total)

adjust: 0.0ms (0% of total)

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

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

series95.0ms (0.6%)

Memory

4.4MiB live, 84.1MiB allocated

Counts

26 → 228

Calls

Call 1

Inputs
#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())
#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())
#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())
#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 4 binary64) (PI.f64)) (patch (/.f64 #s(literal 4 binary64) (PI.f64)) #<representation binary64>) () ())
#s(alt (PI.f64) (patch (PI.f64) #<representation binary64>) () ())
#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())
#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 0 binary64) (PI.f64)) (patch (.f64 #s(literal 0 binary64) (PI.f64)) #<representation binary64>) () ())
#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())
#s(alt (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) (patch (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (patch (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (PI.f64)) (patch (sqrt.f64 (PI.f64)) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (patch (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())
#s(alt (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())
#s(alt (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())
#s(alt (/.f64 (PI.f64) (sqrt.f64 (PI.f64))) (patch (/.f64 (PI.f64) (sqrt.f64 (PI.f64))) #<representation binary64>) () ())
#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())
#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())
#s(alt #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())
#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) #<representation binary64>) () ())

Outputs
#s(alt (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (taylor 0 f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* -2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI)))))) (taylor 0 f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))) (* -2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI)))))))) (taylor 0 f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (- (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* f (- (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (sqrt (/ 1 (pow (PI) 3))))) (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI))))))) (taylor 0 f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* -1/2 (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (sqrt (/ 1 (PI)))))))) (taylor 0 f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* f (+ (* -1/2 (* (sqrt (/ 1 (PI))) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* -1/6 (* (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (sqrt (/ 1 (PI)))))))))) (taylor 0 f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (log f) (log (* 1/4 (PI))))) (taylor 0 f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (- (* -2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI))) (+ (log f) (log (* 1/4 (PI))))) (taylor 0 f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* -1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI))))) (taylor 0 f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* f (- (* -1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI))))) (taylor 0 f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (taylor 0 f) (#s(alt (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2)))) (taylor 0 f) (#s(alt (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2)))))) (taylor 0 f) (#s(alt (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI)))))))) (taylor 0 f) (#s(alt (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (log (* 1/4 (PI)))) (taylor 0 f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (+ (log (* 1/4 (PI))) (* 2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI))))) (taylor 0 f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))))) (taylor 0 f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))) (* f (+ (* 1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))))))) (taylor 0 f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (taylor 0 f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2)))) (taylor 0 f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2)))))) (taylor 0 f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI)))))))) (taylor 0 f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (+ (log f) (log (* 1/4 (PI))))) (taylor 0 f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* (PI) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* f (+ (* 1/2 (* f (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* f (+ (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (+ (* 1/6 (* f (* (PI) (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))))) (* 1/2 (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))))) (* (PI) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (* -2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* (PI) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* -1/2 (* f (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* f (- (* -1/6 (* f (* (PI) (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))))) (* 1/2 (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (taylor 0 f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* -2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI)))))) (taylor 0 f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))) (* -2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI)))))))) (taylor 0 f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (taylor 0 f) (#s(alt (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) (patch (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) (patch (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) (patch (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* f (- (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) (patch (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (- (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* f (- (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (taylor 0 f) (#s(alt (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))) (taylor 0 f) (#s(alt (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* -2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI)))))) (taylor 0 f) (#s(alt (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))) (* -2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI)))))))) (taylor 0 f) (#s(alt (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (- (* -2 (* (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (sqrt (/ 1 (PI))))) (* (sqrt (PI)) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* -1/2 (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (sqrt (PI)))) (* 2 (* (sqrt (/ 1 (PI))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (* (sqrt (PI)) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (- (* f (- (* f (- (* -1/6 (* (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (sqrt (PI)))) (* 1/2 (* (sqrt (PI)) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))) (* 2 (* (sqrt (/ 1 (PI))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (* (sqrt (PI)) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* f (+ (* 1/4 (PI)) (* 1/2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (taylor 0 f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))))))) (taylor 0 f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (+ (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))))) (* 1/128 (pow (PI) 3)))))))) (taylor 0 f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor 0 f) (#s(alt #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* f (+ (* 1/4 (PI)) (* 1/2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (taylor 0 f) (#s(alt #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))))))) (taylor 0 f) (#s(alt #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (+ (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))))) (* 1/128 (pow (PI) 3)))))))) (taylor 0 f) (#s(alt #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (/ 1 (+ (log f) (log (* 1/4 (PI))))))) (taylor 0 f) (#s(alt (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sqrt (PI)) (/ 1 (+ (log f) (log (* 1/4 (PI))))))) (* 2 (* (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (+ (log f) (log (* 1/4 (PI)))) 2)) (sqrt (/ 1 (PI)))))) (taylor 0 f) (#s(alt (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sqrt (PI)) (/ 1 (+ (log f) (log (* 1/4 (PI))))))) (* f (+ (* 2 (* (sqrt (/ 1 (PI))) (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (+ (log f) (log (* 1/4 (PI)))) 2)))) (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (* (pow (PI) 2) (pow (+ (log f) (log (* 1/4 (PI)))) 3)))) (* 1/2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (pow (+ (log f) (log (* 1/4 (PI)))) 2))))) (sqrt (PI)))))) (taylor 0 f) (#s(alt (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sqrt (PI)) (/ 1 (+ (log f) (log (* 1/4 (PI))))))) (* f (+ (* 2 (* (sqrt (/ 1 (PI))) (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (+ (log f) (log (* 1/4 (PI)))) 2)))) (* f (+ (* (sqrt (PI)) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (* (pow (PI) 2) (pow (+ (log f) (log (* 1/4 (PI)))) 3)))) (* 1/2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (pow (+ (log f) (log (* 1/4 (PI)))) 2))))) (* (* f (+ (* -2 (/ (* (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (* (pow (PI) 2) (pow (+ (log f) (log (* 1/4 (PI)))) 3)))) (* 1/2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (pow (+ (log f) (log (* 1/4 (PI)))) 2)))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))) (+ (* -1 (/ (* (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* (PI) (pow (+ (log f) (log (* 1/4 (PI)))) 3)))) (* 1/6 (/ (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))) (pow (+ (log f) (log (* 1/4 (PI)))) 2)))))) (sqrt (PI)))))))) (taylor 0 f) (#s(alt (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (taylor 0 f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (sqrt (/ 1 (pow (PI) 3))))) (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI))))))) (taylor 0 f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* -1/2 (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (sqrt (/ 1 (PI)))))))) (taylor 0 f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* f (+ (* -1/2 (* (sqrt (/ 1 (PI))) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* -1/6 (* (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (sqrt (/ 1 (PI)))))))))) (taylor 0 f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor inf f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor inf f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) (patch (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) (patch (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) (patch (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) (patch (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor inf f) (#s(alt (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor inf f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor inf f) (#s(alt #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))) (taylor inf f) (#s(alt (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))) (taylor inf f) (#s(alt (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))) (taylor inf f) (#s(alt (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))) (taylor inf f) (#s(alt (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (patch (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (taylor -inf f) (#s(alt (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (patch (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))) (taylor -inf f) (#s(alt (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) (patch (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (patch (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) (patch (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) (patch (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) (patch (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) (patch (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) (patch (neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI))) (taylor -inf f) (#s(alt (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (patch (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (patch (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) (patch #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (* f (PI))) (taylor -inf f) (#s(alt (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) (patch (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))) (taylor -inf f) (#s(alt #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) (patch #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))) (taylor -inf f) (#s(alt (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))) (taylor -inf f) (#s(alt (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))) (taylor -inf f) (#s(alt (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))) (taylor -inf f) (#s(alt (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (patch (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))) (taylor -inf f) (#s(alt (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (patch (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) #<representation binary64>) () ())) ())

Calls

3 calls:

Time

Variable

Point

Expression

24.0ms

((* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (/ (PI) (sqrt (PI)))) (/ 4 (sqrt (PI)))) (neg (* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (/ (PI) (sqrt (PI)))) (/ 4 (sqrt (PI))))) (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (/ (PI) (sqrt (PI)))) (neg (log (tanh (* f (* 1/4 (PI)))))) (* (/ 4 (PI)) (log (tanh (* f (* 1/4 (PI)))))) (/ 4 (PI)) (PI) (log (tanh (* f (* 1/4 (PI))))) (/ (- (* 0 (PI)) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4))) (* (* -1/4 (PI)) (PI))) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4)) (* 0 (PI)) (- (* 0 (PI)) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4))) (/ (/ 4 (sqrt (PI))) (/ (neg (sqrt (PI))) (log (tanh (* f (* 1/4 (PI))))))) (neg (/ (/ 4 (sqrt (PI))) (/ (neg (sqrt (PI))) (log (tanh (* f (* 1/4 (PI)))))))) (/ 4 (sqrt (PI))) (sqrt (PI)) (* 0 (sqrt (PI))) (neg (* (/ (- (* 0 (sqrt (PI))) (* (sqrt (PI)) (log (tanh (* f (* 1/4 (PI))))))) (PI)) (/ 4 (sqrt (PI))))) (* (/ (- (* 0 (sqrt (PI))) (* (sqrt (PI)) (log (tanh (* f (* 1/4 (PI))))))) (PI)) (/ 4 (sqrt (PI)))) (- (* 0 (sqrt (PI))) (* (sqrt (PI)) (log (tanh (* f (* 1/4 (PI))))))) (/ (PI) (sqrt (PI))) (tanh (* f (* 1/4 (PI)))) (* f (* 1/4 (PI))) (tanh (* (* (PI) 1/4) f)) (/ (neg (sqrt (PI))) (log (tanh (* f (* 1/4 (PI)))))) (/ (- (* 0 (sqrt (PI))) (* (sqrt (PI)) (log (tanh (* f (* 1/4 (PI))))))) (PI)))

11.0ms

inf

((* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (/ (PI) (sqrt (PI)))) (/ 4 (sqrt (PI)))) (neg (* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (/ (PI) (sqrt (PI)))) (/ 4 (sqrt (PI))))) (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (/ (PI) (sqrt (PI)))) (neg (log (tanh (* f (* 1/4 (PI)))))) (* (/ 4 (PI)) (log (tanh (* f (* 1/4 (PI)))))) (/ 4 (PI)) (PI) (log (tanh (* f (* 1/4 (PI))))) (/ (- (* 0 (PI)) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4))) (* (* -1/4 (PI)) (PI))) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4)) (* 0 (PI)) (- (* 0 (PI)) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4))) (/ (/ 4 (sqrt (PI))) (/ (neg (sqrt (PI))) (log (tanh (* f (* 1/4 (PI))))))) (neg (/ (/ 4 (sqrt (PI))) (/ (neg (sqrt (PI))) (log (tanh (* f (* 1/4 (PI)))))))) (/ 4 (sqrt (PI))) (sqrt (PI)) (* 0 (sqrt (PI))) (neg (* (/ (- (* 0 (sqrt (PI))) (* (sqrt (PI)) (log (tanh (* f (* 1/4 (PI))))))) (PI)) (/ 4 (sqrt (PI))))) (* (/ (- (* 0 (sqrt (PI))) (* (sqrt (PI)) (log (tanh (* f (* 1/4 (PI))))))) (PI)) (/ 4 (sqrt (PI)))) (- (* 0 (sqrt (PI))) (* (sqrt (PI)) (log (tanh (* f (* 1/4 (PI))))))) (/ (PI) (sqrt (PI))) (tanh (* f (* 1/4 (PI)))) (* f (* 1/4 (PI))) (tanh (* (* (PI) 1/4) f)) (/ (neg (sqrt (PI))) (log (tanh (* f (* 1/4 (PI)))))) (/ (- (* 0 (sqrt (PI))) (* (sqrt (PI)) (log (tanh (* f (* 1/4 (PI))))))) (PI)))

11.0ms

-inf

((* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (/ (PI) (sqrt (PI)))) (/ 4 (sqrt (PI)))) (neg (* (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (/ (PI) (sqrt (PI)))) (/ 4 (sqrt (PI))))) (/ (neg (log (tanh (* f (* 1/4 (PI)))))) (/ (PI) (sqrt (PI)))) (neg (log (tanh (* f (* 1/4 (PI)))))) (* (/ 4 (PI)) (log (tanh (* f (* 1/4 (PI)))))) (/ 4 (PI)) (PI) (log (tanh (* f (* 1/4 (PI))))) (/ (- (* 0 (PI)) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4))) (* (* -1/4 (PI)) (PI))) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4)) (* 0 (PI)) (- (* 0 (PI)) (* (* -1/4 (PI)) (* (log (tanh (* (* (PI) 1/4) f))) -4))) (/ (/ 4 (sqrt (PI))) (/ (neg (sqrt (PI))) (log (tanh (* f (* 1/4 (PI))))))) (neg (/ (/ 4 (sqrt (PI))) (/ (neg (sqrt (PI))) (log (tanh (* f (* 1/4 (PI)))))))) (/ 4 (sqrt (PI))) (sqrt (PI)) (* 0 (sqrt (PI))) (neg (* (/ (- (* 0 (sqrt (PI))) (* (sqrt (PI)) (log (tanh (* f (* 1/4 (PI))))))) (PI)) (/ 4 (sqrt (PI))))) (* (/ (- (* 0 (sqrt (PI))) (* (sqrt (PI)) (log (tanh (* f (* 1/4 (PI))))))) (PI)) (/ 4 (sqrt (PI)))) (- (* 0 (sqrt (PI))) (* (sqrt (PI)) (log (tanh (* f (* 1/4 (PI))))))) (/ (PI) (sqrt (PI))) (tanh (* f (* 1/4 (PI)))) (* f (* 1/4 (PI))) (tanh (* (* (PI) 1/4) f)) (/ (neg (sqrt (PI))) (log (tanh (* f (* 1/4 (PI)))))) (/ (- (* 0 (sqrt (PI))) (* (sqrt (PI)) (log (tanh (* f (* 1/4 (PI))))))) (PI)))

simplify266.0ms (1.6%)

Memory

-22.9MiB live, 173.2MiB allocated

Algorithm

1×	egg-herbie

Rules

4 692×	`lower-fma.f64`
4 692×	`lower-fma.f32`
3 702×	`lower-*.f64`
3 702×	`lower-*.f32`
2 058×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	330	10297
1	1142	8656
2	5108	7277
0	8696	7048

Stop Event

1×	iter limit
1×	node limit

Counts

228 → 228

Calls

Call 1

Inputs
(* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(+ (* -8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* -2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))))))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))) (* -2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))))))))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(- (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(- (* f (- (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(- (* f (- (* f (- (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI))))))
(+ (* -2 (* (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (sqrt (/ 1 (pow (PI) 3))))) (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))))
(+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* -1/2 (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (sqrt (/ 1 (PI))))))))
(+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* f (+ (* -1/2 (* (sqrt (/ 1 (PI))) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* -1/6 (* (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (sqrt (/ 1 (PI))))))))))
(* -1 (+ (log f) (log (* 1/4 (PI)))))
(- (* -2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI))) (+ (log f) (log (* 1/4 (PI)))))
(- (* f (- (* -1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI)))))
(- (* f (- (* f (- (* -1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI)))))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))))))
(+ (log f) (log (* 1/4 (PI))))
(+ (log f) (+ (log (* 1/4 (PI))) (* 2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI)))))
(+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI)))))))
(+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))) (* f (+ (* 1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))))))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))))))
(* (PI) (+ (log f) (log (* 1/4 (PI)))))
(+ (* 2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(+ (* f (+ (* 1/2 (* f (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(+ (* f (+ (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (+ (* 1/6 (* f (* (PI) (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))))) (* 1/2 (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(* -1 (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(- (* -2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(- (* f (- (* -1/2 (* f (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(- (* f (- (* f (- (* -1/6 (* f (* (PI) (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))))) (* 1/2 (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(+ (* -8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* -2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))))))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))) (* -2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))))))))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(- (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(- (* f (- (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(- (* f (- (* f (- (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(- (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(- (* f (- (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(- (* f (- (* f (- (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(+ (* -8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* -2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))))))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))) (* -2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))))))))
(* -1 (* (sqrt (PI)) (+ (log f) (log (* 1/4 (PI))))))
(- (* -2 (* (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (sqrt (/ 1 (PI))))) (* (sqrt (PI)) (+ (log f) (log (* 1/4 (PI))))))
(- (* f (- (* -1/2 (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (sqrt (PI)))) (* 2 (* (sqrt (/ 1 (PI))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (* (sqrt (PI)) (+ (log f) (log (* 1/4 (PI))))))
(- (* f (- (* f (- (* -1/6 (* (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (sqrt (PI)))) (* 1/2 (* (sqrt (PI)) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))) (* 2 (* (sqrt (/ 1 (PI))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (* (sqrt (PI)) (+ (log f) (log (* 1/4 (PI))))))
(* 1/4 (* f (PI)))
(* f (+ (* 1/4 (PI)) (* 1/2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))))
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))))))))
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (+ (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))))) (* 1/128 (pow (PI) 3))))))))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* f (+ (* 1/4 (PI)) (* 1/2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))))
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))))))))
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (+ (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))))) (* 1/128 (pow (PI) 3))))))))
(* -1 (* (sqrt (PI)) (/ 1 (+ (log f) (log (* 1/4 (PI)))))))
(+ (* -1 (* (sqrt (PI)) (/ 1 (+ (log f) (log (* 1/4 (PI))))))) (* 2 (* (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (+ (log f) (log (* 1/4 (PI)))) 2)) (sqrt (/ 1 (PI))))))
(+ (* -1 (* (sqrt (PI)) (/ 1 (+ (log f) (log (* 1/4 (PI))))))) (* f (+ (* 2 (* (sqrt (/ 1 (PI))) (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (+ (log f) (log (* 1/4 (PI)))) 2)))) (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (* (pow (PI) 2) (pow (+ (log f) (log (* 1/4 (PI)))) 3)))) (* 1/2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (pow (+ (log f) (log (* 1/4 (PI)))) 2))))) (sqrt (PI))))))
(+ (* -1 (* (sqrt (PI)) (/ 1 (+ (log f) (log (* 1/4 (PI))))))) (* f (+ (* 2 (* (sqrt (/ 1 (PI))) (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (+ (log f) (log (* 1/4 (PI)))) 2)))) (* f (+ (* (sqrt (PI)) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (* (pow (PI) 2) (pow (+ (log f) (log (* 1/4 (PI)))) 3)))) (* 1/2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (pow (+ (log f) (log (* 1/4 (PI)))) 2))))) (* (* f (+ (* -2 (/ (* (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (* (pow (PI) 2) (pow (+ (log f) (log (* 1/4 (PI)))) 3)))) (* 1/2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (pow (+ (log f) (log (* 1/4 (PI)))) 2)))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))) (+ (* -1 (/ (* (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* (PI) (pow (+ (log f) (log (* 1/4 (PI)))) 3)))) (* 1/6 (/ (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))) (pow (+ (log f) (log (* 1/4 (PI)))) 2)))))) (sqrt (PI))))))))
(* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI))))))
(+ (* -2 (* (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (sqrt (/ 1 (pow (PI) 3))))) (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))))
(+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* -1/2 (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (sqrt (/ 1 (PI))))))))
(+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* f (+ (* -1/2 (* (sqrt (/ 1 (PI))) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* -1/6 (* (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (sqrt (/ 1 (PI))))))))))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))))
(* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))))
(* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))))
(* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(* 1/4 (* f (PI)))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))))
(* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))))
(* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))))
(* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))

Outputs
(* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(+ (* -8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(fma.f64 (/.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64) #s(literal 0 binary64))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* -2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))))))
(fma.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64) (fma.f64 (.f64 #s(literal -2 binary64) f) (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (/.f64 f (PI.f64))) #s(literal 0 binary64)))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))) (* -2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))))))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -2/3 binary64) f) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (PI.f64)) (.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (PI.f64)) #s(literal -2 binary64))) f #s(literal 0 binary64)) f (.f64 (/.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64)))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)))
(- (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)))
(- (* f (- (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(fma.f64 (.f64 f (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (/.f64 f (PI.f64)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64))))
(- (* f (- (* f (- (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(fma.f64 (.f64 f f) (fma.f64 (.f64 #s(literal 2/3 binary64) f) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (PI.f64)) (.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (PI.f64)) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64))))
(* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(+ (* -2 (* (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (sqrt (/ 1 (pow (PI) 3))))) (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* -1/2 (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (sqrt (/ 1 (PI))))))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64))) (fma.f64 (.f64 (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64)) f) f (neg.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))))
(+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* f (+ (* -1/2 (* (sqrt (/ 1 (PI))) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* -1/6 (* (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (sqrt (/ 1 (PI))))))))))
(fma.f64 (.f64 f f) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64))) (fma.f64 (.f64 #s(literal -1/6 binary64) f) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64)))) (.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))))
(* -1 (+ (log f) (log (* 1/4 (PI)))))
(neg.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(- (* -2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI))) (+ (log f) (log (* 1/4 (PI)))))
(neg.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(- (* f (- (* -1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI)))))
(fma.f64 (.f64 (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64)) f) f (neg.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))))
(- (* f (- (* f (- (* -1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))))) (+ (log f) (log (* 1/4 (PI)))))
(fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) f) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64))) f) f (neg.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))))
(.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))))
(fma.f64 (.f64 f (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (/.f64 f (PI.f64)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64))))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))))))
(fma.f64 (.f64 f f) (fma.f64 (.f64 #s(literal 2/3 binary64) f) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (PI.f64)) (.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (PI.f64)) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64))))
(+ (log f) (log (* 1/4 (PI))))
(+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))
(+ (log f) (+ (log (* 1/4 (PI))) (* 2 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (PI)))))
(+.f64 (+.f64 (log.f64 f) #s(literal 0 binary64)) (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))))
(+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 1/2 (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI)))))))
(fma.f64 (fma.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 0 binary64)) f #s(literal 0 binary64)) f (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(+ (log f) (+ (log (* 1/4 (PI))) (* f (+ (* 2 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (PI))) (* f (+ (* 1/6 (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))))) (* 1/2 (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/6 binary64) f) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 0 binary64))) f #s(literal 0 binary64)) f (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))))
(.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))))
(fma.f64 (.f64 f (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (/.f64 f (PI.f64)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64))))
(+ (* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* 8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* 2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))))))
(fma.f64 (.f64 f f) (fma.f64 (.f64 #s(literal 2/3 binary64) f) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (PI.f64)) (.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (PI.f64)) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64))))
(* (PI) (+ (log f) (log (* 1/4 (PI)))))
(.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64))
(+ (* 2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(fma.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64) #s(literal 0 binary64))
(+ (* f (+ (* 1/2 (* f (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(fma.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64) (.f64 (.f64 (.f64 (PI.f64) f) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 0 binary64))) f))
(+ (* f (+ (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (+ (* 1/6 (* f (* (PI) (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))))) (* 1/2 (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(fma.f64 (.f64 f f) (.f64 (PI.f64) (fma.f64 (.f64 #s(literal 1/6 binary64) f) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 0 binary64)))) (.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)))
(* -1 (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(.f64 (neg.f64 (PI.f64)) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(- (* -2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(.f64 (neg.f64 (PI.f64)) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(- (* f (- (* -1/2 (* f (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(fma.f64 (neg.f64 (PI.f64)) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (.f64 (.f64 (.f64 (PI.f64) f) (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64))) f))
(- (* f (- (* f (- (* -1/6 (* f (* (PI) (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))))) (* 1/2 (* (PI) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))) (* 2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))
(fma.f64 (.f64 (.f64 (PI.f64) (fma.f64 (.f64 #s(literal -1/6 binary64) f) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64)))) f) f (.f64 (neg.f64 (PI.f64)) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))))
(* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(+ (* -8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(fma.f64 (/.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64) #s(literal 0 binary64))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* -2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))))))
(fma.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64) (fma.f64 (.f64 #s(literal -2 binary64) f) (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (/.f64 f (PI.f64))) #s(literal 0 binary64)))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))) (* -2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))))))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -2/3 binary64) f) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (PI.f64)) (.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (PI.f64)) #s(literal -2 binary64))) f #s(literal 0 binary64)) f (.f64 (/.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64)))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)))
(- (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)))
(- (* f (- (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(fma.f64 (.f64 f (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (/.f64 f (PI.f64)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64))))
(- (* f (- (* f (- (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(fma.f64 (.f64 f f) (fma.f64 (.f64 #s(literal 2/3 binary64) f) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (PI.f64)) (.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (PI.f64)) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64))))
(* 4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)))
(- (* 8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)))
(- (* f (- (* 2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(fma.f64 (.f64 f (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (/.f64 f (PI.f64)))) #s(literal 2 binary64) (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64))))
(- (* f (- (* f (- (* 2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))) (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))))) (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(fma.f64 (.f64 f f) (fma.f64 (.f64 #s(literal 2/3 binary64) f) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (PI.f64)) (.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (PI.f64)) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64))))
(* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI)))
(.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64))
(+ (* -8 (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (PI) 2))) (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))))
(fma.f64 (/.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64) #s(literal 0 binary64))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* -2 (/ (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (PI))))))
(fma.f64 (/.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64) (fma.f64 (.f64 #s(literal -2 binary64) f) (.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (/.f64 f (PI.f64))) #s(literal 0 binary64)))
(+ (* -4 (/ (+ (log f) (log (* 1/4 (PI)))) (PI))) (* f (+ (* -8 (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (PI) 2))) (* f (+ (* -2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (PI))) (* -2/3 (/ (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (PI))))))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -2/3 binary64) f) (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (PI.f64)) (.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 8 binary64) #s(literal 0 binary64)) (PI.f64)) #s(literal -2 binary64))) f #s(literal 0 binary64)) f (.f64 (/.f64 (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) (PI.f64)) #s(literal -4 binary64)))
(* -1 (* (sqrt (PI)) (+ (log f) (log (* 1/4 (PI))))))
(.f64 (neg.f64 (sqrt.f64 (PI.f64))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(- (* -2 (* (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (sqrt (/ 1 (PI))))) (* (sqrt (PI)) (+ (log f) (log (* 1/4 (PI))))))
(.f64 (neg.f64 (sqrt.f64 (PI.f64))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(- (* f (- (* -1/2 (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (sqrt (PI)))) (* 2 (* (sqrt (/ 1 (PI))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (* (sqrt (PI)) (+ (log f) (log (* 1/4 (PI))))))
(fma.f64 (.f64 (sqrt.f64 (PI.f64)) (.f64 (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64)) f)) f (.f64 (neg.f64 (sqrt.f64 (PI.f64))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))))
(- (* f (- (* f (- (* -1/6 (* (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (sqrt (PI)))) (* 1/2 (* (sqrt (PI)) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))))) (* 2 (* (sqrt (/ 1 (PI))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (* (sqrt (PI)) (+ (log f) (log (* 1/4 (PI))))))
(fma.f64 (.f64 (.f64 (sqrt.f64 (PI.f64)) (fma.f64 (.f64 #s(literal -1/6 binary64) f) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64)))) f) f (.f64 (neg.f64 (sqrt.f64 (PI.f64))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* f (+ (* 1/4 (PI)) (* 1/2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))))
(*.f64 (fma.f64 (PI.f64) #s(literal 1/4 binary64) #s(literal 0 binary64)) f)
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))))))))
(.f64 (fma.f64 (.f64 f f) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (*.f64 (PI.f64) #s(literal 1/4 binary64))) f)
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (+ (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))))) (* 1/128 (pow (PI) 3))))))))
(.f64 (fma.f64 (.f64 f f) (fma.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) f (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64)))) (.f64 (PI.f64) #s(literal 1/4 binary64))) f)
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* f (+ (* 1/4 (PI)) (* 1/2 (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))))))
(*.f64 (fma.f64 (PI.f64) #s(literal 1/4 binary64) #s(literal 0 binary64)) f)
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))))))))
(.f64 (fma.f64 (.f64 f f) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (*.f64 (PI.f64) #s(literal 1/4 binary64))) f)
(* f (+ (* 1/4 (PI)) (* f (+ (* 1/2 (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* f (- (+ (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* f (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))))) (* 1/128 (pow (PI) 3))))))))
(.f64 (fma.f64 (.f64 f f) (fma.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) f (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64)))) (.f64 (PI.f64) #s(literal 1/4 binary64))) f)
(* -1 (* (sqrt (PI)) (/ 1 (+ (log f) (log (* 1/4 (PI)))))))
(/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(+ (* -1 (* (sqrt (PI)) (/ 1 (+ (log f) (log (* 1/4 (PI))))))) (* 2 (* (/ (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (pow (+ (log f) (log (* 1/4 (PI)))) 2)) (sqrt (/ 1 (PI))))))
(/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(+ (* -1 (* (sqrt (PI)) (/ 1 (+ (log f) (log (* 1/4 (PI))))))) (* f (+ (* 2 (* (sqrt (/ 1 (PI))) (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (+ (log f) (log (* 1/4 (PI)))) 2)))) (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (* (pow (PI) 2) (pow (+ (log f) (log (* 1/4 (PI)))) 3)))) (* 1/2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (pow (+ (log f) (log (* 1/4 (PI)))) 2))))) (sqrt (PI))))))
(.f64 (sqrt.f64 (PI.f64)) (fma.f64 f (fma.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 0 binary64)) (pow.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) #s(literal 2 binary64))) f #s(literal 0 binary64)) (/.f64 #s(literal -1 binary64) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))))
(+ (* -1 (* (sqrt (PI)) (/ 1 (+ (log f) (log (* 1/4 (PI))))))) (* f (+ (* 2 (* (sqrt (/ 1 (PI))) (/ (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (pow (+ (log f) (log (* 1/4 (PI)))) 2)))) (* f (+ (* (sqrt (PI)) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (* (pow (PI) 2) (pow (+ (log f) (log (* 1/4 (PI)))) 3)))) (* 1/2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (pow (+ (log f) (log (* 1/4 (PI)))) 2))))) (* (* f (+ (* -2 (/ (* (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (* (pow (PI) 2) (pow (+ (log f) (log (* 1/4 (PI)))) 3)))) (* 1/2 (/ (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (pow (+ (log f) (log (* 1/4 (PI)))) 2)))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* (PI) (+ (log f) (log (* 1/4 (PI))))))) (+ (* -1 (/ (* (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (* (PI) (pow (+ (log f) (log (* 1/4 (PI)))) 3)))) (* 1/6 (/ (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI))))) (pow (+ (log f) (log (* 1/4 (PI)))) 2)))))) (sqrt (PI))))))))
(fma.f64 (.f64 f f) (.f64 (sqrt.f64 (PI.f64)) (fma.f64 (fma.f64 (/.f64 (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (pow.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) #s(literal 2 binary64))) #s(literal 1/6 binary64) #s(literal 0 binary64)) f (+.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal 0 binary64)) (pow.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)) #s(literal 2 binary64))) #s(literal 0 binary64)))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))))
(* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(+ (* -2 (* (* f (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2)))) (sqrt (/ 1 (pow (PI) 3))))) (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))
(+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* -1/2 (* (* f (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI))))) (sqrt (/ 1 (PI))))))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64))) (fma.f64 (.f64 (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64)) f) f (neg.f64 (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f)))))
(+ (* -1 (* (sqrt (/ 1 (PI))) (+ (log f) (log (* 1/4 (PI)))))) (* f (+ (* -2 (* (sqrt (/ 1 (pow (PI) 3))) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))) (* f (+ (* -1/2 (* (sqrt (/ 1 (PI))) (+ (* -4 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 2) (pow (PI) 2))) (* 8 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3))) (PI)))))) (* -1/6 (* (* f (+ (* -48 (/ (* (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/192 (pow (PI) 3))))) (* 1/128 (pow (PI) 3)))) (pow (PI) 2))) (+ (* 16 (/ (pow (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))) 3) (pow (PI) 3))) (* 24 (/ (- (* 1/2 (+ (* -1/4 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/128 (pow (PI) 3)) (* 1/384 (pow (PI) 3)))))) (+ (* -1/32 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (+ (* -1/1536 (pow (PI) 4)) (* 1/3072 (pow (PI) 4)))))) (+ (* -1/8 (* (PI) (+ (* -1/4 (* (PI) (+ (* -1/16 (pow (PI) 2)) (* 1/32 (pow (PI) 2))))) (* -1/128 (pow (PI) 3))))) (* 1/64 (* (pow (PI) 2) (+ (* -1/16 (pow (PI) 2)) (* 1/16 (pow (PI) 2))))))) (PI)))))) (sqrt (/ 1 (PI))))))))))
(fma.f64 (.f64 f f) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64))) (fma.f64 (.f64 #s(literal -1/6 binary64) f) (fma.f64 (/.f64 (fma.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64) (.f64 #s(literal -1/128 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 (fma.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (fma.f64 #s(literal -1/192 binary64) (pow.f64 (PI.f64) #s(literal 3 binary64)) (.f64 (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) #s(literal -1/4 binary64))) (fma.f64 #s(literal 1/1024 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3072 binary64)))) #s(literal 1/2 binary64))) (PI.f64)) #s(literal 24 binary64) #s(literal 0 binary64)) (.f64 (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -1/32 binary64)) (.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)) #s(literal -7/768 binary64))) (PI.f64)) #s(literal -4 binary64)))) (.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (+.f64 (log.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))))
(/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))))
(/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))))
(/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))))
(/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(neg.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))
(log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)))))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64))
(* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))
(.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (PI) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (PI.f64)) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* 4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal 4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -4 (/ (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))) (PI)))
(.f64 (/.f64 (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))) (PI.f64)) #s(literal -4 binary64))
(* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (PI)) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(* 1/4 (* f (PI)))
(.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))
(/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))
(* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))))
(/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))))
(/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))))
(/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (PI)) (/ 1 (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))))))))
(/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))
(* -1 (* (sqrt (/ 1 (PI))) (log (/ (- (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI)))))) (+ (exp (* 1/4 (* f (PI)))) (/ 1 (exp (* 1/4 (* f (PI))))))))))
(.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64)))) (log.f64 (/.f64 (-.f64 (pow.f64 (exp.f64 (PI.f64)) (.f64 #s(literal 1/4 binary64) f)) (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f))) (+.f64 (pow.f64 (exp.f64 #s(literal -1/4 binary64)) (.f64 (PI.f64) f)) (pow.f64 (exp.f64 (PI.f64)) (*.f64 #s(literal 1/4 binary64) f))))))

rewrite267.0ms (1.6%)

Memory

2.1MiB live, 156.1MiB allocated

Rules

4 492×	`lower-/.f32`
4 476×	`lower-/.f64`
3 460×	`lower-*.f32`
3 436×	`lower-*.f64`
1 658×	`lower-pow.f64`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	50	372
0	86	331
1	321	301
2	2271	296
0	8276	296

Stop Event

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

Counts

26 → 1 610

Calls

Call 1

Inputs
(.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64))))
(neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 #s(literal 4 binary64) (PI.f64))
(PI.f64)
(log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))
(.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))
(*.f64 #s(literal 0 binary64) (PI.f64))
(-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64))))
(/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))
(neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))))
(/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))
(sqrt.f64 (PI.f64))
(*.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64)))
(neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))
(/.f64 (PI.f64) (sqrt.f64 (PI.f64)))
#s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))
(.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))
#s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))
(/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64))

Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval832.0ms (5.1%)

Memory: 30.6MiB live, 766.1MiB allocated
Compiler: Compiled 89 390 to 10 313 computations (88.5% saved)

prune236.0ms (1.4%)

Memory

-21.9MiB live, 253.9MiB allocated

Pruning

25 alts after pruning (22 fresh and 3 done)

	Pruned	Kept	Total
New	3 541	13	3 554
Fresh	11	9	20
Picked	4	1	5
Done	1	2	3
Total	3 557	25	3 582

Accuracy

100.0%

Counts

3 582 → 25

Alt Table

Click to see full alt table

Status	Accuracy	Program
	96.2%	(/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))))
	8.6%	(/.f64 (-.f64 (log1p.f64 (neg.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 f)))) (log1p.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 f)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
	96.3%	(/.f64 (.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64)))) (sqrt.f64 (PI.f64)))
✓	99.5%	(/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
	96.5%	(/.f64 (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (*.f64 #s(literal -1/4 binary64) (PI.f64)))
✓	96.5%	(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
	96.4%	(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (log.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
	96.4%	(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) (PI.f64)) (.f64 (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) #s(literal -4 binary64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))))
	96.4%	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/4 binary64) (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (PI.f64))))
	96.5%	(/.f64 #s(literal -4 binary64) (/.f64 (neg.f64 (PI.f64)) (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))))
	96.2%	(.f64 (/.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
	95.1%	(.f64 (/.f64 #s(literal 4 binary64) (.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
	96.4%	(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (*.f64 #s(literal 1/4 binary64) f) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))))))
✓	96.4%	(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
	96.5%	(.f64 (/.f64 #s(literal -4 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) #s(literal -4 binary64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))))
	96.0%	(.f64 (.f64 (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
	99.4%	(.f64 (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (PI.f64))))
	97.9%	(neg.f64 (.f64 (/.f64 (-.f64 (.f64 (log.f64 (.f64 (cosh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #s(literal 2 binary64))) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 (.f64 (sinh.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #s(literal 2 binary64))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
	97.6%	(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (neg.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (PI.f64) (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (PI.f64))))))))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
	97.2%	(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (fma.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (*.f64 #s(literal 1/8 binary64) (PI.f64))) f) f (/.f64 #s(literal 4 binary64) (PI.f64))) f)))))
	99.1%	(neg.f64 (.f64 (.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))) (PI.f64))) (sqrt.f64 (PI.f64))))
	96.4%	(neg.f64 (.f64 (.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (PI.f64)))))
	96.5%	(neg.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (PI.f64) #s(literal -4 binary64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))) (*.f64 (PI.f64) (PI.f64)))))
	97.1%	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 f (.f64 #s(literal -2 binary64) f)) (.f64 (fma.f64 #s(literal -1/24 binary64) (PI.f64) (.f64 #s(literal 1/8 binary64) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
	97.2%	#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 #s(approx (* (* -2 f) (/ (* (* 1/2 (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI)))) (PI)) (PI))) (.f64 (.f64 (PI.f64) f) #s(literal -1/12 binary64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))))

Compiler

Compiled 1 657 to 686 computations (58.6% saved)

regimes151.0ms (0.9%)

Memory

-11.5MiB live, 144.1MiB allocated

Counts

65 → 1

Calls

Call 1

Inputs
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (neg.f64 (log.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (/.f64 #s(literal -4 binary64) (PI.f64))))
(/.f64 #s(literal -4 binary64) (/.f64 (neg.f64 (PI.f64)) (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))
(/.f64 (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (*.f64 #s(literal -1/4 binary64) (PI.f64)))
(neg.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (PI.f64) #s(literal -4 binary64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))) (*.f64 (PI.f64) (PI.f64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/4 binary64) (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (PI.f64))))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))))))
(.f64 (/.f64 #s(literal -4 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) #s(literal -4 binary64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))))
(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (log.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 #s(literal -4 binary64) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (*.f64 #s(literal 1/4 binary64) f) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))))))
(.f64 (/.f64 #s(literal 4 binary64) (.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (.f64 f (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))
(neg.f64 (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/4 binary64)) (neg.f64 (sqrt.f64 (PI.f64))))))
(.f64 (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(.f64 (/.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) (PI.f64)) (.f64 (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) #s(literal -4 binary64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))))
(/.f64 (/.f64 (.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #s(literal 4 binary64)) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.f64 (.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64)))) (sqrt.f64 (PI.f64)))
(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(neg.f64 (/.f64 #s(literal 4 binary64) (.f64 (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64)))))
(.f64 (.f64 (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))))
(neg.f64 (.f64 (.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (PI.f64)))))
(neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 f (.f64 #s(literal -2 binary64) f)) (.f64 (fma.f64 #s(literal -1/24 binary64) (PI.f64) (.f64 #s(literal 1/8 binary64) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (PI.f64)) (.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64))))))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (fma.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (*.f64 #s(literal 1/8 binary64) (PI.f64))) f) f (/.f64 #s(literal 4 binary64) (PI.f64))) f)))))
(neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))))
(neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (.f64 (PI.f64) f))) (/.f64 #s(literal -4 binary64) (PI.f64))))
(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 f #s(literal 1/4 binary64))) (log.f64 (PI.f64)))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (neg.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))
(/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) f)) (log.f64 (PI.f64))) (/.f64 #s(literal -4 binary64) (PI.f64))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/4 binary64) (PI.f64)) (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 #s(approx (* (* -2 f) (/ (* (* 1/2 (+ (* -2 (* (PI) 1/48)) (* 1/8 (PI)))) (PI)) (PI))) (.f64 (.f64 (PI.f64) f) #s(literal -1/12 binary64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (neg.f64 (log.f64 f)))))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))
(neg.f64 (.f64 (.f64 (pow.f64 (PI.f64) #s(literal -1/2 binary64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
(/.f64 (.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f)))) (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64)))) (sqrt.f64 (PI.f64)))
(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(neg.f64 (/.f64 (.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))) (sqrt.f64 (PI.f64))))
(.f64 (.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (PI.f64))))
(neg.f64 (.f64 #s(approx (/ (neg (log (tanh ( f (* 1/4 (PI)))))) (sqrt (PI))) (.f64 (-.f64 (neg.f64 (log.f64 f)) (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (PI.f64))))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(neg.f64 (.f64 (.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))) (PI.f64))) (sqrt.f64 (PI.f64))))
(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (sqrt.f64 (PI.f64)))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (PI.f64)) (PI.f64))) f (*.f64 (-.f64 (log.f64 (/.f64 #s(literal 4 binary64) (PI.f64))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64)))))
(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 (PI.f64) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (neg.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (PI.f64) (.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (PI.f64))))))))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(.f64 (pow.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) #s(literal 1/2 binary64)) (.f64 (pow.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) #s(literal 1/2 binary64)) (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))
(-.f64 (/.f64 (log.f64 (.f64 (cosh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (PI.f64))) (/.f64 (log.f64 (.f64 (sinh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (PI.f64))))
(neg.f64 (.f64 (exp.f64 (.f64 (log.f64 (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))) #s(literal -1 binary64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(neg.f64 (.f64 (/.f64 (-.f64 (.f64 (log.f64 (.f64 (cosh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #s(literal 2 binary64))) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 (.f64 (sinh.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f)) #s(literal 2 binary64))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(.f64 (neg.f64 (pow.f64 (.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (/.f64 #s(literal -4 binary64) (PI.f64))) #s(literal 2 binary64))) (/.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (log.f64 (tanh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))))))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))
(/.f64 (-.f64 (log1p.f64 (neg.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 f)))) (log1p.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 f)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
(neg.f64 (/.f64 (.f64 (-.f64 (pow.f64 (log.f64 (.f64 (cosh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (log.f64 (.f64 (sinh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #s(literal 2 binary64))) #s(literal 3 binary64))) #s(literal 4 binary64)) (.f64 (+.f64 (pow.f64 (log.f64 (.f64 (cosh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (log.f64 (.f64 (sinh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #s(literal 2 binary64))) (+.f64 (log.f64 (.f64 (sinh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))) #s(literal 2 binary64))) (log.f64 (.f64 (cosh.f64 (.f64 f (*.f64 #s(literal 1/4 binary64) (PI.f64)))) #s(literal 2 binary64)))))) (PI.f64))))

Outputs
(/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))

Calls

6 calls:

40.0ms	(*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)
29.0ms	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))
25.0ms	f
14.0ms	(/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))
14.0ms	(log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))

Results

Accuracy	Segments	Branch
99.5%	1	`f`
99.5%	1	`(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))`
99.5%	1	`(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))`
99.5%	1	`(log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))`
99.5%	1	`(/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))`
99.5%	1	`(*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)`

Compiler

Compiled 138 to 60 computations (56.5% saved)

regimes112.0ms (0.7%)

Memory

-1.9MiB live, 76.8MiB allocated

Counts

40 → 1

Calls

Call 1

Inputs
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (neg.f64 (log.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (/.f64 #s(literal -4 binary64) (PI.f64))))
(/.f64 #s(literal -4 binary64) (/.f64 (neg.f64 (PI.f64)) (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))
(/.f64 (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (*.f64 #s(literal -1/4 binary64) (PI.f64)))
(neg.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (PI.f64) #s(literal -4 binary64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))) (*.f64 (PI.f64) (PI.f64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/4 binary64) (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (PI.f64))))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))))))
(.f64 (/.f64 #s(literal -4 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) #s(literal -4 binary64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))))
(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (log.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 #s(literal -4 binary64) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (*.f64 #s(literal 1/4 binary64) f) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))))))
(.f64 (/.f64 #s(literal 4 binary64) (.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (.f64 f (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))
(neg.f64 (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/4 binary64)) (neg.f64 (sqrt.f64 (PI.f64))))))
(.f64 (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(.f64 (/.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) (PI.f64)) (.f64 (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) #s(literal -4 binary64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))))
(/.f64 (/.f64 (.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #s(literal 4 binary64)) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.f64 (.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64)))) (sqrt.f64 (PI.f64)))
(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(neg.f64 (/.f64 #s(literal 4 binary64) (.f64 (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64)))))
(.f64 (.f64 (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))))
(neg.f64 (.f64 (.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (PI.f64)))))
(neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 f (.f64 #s(literal -2 binary64) f)) (.f64 (fma.f64 #s(literal -1/24 binary64) (PI.f64) (.f64 #s(literal 1/8 binary64) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (PI.f64)) (.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64))))))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (fma.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (*.f64 #s(literal 1/8 binary64) (PI.f64))) f) f (/.f64 #s(literal 4 binary64) (PI.f64))) f)))))
(neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))))
(neg.f64 (.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (PI.f64))) (.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (PI.f64)) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (.f64 (PI.f64) f))) (/.f64 #s(literal -4 binary64) (PI.f64))))
(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 f #s(literal 1/4 binary64))) (log.f64 (PI.f64)))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (+.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64))) (log.f64 f))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (-.f64 (neg.f64 (log.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)))) (log.f64 f)) (/.f64 #s(literal -4 binary64) (PI.f64))))

Outputs

(neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (PI.f64) #s(literal 1/48 binary64)) (*.f64 #s(literal 1/8 binary64) (PI.f64))) f) f (/.f64 #s(literal 4 binary64) (PI.f64))) f)))))

Calls

6 calls:

44.0ms	f
28.0ms	(log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))
11.0ms	(*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)
9.0ms	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))
9.0ms	(/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))

Results

Accuracy	Segments	Branch
97.2%	1	`f`
97.2%	1	`(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))`
97.2%	1	`(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))`
97.2%	1	`(log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))`
97.2%	1	`(/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))`
97.2%	1	`(*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)`

Compiler

Compiled 138 to 60 computations (56.5% saved)

regimes88.0ms (0.5%)

Memory

40.9MiB live, 109.2MiB allocated

Counts

33 → 1

Calls

Call 1

Inputs
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (neg.f64 (log.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (/.f64 #s(literal -4 binary64) (PI.f64))))
(/.f64 #s(literal -4 binary64) (/.f64 (neg.f64 (PI.f64)) (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))
(/.f64 (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (*.f64 #s(literal -1/4 binary64) (PI.f64)))
(neg.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (PI.f64) #s(literal -4 binary64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))) (*.f64 (PI.f64) (PI.f64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/4 binary64) (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (PI.f64))))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))))))
(.f64 (/.f64 #s(literal -4 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) #s(literal -4 binary64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))))
(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (log.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 #s(literal -4 binary64) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (*.f64 #s(literal 1/4 binary64) f) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))))))
(.f64 (/.f64 #s(literal 4 binary64) (.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (.f64 f (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))
(neg.f64 (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/4 binary64)) (neg.f64 (sqrt.f64 (PI.f64))))))
(.f64 (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(.f64 (/.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) (PI.f64)) (.f64 (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) #s(literal -4 binary64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))))
(/.f64 (/.f64 (.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #s(literal 4 binary64)) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.f64 (.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64)))) (sqrt.f64 (PI.f64)))
(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(neg.f64 (/.f64 #s(literal 4 binary64) (.f64 (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64)))))
(.f64 (.f64 (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))))
(neg.f64 (.f64 (.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (PI.f64)))))
(neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 f (.f64 #s(literal -2 binary64) f)) (.f64 (fma.f64 #s(literal -1/24 binary64) (PI.f64) (.f64 #s(literal 1/8 binary64) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (PI.f64)) (.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64))))))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))

Outputs

#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (*.f64 f (*.f64 #s(literal -2 binary64) f)) (*.f64 (fma.f64 #s(literal -1/24 binary64) (PI.f64) (*.f64 #s(literal 1/8 binary64) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))

Calls

6 calls:

30.0ms	(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))
23.0ms	(log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))
9.0ms	(*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)
9.0ms	f
7.0ms	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))

Results

Accuracy	Segments	Branch
97.1%	1	`f`
97.1%	1	`(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))`
97.1%	1	`(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))`
97.1%	1	`(log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))`
97.1%	1	`(/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))`
97.1%	1	`(*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)`

Compiler

Compiled 138 to 60 computations (56.5% saved)

regimes103.0ms (0.6%)

Memory

-3.5MiB live, 159.6MiB allocated

Counts

30 → 1

Calls

Call 1

Inputs
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (.f64 (neg.f64 (log.f64 (.f64 (*.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (/.f64 #s(literal -4 binary64) (PI.f64))))
(/.f64 #s(literal -4 binary64) (/.f64 (neg.f64 (PI.f64)) (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))))
(/.f64 (log.f64 #s(approx (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (*.f64 #s(literal -1/4 binary64) (PI.f64)))
(neg.f64 (.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (PI.f64) #s(literal -4 binary64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))) (*.f64 (PI.f64) (PI.f64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/4 binary64) (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (PI.f64))))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 #s(literal 4 binary64) (*.f64 (PI.f64) f))))))
(.f64 (/.f64 #s(literal -4 binary64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) #s(literal -4 binary64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))))
(/.f64 #s(approx (log (tanh (* f (* 1/4 (PI))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (log.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) (*.f64 #s(literal -4 binary64) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))))))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (*.f64 #s(literal 1/4 binary64) f) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))))))
(.f64 (/.f64 #s(literal 4 binary64) (.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (.f64 f (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/4 binary64) (PI.f64)))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (PI.f64)) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (.f64 (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) #s(literal -4 binary64)))) (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) (PI.f64)))
(neg.f64 (/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (.f64 (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/4 binary64)) (neg.f64 (sqrt.f64 (PI.f64))))))
(.f64 (/.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(.f64 (/.f64 (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) (PI.f64)) (.f64 (.f64 (.f64 #s(literal -1/4 binary64) (PI.f64)) #s(literal -4 binary64)) (log.f64 #s(approx (tanh ( (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))))))
(/.f64 (/.f64 (.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) #s(literal 4 binary64)) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(/.f64 (.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64)))) (sqrt.f64 (PI.f64)))
(neg.f64 (.f64 (/.f64 (neg.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64))))) (sqrt.f64 (PI.f64))) (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64)))))
(neg.f64 (/.f64 #s(literal 4 binary64) (.f64 (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64)))))) (sqrt.f64 (PI.f64)))))
(.f64 (.f64 (/.f64 #s(literal -4 binary64) (sqrt.f64 (PI.f64))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (PI.f64)))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (sqrt.f64 (PI.f64)) (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))))
(neg.f64 (.f64 (.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* (* (PI) 1/4) f)) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (PI.f64)))))
(neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (PI.f64))) (/.f64 (neg.f64 (sqrt.f64 (PI.f64))) (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f))) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64))))

Outputs
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))

Calls

6 calls:

39.0ms	(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))
30.0ms	(*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)
9.0ms	(/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))
8.0ms	f
8.0ms	(log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))

Results

Accuracy	Segments	Branch
96.5%	1	`f`
96.5%	1	`(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))`
96.5%	1	`(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))`
96.5%	1	`(log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))`
96.5%	1	`(/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))`
96.5%	1	`(*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)`

Compiler

Compiled 138 to 60 computations (56.5% saved)

regimes59.0ms (0.4%)

Memory

-48.8MiB live, 11.7MiB allocated

Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts

1 → 1

Calls

Call 1

Inputs
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))

Outputs
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))

Calls

6 calls:

53.0ms	(/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))
1.0ms	(*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)
1.0ms	f
1.0ms	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))
1.0ms	(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))

Results

Accuracy	Segments	Branch
96.4%	1	`f`
96.4%	1	`(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))))`
96.4%	1	`(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))))`
96.4%	1	`(log.f64 (/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f))))))`
96.4%	1	`(/.f64 (+.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))) (-.f64 (exp.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)) (exp.f64 (neg.f64 (.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)))))`
96.4%	1	`(*.f64 (/.f64 (PI.f64) #s(literal 4 binary64)) f)`

Compiler

Compiled 138 to 60 computations (56.5% saved)

simplify30.0ms (0.2%)

Memory

4.5MiB live, 43.7MiB allocated

Algorithm

1×	egg-herbie

Rules

46×	`-commutative-binary64-.f64`
36×	`neg-mul-1-binary64-*.f64-neg.f64`
22×	`unsub-neg-binary64--.f64-neg.f64-+.f64`
16×	`distribute-rgt-neg-in-binary64-*.f64-neg.f64`
14×	`neg-sub0-binary64--.f64-neg.f64`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	63	162
1	86	162
2	99	162
3	112	161
4	124	161
5	152	161
6	190	161
7	193	161

Stop Event

1×

saturated

Calls

Call 1

Inputs
(/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (fma.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (*.f64 #s(literal 1/8 binary64) (PI.f64))) f) f (/.f64 #s(literal 4 binary64) (PI.f64))) f)))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 f (.f64 #s(literal -2 binary64) f)) (.f64 (fma.f64 #s(literal -1/24 binary64) (PI.f64) (.f64 #s(literal 1/8 binary64) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))

Outputs
(/.f64 (log.f64 (tanh.f64 (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
(/.f64 (log.f64 (tanh.f64 (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (*.f64 (PI.f64) #s(literal 1/4 binary64)))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (fma.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (PI.f64) #s(literal 1/48 binary64)) (*.f64 #s(literal 1/8 binary64) (PI.f64))) f) f (/.f64 #s(literal 4 binary64) (PI.f64))) f)))))
(.f64 (/.f64 #s(literal -1 binary64) (/.f64 (PI.f64) #s(literal 4 binary64))) (log.f64 #s(approx (/ (+ (exp ( (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f))))) (/.f64 (fma.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 #s(literal 1/48 binary64) (PI.f64)) (*.f64 #s(literal 1/8 binary64) (PI.f64))) f) f (/.f64 #s(literal 4 binary64) (PI.f64))) f))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 f (.f64 #s(literal -2 binary64) f)) (.f64 (fma.f64 #s(literal -1/24 binary64) (PI.f64) (.f64 #s(literal 1/8 binary64) (PI.f64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal -4 binary64) (PI.f64)) (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)))))
#s(approx (neg (* (/ 1 (/ (PI) 4)) (log (/ (+ (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))) (- (exp (* (/ (PI) 4) f)) (exp (neg (* (/ (PI) 4) f)))))))) (fma.f64 (.f64 (.f64 #s(literal -2 binary64) f) f) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/24 binary64) (PI.f64) (.f64 #s(literal 1/8 binary64) (PI.f64)))) (*.f64 (log.f64 (/.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) f)) (/.f64 #s(literal -4 binary64) (PI.f64)))))
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (PI.f64)))
(/.f64 (log.f64 #s(approx (tanh (* f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) f) #s(literal 1/4 binary64)))) (*.f64 (PI.f64) #s(literal 1/4 binary64)))
(.f64 (/.f64 #s(literal 4 binary64) (PI.f64)) (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 f (.f64 #s(literal 1/4 binary64) (PI.f64))))))
(.f64 (log.f64 #s(approx (tanh ( f (* 1/4 (PI)))) (.f64 (.f64 (PI.f64) #s(literal 1/4 binary64)) f))) (/.f64 #s(literal 4 binary64) (PI.f64)))

soundness2.4s (14.9%)

Memory

30.9MiB live, 620.4MiB allocated

Rules

18 550×	`lower-fma.f64`
18 550×	`lower-fma.f32`
7 172×	`lower-fma.f64`
7 172×	`lower-fma.f32`
5 070×	`lower-*.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	57	379
0	92	297
1	361	276
2	2172	275
0	8732	275
0	383	6661
1	1238	5892
2	5241	5231
0	8934	5118
0	16	129
0	29	87
1	119	49
2	783	49
0	8561	49
0	58	457
0	94	309
1	360	281
2	2557	281
0	8340	275
0	171	1490
1	484	1364
2	1754	1236
3	7067	1196
0	9194	1178

Stop Event

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

Compiler

Compiled 268 to 146 computations (45.5% saved)

preprocess127.0ms (0.8%)

Memory: -16.9MiB live, 96.8MiB allocated
Compiler: Compiled 240 to 124 computations (48.3% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

start0.0ms (0%)

analyze235.0ms (1.4%)

sample5.8s (35.9%)

explain674.0ms (4.1%)

preprocess490.0ms (3%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify220.0ms (1.4%)

localize125.0ms (0.8%)

series113.0ms (0.7%)

simplify181.0ms (1.1%)

rewrite155.0ms (1%)

eval291.0ms (1.8%)

prune29.0ms (0.2%)

simplify137.0ms (0.8%)

localize279.0ms (1.7%)

series280.0ms (1.7%)

simplify145.0ms (0.9%)

rewrite167.0ms (1%)

eval251.0ms (1.5%)

prune63.0ms (0.4%)

simplify124.0ms (0.8%)

localize263.0ms (1.6%)

series130.0ms (0.8%)

simplify136.0ms (0.8%)

rewrite168.0ms (1%)

eval273.0ms (1.7%)

prune344.0ms (2.1%)

simplify137.0ms (0.8%)

localize219.0ms (1.3%)

series95.0ms (0.6%)

simplify266.0ms (1.6%)

rewrite267.0ms (1.6%)

eval832.0ms (5.1%)

prune236.0ms (1.4%)

regimes151.0ms (0.9%)

regimes112.0ms (0.7%)

regimes88.0ms (0.5%)

regimes103.0ms (0.6%)

regimes59.0ms (0.4%)

simplify30.0ms (0.2%)

soundness2.4s (14.9%)

preprocess127.0ms (0.8%)

end0.0ms (0%)

Profiling