Metrics for spherical-inv-longitude

start0.0ms (0.0%)

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

analyze96.0ms (3.9%)

Memory

1.4MiB live, 32.9MiB allocated; 0ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0.0%	0.0%	49.9%	50.1%	0.0%	0.0%	0.0%	0
0.0%	0.0%	49.9%	50.1%	0.0%	0.0%	0.0%	1
0.0%	0.0%	49.9%	50.1%	0.0%	0.0%	0.0%	2
0.0%	0.0%	49.9%	50.1%	0.0%	0.0%	0.0%	3
0.0%	0.0%	49.9%	50.1%	0.0%	0.0%	0.0%	4
50.0%	25.0%	25.0%	50.1%	0.0%	0.0%	0.0%	5
50.0%	25.0%	25.0%	50.1%	0.0%	0.0%	0.0%	6
50.0%	25.0%	25.0%	50.1%	0.0%	0.0%	0.0%	7
54.7%	27.3%	22.6%	50.1%	0.0%	0.0%	0.0%	8
77.3%	38.6%	11.3%	50.1%	0.0%	0.0%	0.0%	9
78.5%	39.2%	10.7%	50.1%	0.0%	0.0%	0.0%	10
79.1%	39.5%	10.4%	50.1%	0.0%	0.0%	0.0%	11
79.4%	39.6%	10.3%	50.1%	0.0%	0.0%	0.0%	12

Compiler

Compiled 28 to 17 computations (39.3% saved)

sample1.0s (41.6%)

Memory

11.1MiB live, 279.0MiB allocated; 22ms collecting garbage

Samples

547.0ms	3 170×	1	valid
256.0ms	5 086×	0	valid

Precisions

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

ival-cos: 243.0ms (43.7% of total, 29.4 MiB)

ival-atan2: 88.0ms (15.8% of total, 9.3 MiB)

adjust: 80.0ms (14.4% of total, 9.2 MiB)

ival-div!: 65.0ms (11.7% of total, 7.5 MiB)

ival-add!: 31.0ms (5.6% of total, 6.2 MiB)

ival-fabs: 24.0ms (4.3% of total, 4.7 MiB)

ival-if: 14.0ms (2.5% of total, 4.9 MiB)

ival->: 9.0ms (1.6% of total, 3.1 MiB)

ival-or: 3.0ms (0.5% of total, 1.1 MiB)

Bogosity

preprocess40.0ms (1.6%)

Memory

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

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	104	378
1	387	366
2	2584	366

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	74.2%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))

Status

Accuracy

Program

▶

74.2%

(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))

Compiler

Compiled 48 to 30 computations (37.5% saved)

rewrite57.0ms (2.3%)

Memory

0.0MiB live, 23.8MiB allocated; 3ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	15	51
0	24	51
1	64	51
2	352	51
0	4010	51

Stop Event

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

Counts

10 → 71

Calls

Call 1

Inputs
g
#s(literal 0 binary64)
phi0
y
esp
(/.f64 y esp)
(+.f64 phi0 (/.f64 y esp))
(cos.f64 (+.f64 phi0 (/.f64 y esp)))
(atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))

Outputs
g
#s(literal 0 binary64)
phi0
y
esp
(*.f64 (/.f64 #s(literal 1 binary64) (neg.f64 esp)) (neg.f64 y))
(*.f64 (/.f64 #s(literal 1 binary64) esp) y)
(*.f64 #s(literal 1 binary64) (/.f64 y esp))
(*.f64 (neg.f64 y) (/.f64 #s(literal 1 binary64) (neg.f64 esp)))
(*.f64 y (/.f64 #s(literal 1 binary64) esp))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) (neg.f64 y)))
(/.f64 #s(literal 1 binary64) (/.f64 esp y))
(/.f64 (neg.f64 y) (neg.f64 esp))
(/.f64 y esp)
(neg.f64 (/.f64 (neg.f64 y) esp))
(.f64 (.f64 (+.f64 (*.f64 esp phi0) y) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) esp))
(.f64 (neg.f64 (+.f64 (.f64 esp phi0) y)) (/.f64 #s(literal 1 binary64) (neg.f64 esp)))
(.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y))
(.f64 (+.f64 (.f64 esp phi0) y) (/.f64 #s(literal 1 binary64) esp))
(/.f64 (neg.f64 (+.f64 (*.f64 esp phi0) y)) (neg.f64 esp))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) (neg.f64 (+.f64 (*.f64 esp phi0) y))))
(/.f64 #s(literal 1 binary64) (/.f64 esp (+.f64 (*.f64 esp phi0) y)))
(/.f64 (+.f64 (*.f64 esp phi0) y) esp)
(neg.f64 (neg.f64 (+.f64 (/.f64 y esp) phi0)))
(-.f64 (/.f64 (*.f64 esp phi0) esp) (/.f64 (neg.f64 y) esp))
(-.f64 (/.f64 y esp) (neg.f64 phi0))
(-.f64 phi0 (/.f64 (neg.f64 y) esp))
(+.f64 (neg.f64 (neg.f64 phi0)) (/.f64 y esp))
(+.f64 (/.f64 (*.f64 esp phi0) esp) (/.f64 y esp))
(+.f64 (/.f64 y esp) (neg.f64 (neg.f64 phi0)))
(+.f64 (/.f64 y esp) (/.f64 (*.f64 esp phi0) esp))
(+.f64 (/.f64 y esp) phi0)
(+.f64 phi0 (/.f64 y esp))
(neg.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(sin.f64 (neg.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) (PI.f64)))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) (+.f64 (/.f64 y esp) phi0)) (PI.f64)))
(sin.f64 (+.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) (PI.f64))) (PI.f64)))
(sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (-.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(-.f64 (.f64 (cos.f64 (/.f64 (.f64 esp phi0) esp)) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (/.f64 (.f64 esp phi0) esp)) (sin.f64 (/.f64 y esp))))
(-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(-.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) #s(literal 0 binary64)) (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1 binary64)))
(-.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) #s(literal 0 binary64)) (neg.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (/.f64 y esp) phi0)))))
(-.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (neg.f64 (neg.f64 (sin.f64 phi0))) (sin.f64 (/.f64 y esp))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (neg.f64 (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 phi0))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 (neg.f64 y) esp))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (neg.f64 (sin.f64 phi0))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)))))
(cos.f64 (+.f64 (-.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)) (+.f64 (/.f64 y esp) phi0)) (.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (+.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (-.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)) (PI.f64))) (.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (+.f64 (-.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))) (.f64 (PI.f64) #s(literal -1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (PI.f64) (+.f64 (/.f64 y esp) phi0)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0))))
(cos.f64 (neg.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (+.f64 (/.f64 y esp) phi0))
(+.f64 (.f64 (neg.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(+.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 y esp) (.f64 (PI.f64) #s(literal -1/2 binary64))))) (*.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)))
(+.f64 (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 phi0)) (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (/.f64 y esp) phi0))) (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) #s(literal 0 binary64)))
(+.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) #s(literal 0 binary64)) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 phi0)))
(atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0)))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))

eval8.0ms (0.3%)

Memory: -1.7MiB live, 6.1MiB allocated; 0ms collecting garbage
Compiler: Compiled 2 270 to 503 computations (77.8% saved)

prune4.0ms (0.2%)

Memory

-4.0MiB live, 3.9MiB allocated; 0ms collecting garbage

Pruning

8 alts after pruning (7 fresh and 1 done)

	Pruned	Kept	Total
New	56	7	63
Fresh	0	0	0
Picked	0	1	1
Done	0	0	0
Total	56	8	64

Accuracy

79.3%

Counts

64 → 8

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	75.8%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	74.6%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
	67.2%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
▶	65.6%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
▶	63.3%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))
▶	74.3%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))
✓	74.2%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))
▶	74.3%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))

Compiler

Compiled 544 to 171 computations (68.6% saved)

rewrite95.0ms (3.9%)

Memory

-6.7MiB live, 44.2MiB allocated; 5ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	64	461
0	115	353
1	315	316
2	1770	316
0	4190	316

Stop Event

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

Counts

47 → 478

Calls

Call 1

Inputs
g
#s(literal 0 binary64)
phi0
y
esp
(/.f64 y esp)
#s(literal 1 binary64)
(neg.f64 y)
(/.f64 #s(literal 1 binary64) esp)
(*.f64 (/.f64 #s(literal 1 binary64) esp) y)
(/.f64 (neg.f64 y) esp)
(*.f64 esp phi0)
(+.f64 (*.f64 esp phi0) y)
(/.f64 (+.f64 (*.f64 esp phi0) y) esp)
(+.f64 (/.f64 y esp) phi0)
(PI.f64)
#s(literal -1/2 binary64)
(*.f64 (PI.f64) #s(literal -1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 (PI.f64) #s(literal -1/2 binary64)))
(sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(sin.f64 phi0)
(-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 phi0)
(sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(-.f64 phi0 (PI.f64))
(-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64)))
(+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64))
(cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))
(+.f64 phi0 (*.f64 (/.f64 #s(literal 1 binary64) esp) y))
(cos.f64 (+.f64 phi0 (*.f64 (/.f64 #s(literal 1 binary64) esp) y)))
(atan2.f64 g (cos.f64 (+.f64 phi0 (*.f64 (/.f64 #s(literal 1 binary64) esp) y))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))
(cos.f64 (/.f64 (+.f64 (*.f64 esp phi0) y) esp))
(atan2.f64 g (cos.f64 (/.f64 (+.f64 (*.f64 esp phi0) y) esp)))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))
(atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(atan2.f64 g (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))

Outputs
g
#s(literal 0 binary64)
phi0
y
esp
(*.f64 (/.f64 #s(literal 1 binary64) esp) y)
(*.f64 (neg.f64 y) (/.f64 #s(literal -1 binary64) esp))
(*.f64 #s(literal 1 binary64) (/.f64 y esp))
(*.f64 y (/.f64 #s(literal 1 binary64) esp))
(/.f64 (*.f64 y #s(literal -1 binary64)) (neg.f64 esp))
(/.f64 (*.f64 #s(literal -1 binary64) y) (neg.f64 esp))
(/.f64 (neg.f64 y) (neg.f64 esp))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) (neg.f64 y)))
(/.f64 #s(literal 1 binary64) (/.f64 esp y))
(/.f64 y (neg.f64 (neg.f64 esp)))
(/.f64 y esp)
(neg.f64 (/.f64 (neg.f64 y) esp))
#s(literal 1 binary64)
(neg.f64 y)
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) esp))
(*.f64 (/.f64 #s(literal 1 binary64) esp) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) esp))
(pow.f64 esp #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 esp))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 esp)))
(/.f64 #s(literal 1 binary64) (pow.f64 esp #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 esp #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) esp)
(neg.f64 (/.f64 #s(literal -1 binary64) esp))
(*.f64 (/.f64 #s(literal 1 binary64) esp) y)
(*.f64 (neg.f64 y) (/.f64 #s(literal -1 binary64) esp))
(*.f64 #s(literal 1 binary64) (/.f64 y esp))
(*.f64 y (/.f64 #s(literal 1 binary64) esp))
(/.f64 (*.f64 y #s(literal -1 binary64)) (neg.f64 esp))
(/.f64 (*.f64 #s(literal -1 binary64) y) (neg.f64 esp))
(/.f64 (neg.f64 y) (neg.f64 esp))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) (neg.f64 y)))
(/.f64 #s(literal 1 binary64) (/.f64 esp y))
(/.f64 y (neg.f64 (neg.f64 esp)))
(/.f64 y esp)
(neg.f64 (/.f64 (neg.f64 y) esp))
(.f64 (.f64 (neg.f64 y) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) esp))
(*.f64 (/.f64 #s(literal -1 binary64) esp) y)
(*.f64 (/.f64 #s(literal 1 binary64) esp) (neg.f64 y))
(*.f64 (neg.f64 y) (/.f64 #s(literal 1 binary64) esp))
(*.f64 y (/.f64 #s(literal -1 binary64) esp))
(/.f64 (*.f64 (neg.f64 y) #s(literal -1 binary64)) (neg.f64 esp))
(/.f64 (*.f64 (neg.f64 y) #s(literal 1 binary64)) esp)
(/.f64 (neg.f64 y) (neg.f64 (neg.f64 esp)))
(/.f64 (neg.f64 y) esp)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y))
(/.f64 #s(literal 1 binary64) (/.f64 esp (neg.f64 y)))
(/.f64 y (neg.f64 esp))
(neg.f64 (/.f64 y esp))
(*.f64 esp phi0)
(*.f64 phi0 esp)
(neg.f64 (neg.f64 (+.f64 (*.f64 esp phi0) y)))
(-.f64 (*.f64 esp phi0) (neg.f64 y))
(-.f64 y (*.f64 (neg.f64 esp) phi0))
(-.f64 y (*.f64 (neg.f64 phi0) esp))
(-.f64 y (neg.f64 (*.f64 esp phi0)))
(+.f64 (*.f64 esp phi0) y)
(+.f64 y (*.f64 esp phi0))
(.f64 (.f64 (+.f64 (*.f64 esp phi0) y) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) esp))
(.f64 (neg.f64 (+.f64 (.f64 esp phi0) y)) (/.f64 #s(literal -1 binary64) esp))
(.f64 (+.f64 (.f64 esp phi0) y) (/.f64 #s(literal 1 binary64) esp))
(.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y))
(/.f64 (.f64 (+.f64 (.f64 esp phi0) y) #s(literal -1 binary64)) (neg.f64 esp))
(/.f64 (.f64 (+.f64 (.f64 esp phi0) y) #s(literal 1 binary64)) esp)
(/.f64 (+.f64 (.f64 (/.f64 (.f64 esp phi0) esp) (neg.f64 esp)) (neg.f64 y)) (neg.f64 esp))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 esp phi0) esp) esp) y) esp)
(/.f64 (+.f64 (*.f64 phi0 (neg.f64 esp)) (neg.f64 y)) (neg.f64 esp))
(/.f64 (-.f64 (*.f64 phi0 (neg.f64 esp)) y) (neg.f64 esp))
(/.f64 (+.f64 (.f64 (.f64 esp phi0) (neg.f64 esp)) (.f64 (neg.f64 y) esp)) (.f64 esp (neg.f64 esp)))
(/.f64 (+.f64 (.f64 (.f64 esp phi0) esp) (.f64 y esp)) (.f64 esp esp))
(/.f64 (+.f64 (.f64 (.f64 esp phi0) (neg.f64 esp)) (.f64 esp (neg.f64 y))) (.f64 esp (neg.f64 esp)))
(/.f64 (+.f64 (.f64 (.f64 esp phi0) esp) (.f64 esp y)) (.f64 esp esp))
(/.f64 (neg.f64 (+.f64 (*.f64 esp phi0) y)) (neg.f64 esp))
(/.f64 (+.f64 (*.f64 esp phi0) y) (neg.f64 (neg.f64 esp)))
(/.f64 (+.f64 (*.f64 esp phi0) y) esp)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) (neg.f64 (+.f64 (*.f64 esp phi0) y))))
(/.f64 #s(literal 1 binary64) (/.f64 esp (+.f64 (*.f64 esp phi0) y)))
(neg.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))
(-.f64 (/.f64 (*.f64 esp phi0) esp) (/.f64 (neg.f64 y) esp))
(-.f64 (/.f64 y esp) (neg.f64 phi0))
(-.f64 phi0 (/.f64 (neg.f64 y) esp))
(+.f64 (/.f64 (*.f64 esp phi0) esp) (/.f64 y esp))
(+.f64 (/.f64 y esp) (neg.f64 (neg.f64 phi0)))
(+.f64 (/.f64 y esp) (/.f64 (*.f64 esp phi0) esp))
(+.f64 (/.f64 y esp) phi0)
(+.f64 phi0 (/.f64 y esp))
(.f64 (.f64 (+.f64 (*.f64 esp phi0) y) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) esp))
(.f64 (neg.f64 (+.f64 (.f64 esp phi0) y)) (/.f64 #s(literal -1 binary64) esp))
(.f64 (+.f64 (.f64 esp phi0) y) (/.f64 #s(literal 1 binary64) esp))
(.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y))
(/.f64 (.f64 (+.f64 (.f64 esp phi0) y) #s(literal -1 binary64)) (neg.f64 esp))
(/.f64 (.f64 (+.f64 (.f64 esp phi0) y) #s(literal 1 binary64)) esp)
(/.f64 (+.f64 (.f64 (/.f64 (.f64 esp phi0) esp) (neg.f64 esp)) (neg.f64 y)) (neg.f64 esp))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 esp phi0) esp) esp) y) esp)
(/.f64 (+.f64 (*.f64 phi0 (neg.f64 esp)) (neg.f64 y)) (neg.f64 esp))
(/.f64 (-.f64 (*.f64 phi0 (neg.f64 esp)) y) (neg.f64 esp))
(/.f64 (+.f64 (.f64 (.f64 esp phi0) (neg.f64 esp)) (.f64 (neg.f64 y) esp)) (.f64 esp (neg.f64 esp)))
(/.f64 (+.f64 (.f64 (.f64 esp phi0) esp) (.f64 y esp)) (.f64 esp esp))
(/.f64 (+.f64 (.f64 (.f64 esp phi0) (neg.f64 esp)) (.f64 esp (neg.f64 y))) (.f64 esp (neg.f64 esp)))
(/.f64 (+.f64 (.f64 (.f64 esp phi0) esp) (.f64 esp y)) (.f64 esp esp))
(/.f64 (neg.f64 (+.f64 (*.f64 esp phi0) y)) (neg.f64 esp))
(/.f64 (+.f64 (*.f64 esp phi0) y) (neg.f64 (neg.f64 esp)))
(/.f64 (+.f64 (*.f64 esp phi0) y) esp)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) (neg.f64 (+.f64 (*.f64 esp phi0) y))))
(/.f64 #s(literal 1 binary64) (/.f64 esp (+.f64 (*.f64 esp phi0) y)))
(neg.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))
(-.f64 (/.f64 (*.f64 esp phi0) esp) (/.f64 (neg.f64 y) esp))
(-.f64 (/.f64 y esp) (neg.f64 phi0))
(-.f64 phi0 (/.f64 (neg.f64 y) esp))
(+.f64 (/.f64 (*.f64 esp phi0) esp) (/.f64 y esp))
(+.f64 (/.f64 y esp) (neg.f64 (neg.f64 phi0)))
(+.f64 (/.f64 y esp) (/.f64 (*.f64 esp phi0) esp))
(+.f64 (/.f64 y esp) phi0)
(+.f64 phi0 (/.f64 y esp))
(PI.f64)
#s(literal -1/2 binary64)
(.f64 (.f64 #s(literal -1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (neg.f64 (PI.f64)) #s(literal 1/2 binary64))
(.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal -1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (neg.f64 (PI.f64)))
(*.f64 #s(literal -1/2 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal -1/2 binary64))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal -1/2 binary64)))
#s(literal 1/2 binary64)
(.f64 (.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64))
(.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 #s(literal -1/2 binary64) (neg.f64 (PI.f64)))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (*.f64 (+.f64 (/.f64 y esp) phi0) #s(literal 2 binary64)) (PI.f64)) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (neg.f64 (+.f64 (.f64 esp phi0) y)) #s(literal 2 binary64)) (.f64 (PI.f64) (neg.f64 esp))) (.f64 (neg.f64 esp) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 esp phi0) y) #s(literal 2 binary64)) (.f64 (PI.f64) esp)) (.f64 esp #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (neg.f64 (+.f64 (.f64 esp phi0) y)) #s(literal 2 binary64)) (.f64 (neg.f64 esp) (PI.f64))) (.f64 (neg.f64 esp) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 esp phi0) y) #s(literal 2 binary64)) (.f64 esp (PI.f64))) (.f64 esp #s(literal 2 binary64)))
(neg.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi0))
(neg.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) phi0) (/.f64 y esp)))
(-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal -1/2 binary64)))
(-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(-.f64 (/.f64 y esp) (-.f64 (neg.f64 phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(-.f64 (/.f64 y esp) (+.f64 (neg.f64 phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (/.f64 y esp) (neg.f64 (-.f64 phi0 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(-.f64 phi0 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 (/.f64 (.f64 esp phi0) esp) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))
(+.f64 (-.f64 phi0 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (/.f64 y esp))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (/.f64 y esp) phi0))
(+.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (/.f64 y esp) (-.f64 phi0 (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(+.f64 phi0 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(+.f64 phi0 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))
(neg.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (-.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)) (/.f64 (neg.f64 y) esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (.f64 (cos.f64 (/.f64 (.f64 esp phi0) esp)) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (/.f64 (.f64 esp phi0) esp)) (sin.f64 (/.f64 y esp))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))
(-.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))) #s(literal 0 binary64)))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(-.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi0))) (neg.f64 (cos.f64 (/.f64 y esp)))))
(-.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp))))))
(-.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))))
(cos.f64 (-.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)) (/.f64 (neg.f64 y) esp)))
(cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))
(cos.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))))
(cos.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))
(cos.f64 (+.f64 (/.f64 y esp) phi0))
(+.f64 (.f64 (sin.f64 (/.f64 y esp)) (cos.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)))
(+.f64 (.f64 (sin.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (neg.f64 (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 (neg.f64 phi0))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 phi0) (sin.f64 (/.f64 (neg.f64 y) esp))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))))
(+.f64 (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)))
(+.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (.f64 (neg.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0)))) #s(literal 0 binary64)))
(+.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (neg.f64 (.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))) #s(literal 0 binary64))))
(+.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))) (sin.f64 (neg.f64 (PI.f64)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(sin.f64 phi0)
(neg.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))
(-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 (neg.f64 y) esp))
(+.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp))) (.f64 (neg.f64 (sin.f64 (/.f64 (neg.f64 y) esp))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))
(cos.f64 (fabs.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))))
(cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))))
(.f64 (+.f64 (sin.f64 (-.f64 phi0 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64))
(.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0))
(.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi0 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0)) (cos.f64 (+.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi0 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 phi0 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))))) (sin.f64 (+.f64 phi0 (fabs.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi0 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi0 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))))
(+.f64 (.f64 (sin.f64 phi0) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp)))) (.f64 (sin.f64 phi0) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp))) (sin.f64 phi0)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (sin.f64 phi0)))
(+.f64 (/.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 phi0 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) #s(literal 2 binary64)))
(sin.f64 (+.f64 (neg.f64 phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 phi0 (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(cos.f64 (neg.f64 (neg.f64 phi0)))
(cos.f64 (neg.f64 (fabs.f64 phi0)))
(cos.f64 (fabs.f64 (fabs.f64 phi0)))
(cos.f64 (neg.f64 phi0))
(cos.f64 (fabs.f64 phi0))
(cos.f64 phi0)
(+.f64 (.f64 (sin.f64 phi0) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 phi0) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(neg.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(neg.f64 (cos.f64 (/.f64 y esp)))
(sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0))
(*.f64 (cos.f64 phi0) (neg.f64 (cos.f64 (/.f64 y esp))))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) (sin.f64 (-.f64 phi0 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 2 binary64))
(neg.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (-.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)) (/.f64 (neg.f64 y) esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (.f64 (cos.f64 (/.f64 (.f64 esp phi0) esp)) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (/.f64 (.f64 esp phi0) esp)) (sin.f64 (/.f64 y esp))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))
(-.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))) #s(literal 0 binary64)))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(-.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi0))) (neg.f64 (cos.f64 (/.f64 y esp)))))
(-.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp))))))
(-.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))))
(cos.f64 (-.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)) (/.f64 (neg.f64 y) esp)))
(cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))
(cos.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))))
(cos.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))
(cos.f64 (+.f64 (/.f64 y esp) phi0))
(+.f64 (.f64 (sin.f64 (/.f64 y esp)) (cos.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)))
(+.f64 (.f64 (sin.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (neg.f64 (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 (neg.f64 phi0))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 phi0) (sin.f64 (/.f64 (neg.f64 y) esp))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))))
(+.f64 (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)))
(+.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (.f64 (neg.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0)))) #s(literal 0 binary64)))
(+.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (neg.f64 (.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))) #s(literal 0 binary64))))
(+.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))) (sin.f64 (neg.f64 (PI.f64)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(neg.f64 (-.f64 (PI.f64) phi0))
(-.f64 phi0 (neg.f64 (neg.f64 (PI.f64))))
(-.f64 phi0 (PI.f64))
(+.f64 (neg.f64 (PI.f64)) phi0)
(+.f64 phi0 (neg.f64 (PI.f64)))
(neg.f64 (+.f64 (/.f64 y esp) (-.f64 phi0 (PI.f64))))
(neg.f64 (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))
(-.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (neg.f64 (PI.f64)))
(-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64)))
(+.f64 (-.f64 (PI.f64) phi0) (/.f64 (neg.f64 y) esp))
(+.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (PI.f64))
(+.f64 (PI.f64) (-.f64 (/.f64 (neg.f64 y) esp) phi0))
(+.f64 (/.f64 (neg.f64 y) esp) (-.f64 (PI.f64) phi0))
(neg.f64 (-.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)) (/.f64 (neg.f64 y) esp)))
(-.f64 (+.f64 (PI.f64) (/.f64 (neg.f64 y) esp)) (-.f64 phi0 (PI.f64)))
(-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (neg.f64 (PI.f64)))
(-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))
(-.f64 (/.f64 (neg.f64 y) esp) (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))
(+.f64 (+.f64 (PI.f64) (/.f64 (neg.f64 y) esp)) (-.f64 (PI.f64) phi0))
(+.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (-.f64 (PI.f64) (neg.f64 (PI.f64))))
(+.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (+.f64 (PI.f64) (PI.f64)))
(+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (neg.f64 (neg.f64 (PI.f64))))
(+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64))
(+.f64 (PI.f64) (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))))
(+.f64 (/.f64 (neg.f64 y) esp) (+.f64 (-.f64 (PI.f64) phi0) (PI.f64)))
(+.f64 (/.f64 (neg.f64 y) esp) (-.f64 (-.f64 (PI.f64) phi0) (neg.f64 (PI.f64))))
(+.f64 (/.f64 (neg.f64 y) esp) (neg.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (-.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)) (/.f64 (neg.f64 y) esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (.f64 (cos.f64 (/.f64 (.f64 esp phi0) esp)) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (/.f64 (.f64 esp phi0) esp)) (sin.f64 (/.f64 y esp))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))
(-.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))) #s(literal 0 binary64)))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(-.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi0))) (neg.f64 (cos.f64 (/.f64 y esp)))))
(-.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp))))))
(-.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))))
(cos.f64 (-.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)) (/.f64 (neg.f64 y) esp)))
(cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))
(cos.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))))
(cos.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))
(cos.f64 (+.f64 (/.f64 y esp) phi0))
(+.f64 (.f64 (sin.f64 (/.f64 y esp)) (cos.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)))
(+.f64 (.f64 (sin.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (neg.f64 (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 (neg.f64 phi0))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 phi0) (sin.f64 (/.f64 (neg.f64 y) esp))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))))
(+.f64 (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)))
(+.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (.f64 (neg.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0)))) #s(literal 0 binary64)))
(+.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (neg.f64 (.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))) #s(literal 0 binary64))))
(+.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))) (sin.f64 (neg.f64 (PI.f64)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(.f64 (.f64 (+.f64 (*.f64 esp phi0) y) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) esp))
(.f64 (neg.f64 (+.f64 (.f64 esp phi0) y)) (/.f64 #s(literal -1 binary64) esp))
(.f64 (+.f64 (.f64 esp phi0) y) (/.f64 #s(literal 1 binary64) esp))
(.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y))
(/.f64 (.f64 (+.f64 (.f64 esp phi0) y) #s(literal -1 binary64)) (neg.f64 esp))
(/.f64 (.f64 (+.f64 (.f64 esp phi0) y) #s(literal 1 binary64)) esp)
(/.f64 (+.f64 (.f64 (/.f64 (.f64 esp phi0) esp) (neg.f64 esp)) (neg.f64 y)) (neg.f64 esp))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 esp phi0) esp) esp) y) esp)
(/.f64 (+.f64 (*.f64 phi0 (neg.f64 esp)) (neg.f64 y)) (neg.f64 esp))
(/.f64 (-.f64 (*.f64 phi0 (neg.f64 esp)) y) (neg.f64 esp))
(/.f64 (+.f64 (.f64 (.f64 esp phi0) (neg.f64 esp)) (.f64 (neg.f64 y) esp)) (.f64 esp (neg.f64 esp)))
(/.f64 (+.f64 (.f64 (.f64 esp phi0) esp) (.f64 y esp)) (.f64 esp esp))
(/.f64 (+.f64 (.f64 (.f64 esp phi0) (neg.f64 esp)) (.f64 esp (neg.f64 y))) (.f64 esp (neg.f64 esp)))
(/.f64 (+.f64 (.f64 (.f64 esp phi0) esp) (.f64 esp y)) (.f64 esp esp))
(/.f64 (neg.f64 (+.f64 (*.f64 esp phi0) y)) (neg.f64 esp))
(/.f64 (+.f64 (*.f64 esp phi0) y) (neg.f64 (neg.f64 esp)))
(/.f64 (+.f64 (*.f64 esp phi0) y) esp)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) (neg.f64 (+.f64 (*.f64 esp phi0) y))))
(/.f64 #s(literal 1 binary64) (/.f64 esp (+.f64 (*.f64 esp phi0) y)))
(neg.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))
(-.f64 (/.f64 (*.f64 esp phi0) esp) (/.f64 (neg.f64 y) esp))
(-.f64 (/.f64 y esp) (neg.f64 phi0))
(-.f64 phi0 (/.f64 (neg.f64 y) esp))
(+.f64 (/.f64 (*.f64 esp phi0) esp) (/.f64 y esp))
(+.f64 (/.f64 y esp) (neg.f64 (neg.f64 phi0)))
(+.f64 (/.f64 y esp) (/.f64 (*.f64 esp phi0) esp))
(+.f64 (/.f64 y esp) phi0)
(+.f64 phi0 (/.f64 y esp))
(neg.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (-.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)) (/.f64 (neg.f64 y) esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (.f64 (cos.f64 (/.f64 (.f64 esp phi0) esp)) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (/.f64 (.f64 esp phi0) esp)) (sin.f64 (/.f64 y esp))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))
(-.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))) #s(literal 0 binary64)))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(-.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi0))) (neg.f64 (cos.f64 (/.f64 y esp)))))
(-.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp))))))
(-.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))))
(cos.f64 (-.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)) (/.f64 (neg.f64 y) esp)))
(cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))
(cos.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))))
(cos.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))
(cos.f64 (+.f64 (/.f64 y esp) phi0))
(+.f64 (.f64 (sin.f64 (/.f64 y esp)) (cos.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)))
(+.f64 (.f64 (sin.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (neg.f64 (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 (neg.f64 phi0))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 phi0) (sin.f64 (/.f64 (neg.f64 y) esp))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))))
(+.f64 (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)))
(+.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (.f64 (neg.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0)))) #s(literal 0 binary64)))
(+.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (neg.f64 (.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))) #s(literal 0 binary64))))
(+.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))) (sin.f64 (neg.f64 (PI.f64)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0)))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))
(neg.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (-.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)) (/.f64 (neg.f64 y) esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (.f64 (cos.f64 (/.f64 (.f64 esp phi0) esp)) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (/.f64 (.f64 esp phi0) esp)) (sin.f64 (/.f64 y esp))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))
(-.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))) #s(literal 0 binary64)))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(-.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi0))) (neg.f64 (cos.f64 (/.f64 y esp)))))
(-.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp))))))
(-.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))))
(cos.f64 (-.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)) (/.f64 (neg.f64 y) esp)))
(cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))
(cos.f64 (fabs.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))))
(cos.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))
(cos.f64 (+.f64 (/.f64 y esp) phi0))
(+.f64 (.f64 (sin.f64 (/.f64 y esp)) (cos.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)))
(+.f64 (.f64 (sin.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (neg.f64 (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 (neg.f64 phi0))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 phi0) (sin.f64 (/.f64 (neg.f64 y) esp))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))))
(+.f64 (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)))
(+.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (.f64 (neg.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0)))) #s(literal 0 binary64)))
(+.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (neg.f64 (.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))) #s(literal 0 binary64))))
(+.f64 (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -1 binary64)) (.f64 (neg.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))) (sin.f64 (neg.f64 (PI.f64)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (+.f64 (/.f64 y esp) phi0))) (.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0)))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))
(atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0)))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))
(atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0)))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))
(atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0)))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))

eval35.0ms (1.4%)

Memory: -4.7MiB live, 27.2MiB allocated; 2ms collecting garbage
Compiler: Compiled 12 800 to 2 326 computations (81.8% saved)

prune11.0ms (0.5%)

Memory

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

Pruning

19 alts after pruning (15 fresh and 4 done)

	Pruned	Kept	Total
New	258	13	271
Fresh	0	2	2
Picked	2	3	5
Done	0	1	1
Total	260	19	279

Accuracy

79.5%

Counts

279 → 19

Alt Table

Click to see full alt table

Status	Accuracy	Program
	67.8%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))))) (sin.f64 (+.f64 phi0 (fabs.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal 2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))))) (sin.f64 (+.f64 phi0 (fabs.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal 2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	68.0%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 phi0 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 phi0 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	75.9%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	76.4%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	65.9%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)))) #s(literal 0 binary64))
	65.5%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0)))) #s(literal 2 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0)))) #s(literal 2 binary64)))) #s(literal 0 binary64))
▶	65.9%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
▶	76.7%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
▶	75.8%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	74.6%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
	74.6%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))))) #s(literal 0 binary64))
	67.2%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
✓	65.6%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
▶	66.1%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
	59.5%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
✓	63.3%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))
▶	74.3%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))
✓	74.2%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))
✓	74.3%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))

Compiler

Compiled 2 000 to 401 computations (80.0% saved)

rewrite111.0ms (4.5%)

Memory

3.8MiB live, 57.2MiB allocated; 3ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	75	743
0	137	491
1	407	406
2	2094	406
0	4803	406

Stop Event

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

Counts

58 → 534

Calls

Call 1

Inputs
g
#s(literal 0 binary64)
phi0
y
esp
(/.f64 y esp)
#s(literal 1 binary64)
(neg.f64 esp)
(neg.f64 y)
(/.f64 esp y)
(/.f64 #s(literal 1 binary64) (/.f64 esp y))
(/.f64 (neg.f64 y) esp)
(neg.f64 phi0)
(PI.f64)
#s(literal -1/2 binary64)
(*.f64 (PI.f64) #s(literal -1/2 binary64))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(sin.f64 phi0)
(-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 phi0)
(sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 phi0 (PI.f64))
(/.f64 (neg.f64 esp) y)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))
(+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))
(-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))
(cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))
(cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))
(.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))))
(+.f64 (neg.f64 phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(sin.f64 (+.f64 (neg.f64 phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0)
(-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (*.f64 (PI.f64) #s(literal -1/2 binary64)))
(sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(cos.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(atan2.f64 g (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp)))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))
(-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))

Outputs
g
#s(literal 0 binary64)
phi0
y
esp
(.f64 (.f64 #s(literal 1 binary64) y) (/.f64 #s(literal 1 binary64) esp))
(*.f64 (/.f64 #s(literal -1 binary64) esp) (neg.f64 y))
(*.f64 (/.f64 #s(literal 1 binary64) esp) y)
(*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 y) esp))
(*.f64 (neg.f64 y) (/.f64 #s(literal -1 binary64) esp))
(*.f64 #s(literal 1 binary64) (/.f64 y esp))
(*.f64 (/.f64 y esp) #s(literal 1 binary64))
(*.f64 y (/.f64 #s(literal 1 binary64) esp))
(pow.f64 (/.f64 esp y) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 y)) (neg.f64 esp))
(/.f64 (*.f64 y #s(literal 1 binary64)) esp)
(/.f64 (*.f64 #s(literal 1 binary64) y) esp)
(/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y))
(/.f64 #s(literal -1 binary64) (/.f64 (neg.f64 esp) y))
(/.f64 (neg.f64 y) (neg.f64 esp))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 esp) y) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 esp y) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 esp y) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 esp y))
(/.f64 y esp)
(neg.f64 (/.f64 (neg.f64 y) esp))
#s(literal 1 binary64)
(neg.f64 esp)
(neg.f64 y)
(*.f64 (/.f64 #s(literal 1 binary64) y) esp)
(*.f64 (neg.f64 esp) (neg.f64 (/.f64 #s(literal 1 binary64) y)))
(*.f64 (neg.f64 esp) (/.f64 #s(literal 1 binary64) (neg.f64 y)))
(*.f64 esp (/.f64 #s(literal 1 binary64) y))
(/.f64 (*.f64 esp #s(literal 1 binary64)) y)
(/.f64 (neg.f64 esp) (neg.f64 y))
(/.f64 #s(literal 1 binary64) (/.f64 y esp))
(/.f64 esp y)
(neg.f64 (/.f64 (neg.f64 esp) y))
(.f64 (.f64 #s(literal 1 binary64) y) (/.f64 #s(literal 1 binary64) esp))
(*.f64 (/.f64 #s(literal -1 binary64) esp) (neg.f64 y))
(*.f64 (/.f64 #s(literal 1 binary64) esp) y)
(*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 y) esp))
(*.f64 (neg.f64 y) (/.f64 #s(literal -1 binary64) esp))
(*.f64 #s(literal 1 binary64) (/.f64 y esp))
(*.f64 (/.f64 y esp) #s(literal 1 binary64))
(*.f64 y (/.f64 #s(literal 1 binary64) esp))
(pow.f64 (/.f64 esp y) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 y)) (neg.f64 esp))
(/.f64 (*.f64 y #s(literal 1 binary64)) esp)
(/.f64 (*.f64 #s(literal 1 binary64) y) esp)
(/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y))
(/.f64 #s(literal -1 binary64) (/.f64 (neg.f64 esp) y))
(/.f64 (neg.f64 y) (neg.f64 esp))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 esp) y) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 esp y) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 esp y) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 esp y))
(/.f64 y esp)
(neg.f64 (/.f64 (neg.f64 y) esp))
(*.f64 (/.f64 #s(literal -1 binary64) esp) y)
(*.f64 (/.f64 #s(literal 1 binary64) esp) (neg.f64 y))
(*.f64 #s(literal -1 binary64) (/.f64 y esp))
(*.f64 (/.f64 (neg.f64 y) esp) #s(literal 1 binary64))
(*.f64 (neg.f64 y) (/.f64 #s(literal 1 binary64) esp))
(*.f64 #s(literal 1 binary64) (/.f64 (neg.f64 y) esp))
(*.f64 y (/.f64 #s(literal -1 binary64) esp))
(pow.f64 (/.f64 (neg.f64 esp) y) #s(literal -1 binary64))
(/.f64 (*.f64 (neg.f64 y) #s(literal 1 binary64)) esp)
(/.f64 (*.f64 #s(literal 1 binary64) y) (neg.f64 esp))
(/.f64 (/.f64 #s(literal -1 binary64) esp) (/.f64 #s(literal 1 binary64) y))
(/.f64 #s(literal -1 binary64) (/.f64 esp y))
(/.f64 (neg.f64 y) esp)
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 esp y) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (neg.f64 esp) y) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 esp) y) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y))
(/.f64 y (neg.f64 esp))
(neg.f64 (/.f64 y esp))
(neg.f64 phi0)
(PI.f64)
#s(literal -1/2 binary64)
(.f64 (.f64 #s(literal -1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (neg.f64 (PI.f64)) #s(literal 1/2 binary64))
(.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal -1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (neg.f64 (PI.f64)))
(*.f64 #s(literal -1/2 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal -1/2 binary64))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal -1/2 binary64)))
#s(literal 1/2 binary64)
(.f64 (.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64))
(.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 #s(literal -1/2 binary64) (neg.f64 (PI.f64)))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)))
(sin.f64 phi0)
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) esp) y)) esp)
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) esp) y) (neg.f64 esp))
(neg.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 (neg.f64 y) esp))
(neg.f64 (-.f64 (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 (sin.f64 (/.f64 (neg.f64 y) esp))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(cos.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(cos.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (/.f64 y esp))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64))
(.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0))
(.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0)) (cos.f64 (+.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0)) (cos.f64 (+.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi0 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 phi0 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi0 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 phi0 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))))
(+.f64 (.f64 (sin.f64 phi0) (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 phi0) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(+.f64 (.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (sin.f64 phi0)))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))
(sin.f64 (+.f64 (fabs.f64 phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 phi0 (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 (cos.f64 phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 phi0) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (fabs.f64 phi0)))
(cos.f64 (neg.f64 (neg.f64 phi0)))
(cos.f64 (fabs.f64 (fabs.f64 phi0)))
(cos.f64 (fabs.f64 phi0))
(cos.f64 (neg.f64 phi0))
(cos.f64 phi0)
(+.f64 (.f64 (sin.f64 phi0) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)) (.f64 (neg.f64 (sin.f64 phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (neg.f64 (sin.f64 phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)))
(neg.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(neg.f64 (cos.f64 (/.f64 y esp)))
(sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(-.f64 (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(+.f64 (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(.f64 (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0))
(*.f64 (cos.f64 phi0) (neg.f64 (cos.f64 (/.f64 y esp))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(-.f64 (/.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))
(+.f64 (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (.f64 (neg.f64 (sin.f64 phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0))))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(neg.f64 (-.f64 (PI.f64) phi0))
(-.f64 phi0 (neg.f64 (neg.f64 (PI.f64))))
(-.f64 phi0 (PI.f64))
(+.f64 (neg.f64 (PI.f64)) phi0)
(+.f64 phi0 (neg.f64 (PI.f64)))
(*.f64 (/.f64 #s(literal 1 binary64) y) (neg.f64 esp))
(*.f64 (neg.f64 esp) (/.f64 #s(literal 1 binary64) y))
(*.f64 esp (neg.f64 (/.f64 #s(literal 1 binary64) y)))
(*.f64 esp (/.f64 #s(literal 1 binary64) (neg.f64 y)))
(/.f64 (*.f64 (neg.f64 esp) #s(literal 1 binary64)) y)
(/.f64 (neg.f64 esp) y)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 y) esp))
(/.f64 esp (neg.f64 y))
(neg.f64 (/.f64 esp y))
(*.f64 (/.f64 #s(literal -1 binary64) esp) y)
(*.f64 (/.f64 #s(literal 1 binary64) esp) (neg.f64 y))
(*.f64 #s(literal -1 binary64) (/.f64 y esp))
(*.f64 (/.f64 (neg.f64 y) esp) #s(literal 1 binary64))
(*.f64 (neg.f64 y) (/.f64 #s(literal 1 binary64) esp))
(*.f64 #s(literal 1 binary64) (/.f64 (neg.f64 y) esp))
(*.f64 y (/.f64 #s(literal -1 binary64) esp))
(pow.f64 (/.f64 (neg.f64 esp) y) #s(literal -1 binary64))
(/.f64 (*.f64 (neg.f64 y) #s(literal 1 binary64)) esp)
(/.f64 (*.f64 #s(literal 1 binary64) y) (neg.f64 esp))
(/.f64 (/.f64 #s(literal -1 binary64) esp) (/.f64 #s(literal 1 binary64) y))
(/.f64 #s(literal -1 binary64) (/.f64 esp y))
(/.f64 (neg.f64 y) esp)
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 esp y) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (neg.f64 esp) y) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 esp) y) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y))
(/.f64 y (neg.f64 esp))
(neg.f64 (/.f64 y esp))
(.f64 (+.f64 (.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) esp) y) (/.f64 #s(literal 1 binary64) esp))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 (neg.f64 esp) y)) #s(literal -1 binary64)) (/.f64 (neg.f64 esp) y))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 esp)) (neg.f64 y)) (neg.f64 esp))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 esp y)) #s(literal 1 binary64)) (/.f64 esp y))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 esp y)) #s(literal -1 binary64)) (/.f64 esp y))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 (neg.f64 esp) y)) #s(literal 1 binary64)) (/.f64 (neg.f64 esp) y))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 esp)) y) (neg.f64 esp))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) esp) y)) (neg.f64 esp))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) esp) y) esp)
(/.f64 #s(literal 1 binary64) (/.f64 esp (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) esp) y)))
(neg.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 (neg.f64 y) esp))
(-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(+.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) esp) esp) (/.f64 y esp))
(+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 (neg.f64 (/.f64 #s(literal -1 binary64) esp)) y))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))
(+.f64 (/.f64 y esp) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(.f64 (+.f64 (.f64 (-.f64 phi0 (PI.f64)) esp) y) (/.f64 #s(literal 1 binary64) esp))
(/.f64 (+.f64 (*.f64 (-.f64 phi0 (PI.f64)) (/.f64 (neg.f64 esp) y)) #s(literal -1 binary64)) (/.f64 (neg.f64 esp) y))
(/.f64 (+.f64 (*.f64 (-.f64 phi0 (PI.f64)) (neg.f64 esp)) (neg.f64 y)) (neg.f64 esp))
(/.f64 (+.f64 (*.f64 (-.f64 phi0 (PI.f64)) (/.f64 esp y)) #s(literal 1 binary64)) (/.f64 esp y))
(/.f64 (-.f64 (*.f64 (-.f64 phi0 (PI.f64)) (neg.f64 esp)) y) (neg.f64 esp))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 phi0 (PI.f64)) esp) y)) (neg.f64 esp))
(/.f64 (+.f64 (*.f64 (-.f64 phi0 (PI.f64)) esp) y) esp)
(/.f64 #s(literal 1 binary64) (/.f64 esp (+.f64 (*.f64 (-.f64 phi0 (PI.f64)) esp) y)))
(neg.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))
(-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))
(-.f64 (-.f64 phi0 (PI.f64)) (/.f64 (neg.f64 y) esp))
(-.f64 (/.f64 y esp) (-.f64 (PI.f64) phi0))
(-.f64 phi0 (-.f64 (PI.f64) (/.f64 y esp)))
(+.f64 (/.f64 (*.f64 (-.f64 phi0 (PI.f64)) esp) esp) (/.f64 y esp))
(+.f64 (+.f64 (/.f64 y esp) phi0) (neg.f64 (PI.f64)))
(+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))
(+.f64 (/.f64 y esp) (-.f64 phi0 (PI.f64)))
(+.f64 phi0 (+.f64 (neg.f64 (PI.f64)) (/.f64 y esp)))
(+.f64 phi0 (-.f64 (neg.f64 (PI.f64)) (/.f64 (neg.f64 y) esp)))
(+.f64 phi0 (neg.f64 (-.f64 (PI.f64) (/.f64 y esp))))
(/.f64 (-.f64 (*.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64))) (/.f64 (neg.f64 esp) y)) #s(literal -1 binary64)) (/.f64 (neg.f64 esp) y))
(/.f64 (-.f64 (*.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64))) (neg.f64 esp)) (neg.f64 y)) (neg.f64 esp))
(/.f64 (-.f64 (*.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64))) (/.f64 esp y)) #s(literal 1 binary64)) (/.f64 esp y))
(/.f64 (-.f64 (*.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64))) esp) y) esp)
(/.f64 (-.f64 (.f64 (PI.f64) esp) (+.f64 (.f64 (-.f64 phi0 (PI.f64)) esp) y)) esp)
(neg.f64 (-.f64 (/.f64 y esp) (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))))
(-.f64 (-.f64 (PI.f64) (/.f64 y esp)) (-.f64 phi0 (PI.f64)))
(-.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64))) (/.f64 y esp))
(-.f64 (PI.f64) (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64)))
(+.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64))) (/.f64 (neg.f64 y) esp))
(+.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0) (PI.f64))
(+.f64 (-.f64 (PI.f64) phi0) (-.f64 (PI.f64) (/.f64 y esp)))
(+.f64 (PI.f64) (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))
(neg.f64 (-.f64 (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 (sin.f64 (/.f64 (neg.f64 y) esp))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(cos.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(cos.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (/.f64 y esp))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (+.f64 (-.f64 (/.f64 y esp) (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (-.f64 (PI.f64) (-.f64 phi0 (PI.f64))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) (-.f64 phi0 (PI.f64))) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (neg.f64 (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64))))
(-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 #s(literal 0 binary64) (sin.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))))
(-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 (/.f64 y esp) (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))))))
(cos.f64 (-.f64 (/.f64 y esp) (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))))
(cos.f64 (fabs.f64 (-.f64 (/.f64 y esp) (-.f64 (PI.f64) (-.f64 phi0 (PI.f64))))))
(cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) (-.f64 phi0 (PI.f64))))
(+.f64 (.f64 (sin.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) (-.f64 phi0 (PI.f64)))) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (-.f64 (/.f64 y esp) (-.f64 (PI.f64) (-.f64 phi0 (PI.f64))))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (sin.f64 (/.f64 y esp))))
(+.f64 (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)) (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))))
(+.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))
(.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64))
(.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0))
(.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0)) (cos.f64 (+.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0)) (cos.f64 (+.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi0 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 phi0 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi0 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 phi0 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))))
(+.f64 (.f64 (sin.f64 phi0) (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 phi0) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(+.f64 (.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (sin.f64 phi0)))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))
(neg.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (neg.f64 phi0)))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (neg.f64 phi0)))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi0)
(-.f64 (neg.f64 phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 phi0))
(+.f64 (neg.f64 phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(sin.f64 (+.f64 (fabs.f64 phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 phi0 (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 (cos.f64 phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 phi0) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (fabs.f64 phi0)))
(cos.f64 (neg.f64 (neg.f64 phi0)))
(cos.f64 (fabs.f64 (fabs.f64 phi0)))
(cos.f64 (fabs.f64 phi0))
(cos.f64 (neg.f64 phi0))
(cos.f64 phi0)
(+.f64 (.f64 (sin.f64 phi0) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)) (.f64 (neg.f64 (sin.f64 phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (neg.f64 (sin.f64 phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)))
(/.f64 (+.f64 (*.f64 phi0 (/.f64 (neg.f64 esp) y)) #s(literal -1 binary64)) (/.f64 (neg.f64 esp) y))
(/.f64 (+.f64 (*.f64 phi0 (neg.f64 esp)) (neg.f64 y)) (neg.f64 esp))
(/.f64 (+.f64 (*.f64 phi0 (/.f64 esp y)) #s(literal 1 binary64)) (/.f64 esp y))
(/.f64 (+.f64 (*.f64 phi0 esp) y) esp)
(neg.f64 (-.f64 (neg.f64 phi0) (/.f64 y esp)))
(-.f64 (/.f64 y esp) (neg.f64 phi0))
(-.f64 phi0 (/.f64 (neg.f64 y) esp))
(+.f64 (/.f64 y esp) (neg.f64 (neg.f64 phi0)))
(+.f64 (/.f64 y esp) phi0)
(+.f64 phi0 (/.f64 y esp))
(/.f64 (+.f64 (.f64 phi0 esp) (+.f64 (.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) esp) y)) esp)
(neg.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi0))
(neg.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) phi0) (/.f64 y esp)))
(-.f64 (-.f64 phi0 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (/.f64 (neg.f64 y) esp))
(-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal -1/2 binary64)))
(-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(-.f64 (/.f64 y esp) (-.f64 (neg.f64 phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(-.f64 (/.f64 y esp) (+.f64 (neg.f64 phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (/.f64 y esp) (neg.f64 (-.f64 phi0 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(-.f64 phi0 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 (-.f64 phi0 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (/.f64 y esp))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (/.f64 y esp) phi0))
(+.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))) phi0)
(+.f64 (/.f64 y esp) (-.f64 phi0 (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(+.f64 phi0 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) #s(literal 2 binary64)) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))) #s(literal 4 binary64))
(neg.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (.f64 (cos.f64 phi0) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 phi0) (sin.f64 (/.f64 y esp))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))
(-.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(-.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi0))) (neg.f64 (cos.f64 (/.f64 y esp)))))
(-.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp))))))
(-.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0)))
(cos.f64 (neg.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (+.f64 (/.f64 y esp) phi0))
(+.f64 (.f64 (sin.f64 (/.f64 y esp)) (cos.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (neg.f64 (sin.f64 phi0))))
(+.f64 (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (cos.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)))
(+.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))))
(+.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (*.f64 (cos.f64 phi0) (cos.f64 (/.f64 y esp))))
(+.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0)))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) esp) y)) esp)
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) esp) y) (neg.f64 esp))
(neg.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 (neg.f64 y) esp))
(neg.f64 (-.f64 (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 (sin.f64 (/.f64 (neg.f64 y) esp))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(cos.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(cos.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (/.f64 y esp))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64))
(.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0))
(.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0)) (cos.f64 (+.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0)) (cos.f64 (+.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi0 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 phi0 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi0 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 phi0 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))))
(+.f64 (.f64 (sin.f64 phi0) (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 phi0) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(+.f64 (.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (sin.f64 phi0)))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) #s(literal 2 binary64)))
(neg.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(neg.f64 (cos.f64 (/.f64 y esp)))
(sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(-.f64 (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(+.f64 (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(.f64 (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0))
(*.f64 (cos.f64 phi0) (neg.f64 (cos.f64 (/.f64 y esp))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(-.f64 (/.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))
(+.f64 (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (.f64 (neg.f64 (sin.f64 phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0))))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) #s(literal 2 binary64)) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))) #s(literal 4 binary64))
(neg.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (.f64 (cos.f64 phi0) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 phi0) (sin.f64 (/.f64 y esp))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))
(-.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(-.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi0))) (neg.f64 (cos.f64 (/.f64 y esp)))))
(-.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp))))))
(-.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0)))
(cos.f64 (neg.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (+.f64 (/.f64 y esp) phi0))
(+.f64 (.f64 (sin.f64 (/.f64 y esp)) (cos.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (neg.f64 (sin.f64 phi0))))
(+.f64 (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (cos.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)))
(+.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))))
(+.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (*.f64 (cos.f64 phi0) (cos.f64 (/.f64 y esp))))
(+.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0)))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))
(atan2.f64 g (cos.f64 (-.f64 (/.f64 y esp) (-.f64 (PI.f64) (-.f64 phi0 (PI.f64))))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (-.f64 (/.f64 y esp) (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (-.f64 (/.f64 y esp) (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))))) #s(literal 0 binary64))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) #s(literal 2 binary64)) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))) #s(literal 4 binary64))
(neg.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (.f64 (cos.f64 phi0) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 phi0) (sin.f64 (/.f64 y esp))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))
(-.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(-.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi0))) (neg.f64 (cos.f64 (/.f64 y esp)))))
(-.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp))))))
(-.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0)))
(cos.f64 (neg.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (+.f64 (/.f64 y esp) phi0))
(+.f64 (.f64 (sin.f64 (/.f64 y esp)) (cos.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (neg.f64 (sin.f64 phi0))))
(+.f64 (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (cos.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)))
(+.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))))
(+.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (*.f64 (cos.f64 phi0) (cos.f64 (/.f64 y esp))))
(+.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0)))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))
(.f64 (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0))
(*.f64 (cos.f64 phi0) (neg.f64 (cos.f64 (/.f64 y esp))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(-.f64 (/.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))
(+.f64 (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (.f64 (neg.f64 (sin.f64 phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0))))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) #s(literal 2 binary64)) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))) #s(literal 4 binary64))
(neg.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (.f64 (cos.f64 phi0) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 phi0) (sin.f64 (/.f64 y esp))))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))
(-.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(-.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi0))) (neg.f64 (cos.f64 (/.f64 y esp)))))
(-.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp))))))
(-.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0)))
(cos.f64 (neg.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (+.f64 (/.f64 y esp) phi0))
(+.f64 (.f64 (sin.f64 (/.f64 y esp)) (cos.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)))
(+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (neg.f64 (sin.f64 phi0))))
(+.f64 (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (cos.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)))
(+.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 (+.f64 (/.f64 y esp) phi0)))))
(+.f64 (.f64 (sin.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (*.f64 (cos.f64 phi0) (cos.f64 (/.f64 y esp))))
(+.f64 (.f64 (cos.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi0)) (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0)))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))

eval67.0ms (2.7%)

Memory: -5.0MiB live, 50.9MiB allocated; 6ms collecting garbage
Compiler: Compiled 34 521 to 4 221 computations (87.8% saved)

prune17.0ms (0.7%)

Memory

2.0MiB live, 19.1MiB allocated; 0ms collecting garbage

Pruning

25 alts after pruning (18 fresh and 7 done)

	Pruned	Kept	Total
New	494	16	510
Fresh	8	2	10
Picked	2	3	5
Done	0	4	4
Total	504	25	529

Accuracy

79.6%

Counts

529 → 25

Alt Table

Click to see full alt table

Status	Accuracy	Program
	67.0%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) #s(literal 0 binary64))) (atan2.f64 g (/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) #s(literal 0 binary64))
	67.0%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0)) (cos.f64 (+.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0))) #s(literal 2 binary64)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0)) (cos.f64 (+.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0))) #s(literal 2 binary64)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	64.1%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
▶	67.8%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	69.0%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	68.0%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	68.7%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
▶	66.7%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	76.4%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
▶	76.7%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	65.5%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0)))) #s(literal 2 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0)))) #s(literal 2 binary64)))) #s(literal 0 binary64))
	65.9%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0)) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0)) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
✓	75.8%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
▶	74.6%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
	64.1%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))
	74.6%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (+.f64 (.f64 (cos.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (sin.f64 (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (+.f64 (.f64 (cos.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (sin.f64 (/.f64 y esp))))) #s(literal 0 binary64))
▶	67.2%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
	66.5%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
✓	65.6%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
✓	66.1%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
	59.5%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
✓	63.3%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))
✓	74.3%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))
✓	74.2%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))
✓	74.3%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))

Compiler

Compiled 2 816 to 496 computations (82.4% saved)

rewrite122.0ms (4.9%)

Memory

0.6MiB live, 64.7MiB allocated; 5ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	80	906
0	146	865
1	408	509
2	2206	509
0	4786	509

Stop Event

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

Counts

63 → 576

Calls

Call 1

Inputs
g
#s(literal 0 binary64)
phi0
y
esp
(/.f64 y esp)
(neg.f64 y)
(/.f64 esp y)
(/.f64 (neg.f64 y) esp)
(neg.f64 phi0)
(PI.f64)
#s(literal -1/2 binary64)
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(-.f64 phi0 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (/.f64 y esp))
(sin.f64 (/.f64 y esp))
(sin.f64 phi0)
(-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(cos.f64 phi0)
(sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0))
(*.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0))
(-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))
(atan2.f64 g (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
#s(literal -1 binary64)
(*.f64 #s(literal -1/2 binary64) (PI.f64))
#s(literal 2 binary64)
(-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64)))
(sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))
(+.f64 (neg.f64 phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(sin.f64 (+.f64 (neg.f64 phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(/.f64 #s(literal -1 binary64) (/.f64 esp y))
(fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))))
(/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))
(atan2.f64 g (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))

Outputs
g
#s(literal 0 binary64)
phi0
y
esp
(*.f64 (/.f64 #s(literal -1 binary64) esp) (neg.f64 y))
(*.f64 (/.f64 #s(literal 1 binary64) esp) y)
(*.f64 #s(literal 1 binary64) (/.f64 y esp))
(*.f64 (neg.f64 y) (/.f64 #s(literal -1 binary64) esp))
(*.f64 y (/.f64 #s(literal 1 binary64) esp))
(pow.f64 (/.f64 esp y) #s(literal -1 binary64))
(/.f64 (*.f64 y #s(literal 1 binary64)) esp)
(/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 esp y) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 esp y))
(/.f64 #s(literal -1 binary64) (/.f64 (neg.f64 esp) y))
(/.f64 (neg.f64 y) (neg.f64 esp))
(/.f64 y (neg.f64 (neg.f64 esp)))
(/.f64 y esp)
(neg.f64 (/.f64 (neg.f64 y) esp))
(neg.f64 y)
(*.f64 (/.f64 #s(literal 1 binary64) y) esp)
(*.f64 (neg.f64 esp) (/.f64 #s(literal 1 binary64) (neg.f64 y)))
(*.f64 esp (/.f64 #s(literal 1 binary64) y))
(/.f64 (*.f64 esp #s(literal 1 binary64)) y)
(/.f64 (neg.f64 (neg.f64 esp)) y)
(/.f64 (neg.f64 esp) (neg.f64 y))
(/.f64 #s(literal 1 binary64) (/.f64 y esp))
(/.f64 esp y)
(neg.f64 (/.f64 (neg.f64 esp) y))
(*.f64 (/.f64 #s(literal -1 binary64) esp) y)
(*.f64 (/.f64 #s(literal 1 binary64) esp) (neg.f64 y))
(*.f64 #s(literal 1 binary64) (/.f64 (neg.f64 y) esp))
(*.f64 #s(literal -1 binary64) (/.f64 y esp))
(*.f64 (neg.f64 y) (/.f64 #s(literal 1 binary64) esp))
(*.f64 (/.f64 y esp) #s(literal -1 binary64))
(*.f64 y (neg.f64 (/.f64 #s(literal 1 binary64) esp)))
(*.f64 y (/.f64 #s(literal -1 binary64) esp))
(pow.f64 (/.f64 (neg.f64 esp) y) #s(literal -1 binary64))
(/.f64 (*.f64 (neg.f64 y) #s(literal 1 binary64)) esp)
(/.f64 (*.f64 #s(literal -1 binary64) y) esp)
(/.f64 (/.f64 #s(literal -1 binary64) esp) (/.f64 #s(literal 1 binary64) y))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 esp) y) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 esp y) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y))
(/.f64 #s(literal -1 binary64) (/.f64 esp y))
(/.f64 (neg.f64 y) (neg.f64 (neg.f64 esp)))
(/.f64 (neg.f64 y) esp)
(/.f64 y (neg.f64 esp))
(neg.f64 (/.f64 y esp))
(neg.f64 phi0)
(PI.f64)
#s(literal -1/2 binary64)
#s(literal 1/2 binary64)
(.f64 (.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64))
(.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 #s(literal -1/2 binary64) (neg.f64 (PI.f64)))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(/.f64 (*.f64 (PI.f64) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)))
(neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))
(-.f64 phi0 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) phi0)
(+.f64 phi0 (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(neg.f64 (+.f64 (/.f64 y esp) (-.f64 phi0 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(neg.f64 (+.f64 (-.f64 phi0 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 y esp)))
(-.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (/.f64 (neg.f64 y) esp))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (-.f64 (/.f64 (neg.f64 y) esp) phi0))
(+.f64 (/.f64 (neg.f64 y) esp) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))
(neg.f64 (sin.f64 (+.f64 (-.f64 phi0 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 y esp))))
(sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0)) (sin.f64 (/.f64 (neg.f64 y) esp))) (*.f64 (neg.f64 (cos.f64 phi0)) (cos.f64 (/.f64 y esp))))
(+.f64 (.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (.f64 (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0)) (sin.f64 (/.f64 (neg.f64 y) esp))) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi0)) (cos.f64 (/.f64 y esp)))))
(+.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0)) (sin.f64 (/.f64 (neg.f64 y) esp))) (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(+.f64 (.f64 (cos.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0)) (sin.f64 (/.f64 (neg.f64 y) esp))) (*.f64 (cos.f64 phi0) (cos.f64 (/.f64 y esp))))
(sin.f64 (+.f64 (fabs.f64 (/.f64 y esp)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(cos.f64 (neg.f64 (fabs.f64 (/.f64 y esp))))
(cos.f64 (fabs.f64 (fabs.f64 (/.f64 y esp))))
(cos.f64 (fabs.f64 (/.f64 y esp)))
(cos.f64 (/.f64 (neg.f64 y) esp))
(cos.f64 (/.f64 y esp))
(+.f64 (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp))))
(sin.f64 (/.f64 y esp))
(sin.f64 phi0)
(/.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (neg.f64 esp)) (neg.f64 y)) (neg.f64 esp))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) esp) y) esp)
(neg.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))
(-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 (neg.f64 y) esp))
(+.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(sin.f64 (+.f64 (fabs.f64 phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 phi0 (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (.f64 (neg.f64 (cos.f64 phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (.f64 (cos.f64 phi0) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (fabs.f64 phi0)))
(cos.f64 (neg.f64 (neg.f64 phi0)))
(cos.f64 (fabs.f64 (fabs.f64 phi0)))
(cos.f64 (fabs.f64 phi0))
(cos.f64 (neg.f64 phi0))
(cos.f64 phi0)
(+.f64 (.f64 (sin.f64 phi0) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))))
(+.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)))
(neg.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(neg.f64 (cos.f64 (/.f64 y esp)))
(sin.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))
(-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp)))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (.f64 (PI.f64) #s(literal 0 binary64)))))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0))
(*.f64 (cos.f64 phi0) (neg.f64 (cos.f64 (/.f64 y esp))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (fabs.f64 phi0))) (sin.f64 (+.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (fabs.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (neg.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) phi0)) (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))))))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64)))))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))) #s(literal 2 binary64)))
(+.f64 (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))))) (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0))))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(*.f64 (+.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 phi0) (cos.f64 (/.f64 y esp)))
(*.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi0) (fabs.f64 (/.f64 y esp)))) (cos.f64 (-.f64 (fabs.f64 phi0) (fabs.f64 (/.f64 y esp))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi0) (/.f64 (neg.f64 y) esp))) (cos.f64 (-.f64 (fabs.f64 phi0) (/.f64 (neg.f64 y) esp)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi0) (/.f64 y esp))) (cos.f64 (-.f64 (fabs.f64 phi0) (/.f64 y esp)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi0) (fabs.f64 (/.f64 y esp)))) (cos.f64 (-.f64 (neg.f64 phi0) (fabs.f64 (/.f64 y esp))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi0) (/.f64 (neg.f64 y) esp))) (cos.f64 (-.f64 (neg.f64 phi0) (/.f64 (neg.f64 y) esp)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi0) (/.f64 y esp))) (cos.f64 (-.f64 (neg.f64 phi0) (/.f64 y esp)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi0 (fabs.f64 (/.f64 y esp)))) (cos.f64 (-.f64 phi0 (fabs.f64 (/.f64 y esp))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp))) (cos.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) (cos.f64 (-.f64 phi0 (/.f64 y esp)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (/.f64 y esp)) (fabs.f64 phi0))) (cos.f64 (-.f64 (fabs.f64 (/.f64 y esp)) (fabs.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (/.f64 y esp)) (neg.f64 phi0))) (cos.f64 (-.f64 (fabs.f64 (/.f64 y esp)) (neg.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (/.f64 y esp)) phi0)) (cos.f64 (-.f64 (fabs.f64 (/.f64 y esp)) phi0))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (/.f64 (neg.f64 y) esp) (fabs.f64 phi0))) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (fabs.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0)) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (neg.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (/.f64 (neg.f64 y) esp) phi0)) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (/.f64 y esp) (fabs.f64 phi0))) (cos.f64 (-.f64 (/.f64 y esp) (fabs.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (fabs.f64 (/.f64 y esp)))) (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (fabs.f64 (/.f64 y esp))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (/.f64 (neg.f64 y) esp))) (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (/.f64 (neg.f64 y) esp)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (/.f64 y esp))) (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (/.f64 y esp)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (fabs.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (fabs.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0)) (sin.f64 (+.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0)))))
(/.f64 (+.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 2 binary64))
(+.f64 (/.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) #s(literal 2 binary64)))
(*.f64 (-.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 phi0) (sin.f64 (/.f64 y esp)))
(*.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi0 (/.f64 y esp))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi0) (cos.f64 (/.f64 y esp))) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0)))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0))) (-.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0)))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (+.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0))))) #s(literal 4 binary64))
(neg.f64 (neg.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))))
(sin.f64 (+.f64 (+.f64 (/.f64 y esp) phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(-.f64 (.f64 (cos.f64 phi0) (cos.f64 (/.f64 y esp))) (.f64 (neg.f64 (sin.f64 (/.f64 (neg.f64 y) esp))) (sin.f64 phi0)))
(-.f64 (.f64 (cos.f64 phi0) (cos.f64 (/.f64 y esp))) (neg.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp)))))
(-.f64 (.f64 (cos.f64 phi0) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 phi0) (sin.f64 (/.f64 y esp))))
(cos.f64 (neg.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (fabs.f64 (+.f64 (/.f64 y esp) phi0)))
(cos.f64 (+.f64 (/.f64 y esp) phi0))
(+.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (.f64 (cos.f64 phi0) (cos.f64 (/.f64 y esp))))
(+.f64 (.f64 (cos.f64 phi0) (cos.f64 (/.f64 y esp))) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))))
(atan2.f64 g (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 0 binary64))
(atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0)))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 0 binary64))
#s(literal -1 binary64)
(.f64 (.f64 #s(literal -1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (neg.f64 (PI.f64)) #s(literal 1/2 binary64))
(.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal -1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (neg.f64 (PI.f64)))
(*.f64 #s(literal -1/2 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal -1/2 binary64))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal -1/2 binary64)))
#s(literal 2 binary64)
(/.f64 (+.f64 (*.f64 (/.f64 y esp) #s(literal 2 binary64)) (PI.f64)) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 esp)) y) (neg.f64 esp))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) esp) (neg.f64 y)) esp)
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 (neg.f64 esp) y)) #s(literal 1 binary64)) (/.f64 (neg.f64 esp) y))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 esp y)) #s(literal -1 binary64)) (/.f64 esp y))
(/.f64 (+.f64 (.f64 (neg.f64 y) #s(literal 2 binary64)) (.f64 (PI.f64) (neg.f64 esp))) (*.f64 (neg.f64 esp) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 y #s(literal 2 binary64)) (.f64 (PI.f64) esp)) (*.f64 esp #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (neg.f64 y) #s(literal 2 binary64)) (.f64 (neg.f64 esp) (PI.f64))) (*.f64 (neg.f64 esp) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 y #s(literal 2 binary64)) (.f64 esp (PI.f64))) (*.f64 esp #s(literal 2 binary64)))
(neg.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 (neg.f64 y) esp))
(-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))
(+.f64 (/.f64 y esp) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) #s(literal 2 binary64)) (PI.f64)) #s(literal 2 binary64))
(neg.f64 (+.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))
(neg.f64 (-.f64 (*.f64 (PI.f64) #s(literal 0 binary64)) (/.f64 (neg.f64 y) esp)))
(neg.f64 (neg.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64)))))
(-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (.f64 #s(literal -1/2 binary64) (PI.f64)))
(-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64)))
(+.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))
(+.f64 (/.f64 (neg.f64 y) esp) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (.f64 #s(literal -1/2 binary64) (PI.f64))))
(+.f64 (/.f64 (neg.f64 y) esp) (neg.f64 (*.f64 (PI.f64) #s(literal 0 binary64))))
(+.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64)))
(neg.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (neg.f64 (cos.f64 (/.f64 y esp))))))
(neg.f64 (sin.f64 (neg.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))))
(neg.f64 (sin.f64 (/.f64 y esp)))
(sin.f64 (+.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (/.f64 y esp) (PI.f64)))
(sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))
(sin.f64 (/.f64 (neg.f64 y) esp))
(-.f64 (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (cos.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp))))
(-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))))
(-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp))) (.f64 (neg.f64 (sin.f64 (/.f64 (neg.f64 y) esp))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(cos.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(cos.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(cos.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (neg.f64 (sin.f64 (/.f64 (neg.f64 y) esp))) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (neg.f64 (cos.f64 (/.f64 y esp)))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))))
(neg.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (neg.f64 phi0)))
(neg.f64 (-.f64 phi0 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (neg.f64 phi0)))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi0)
(-.f64 (neg.f64 phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 phi0))
(+.f64 (neg.f64 phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(sin.f64 (+.f64 (fabs.f64 phi0) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 phi0 (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (.f64 (neg.f64 (cos.f64 phi0)) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (.f64 (cos.f64 phi0) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (fabs.f64 phi0)))
(cos.f64 (neg.f64 (neg.f64 phi0)))
(cos.f64 (fabs.f64 (fabs.f64 phi0)))
(cos.f64 (fabs.f64 phi0))
(cos.f64 (neg.f64 phi0))
(cos.f64 phi0)
(+.f64 (.f64 (sin.f64 phi0) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))))
(+.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)))
(.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))) #s(literal -1/2 binary64))
(*.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp)))
(.f64 (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (*.f64 (PI.f64) #s(literal 0 binary64))))) #s(literal 1/2 binary64))
(.f64 (+.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 phi0 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 phi0))
(.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 1/2 binary64))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) phi0) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 phi0 (-.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) phi0) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 phi0 (-.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(.f64 (sin.f64 phi0) (cos.f64 (neg.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(*.f64 (sin.f64 phi0) (sin.f64 (/.f64 (neg.f64 y) esp)))
(*.f64 (sin.f64 (/.f64 y esp)) (neg.f64 (sin.f64 phi0)))
(.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)) (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 (PI.f64) #s(literal 0 binary64))) phi0)) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (neg.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))))))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(neg.f64 (.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal -2 binary64)))
(neg.f64 (/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))))) #s(literal 2 binary64)))
(neg.f64 (*.f64 (sin.f64 phi0) (sin.f64 (/.f64 y esp))))
(-.f64 (/.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) #s(literal 2 binary64)))
(-.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (neg.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64))))
(-.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (/.f64 (neg.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 2 binary64)))
(+.f64 (.f64 (sin.f64 phi0) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp)))) (.f64 (sin.f64 phi0) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(+.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp))) (sin.f64 phi0)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (sin.f64 phi0)))
(+.f64 (/.f64 (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))
(+.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)) (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)))
(.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (.f64 (PI.f64) #s(literal 0 binary64)))))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0))
(*.f64 (cos.f64 phi0) (neg.f64 (cos.f64 (/.f64 y esp))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (fabs.f64 phi0))) (sin.f64 (+.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (fabs.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (neg.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) phi0)) (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))))))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64)))))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))) #s(literal 2 binary64)))
(+.f64 (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))))) (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0))))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(*.f64 (/.f64 #s(literal -1 binary64) esp) y)
(*.f64 (/.f64 #s(literal 1 binary64) esp) (neg.f64 y))
(*.f64 #s(literal 1 binary64) (/.f64 (neg.f64 y) esp))
(*.f64 #s(literal -1 binary64) (/.f64 y esp))
(*.f64 (neg.f64 y) (/.f64 #s(literal 1 binary64) esp))
(*.f64 (/.f64 y esp) #s(literal -1 binary64))
(*.f64 y (neg.f64 (/.f64 #s(literal 1 binary64) esp)))
(*.f64 y (/.f64 #s(literal -1 binary64) esp))
(pow.f64 (/.f64 (neg.f64 esp) y) #s(literal -1 binary64))
(/.f64 (*.f64 (neg.f64 y) #s(literal 1 binary64)) esp)
(/.f64 (*.f64 #s(literal -1 binary64) y) esp)
(/.f64 (/.f64 #s(literal -1 binary64) esp) (/.f64 #s(literal 1 binary64) y))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 esp) y) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 esp y) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y))
(/.f64 #s(literal -1 binary64) (/.f64 esp y))
(/.f64 (neg.f64 y) (neg.f64 (neg.f64 esp)))
(/.f64 (neg.f64 y) esp)
(/.f64 y (neg.f64 esp))
(neg.f64 (/.f64 y esp))
(.f64 (sqrt.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sqrt.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(pow.f64 (.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) #s(literal 1/2 binary64))
(sqrt.f64 (.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(fabs.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(fabs.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))
(neg.f64 (-.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))
(-.f64 phi0 (neg.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
(-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(+.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) phi0)
(+.f64 phi0 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(neg.f64 (-.f64 (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0)) (*.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp)))))
(neg.f64 (sin.f64 (-.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)))
(sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0)))
(+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (-.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)) (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0))))
(+.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (.f64 (neg.f64 (cos.f64 phi0)) (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
(+.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (neg.f64 (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0))))
(+.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (.f64 (cos.f64 phi0) (sin.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(neg.f64 (-.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) phi0))
(-.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (neg.f64 phi0))
(-.f64 phi0 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)
(+.f64 phi0 (neg.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
(+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (.f64 (neg.f64 (cos.f64 phi0)) (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (neg.f64 (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (.f64 (cos.f64 phi0) (sin.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (+.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)) (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0))))
(+.f64 (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0)) (*.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))))
(+.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0)))
(.f64 (.f64 #s(literal 2 binary64) (sin.f64 (.f64 (-.f64 phi0 (-.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 1/2 binary64)))) (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) phi0) #s(literal 1/2 binary64))))
(.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) phi0) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 phi0 (-.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (.f64 (sin.f64 (.f64 (-.f64 phi0 (-.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 1/2 binary64))) (cos.f64 (/.f64 (-.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0) (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)))))
(.f64 #s(literal 2 binary64) (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) phi0) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 phi0 (-.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 1/2 binary64)))))
(neg.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))))))
(-.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp)))) (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0)))
(-.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (neg.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(-.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (neg.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (-.f64 (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0)) (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (+.f64 (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0)) (neg.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)))))
(+.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp)))) (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0)))
(+.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) phi0) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 phi0 (-.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 1/2 binary64)))) (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) phi0) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 phi0 (-.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 1/2 binary64)))))
(+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))))
(+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (neg.f64 (neg.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)))))
(+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)))
(+.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (+.f64 (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))) #s(literal -1/2 binary64))
(*.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp)))
(.f64 (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (*.f64 (PI.f64) #s(literal 0 binary64))))) #s(literal 1/2 binary64))
(.f64 (+.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 phi0 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 phi0))
(.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 1/2 binary64))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) phi0) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 phi0 (-.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) phi0) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 phi0 (-.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(.f64 (sin.f64 phi0) (cos.f64 (neg.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(*.f64 (sin.f64 phi0) (sin.f64 (/.f64 (neg.f64 y) esp)))
(*.f64 (sin.f64 (/.f64 y esp)) (neg.f64 (sin.f64 phi0)))
(.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)) (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 (PI.f64) #s(literal 0 binary64))) phi0)) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (neg.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))))))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(neg.f64 (.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal -2 binary64)))
(neg.f64 (/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))))) #s(literal 2 binary64)))
(neg.f64 (*.f64 (sin.f64 phi0) (sin.f64 (/.f64 y esp))))
(-.f64 (/.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) #s(literal 2 binary64)))
(-.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (neg.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64))))
(-.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (/.f64 (neg.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 2 binary64)))
(+.f64 (.f64 (sin.f64 phi0) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp)))) (.f64 (sin.f64 phi0) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(+.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp))) (sin.f64 phi0)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (sin.f64 phi0)))
(+.f64 (/.f64 (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))
(+.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)) (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (neg.f64 esp)) (neg.f64 y)) (neg.f64 esp))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) esp) y) esp)
(neg.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))
(-.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 (neg.f64 y) esp))
(+.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(neg.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(neg.f64 (cos.f64 (/.f64 y esp)))
(sin.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))
(-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 y esp)))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (.f64 (PI.f64) #s(literal 0 binary64)))))) #s(literal 1/2 binary64))
(*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0))
(*.f64 (cos.f64 phi0) (neg.f64 (cos.f64 (/.f64 y esp))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (fabs.f64 phi0))) (sin.f64 (+.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (fabs.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) (neg.f64 phi0)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) phi0)) (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))))))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64)))))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))) #s(literal 2 binary64)))
(+.f64 (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))))) (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0))))
(+.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(neg.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (neg.f64 (cos.f64 (/.f64 y esp))))))
(neg.f64 (sin.f64 (neg.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))))
(neg.f64 (sin.f64 (/.f64 y esp)))
(sin.f64 (+.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (/.f64 y esp) (PI.f64)))
(sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))
(sin.f64 (/.f64 (neg.f64 y) esp))
(-.f64 (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (cos.f64 (.f64 (PI.f64) #s(literal 0 binary64)))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp))))
(-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))))
(-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp))) (.f64 (neg.f64 (sin.f64 (/.f64 (neg.f64 y) esp))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
(cos.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(cos.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(cos.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (neg.f64 (sin.f64 (/.f64 (neg.f64 y) esp))) (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (neg.f64 (cos.f64 (/.f64 y esp)))) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))))
(.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))))))) #s(literal -1/2 binary64))
(*.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp)))
(.f64 (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (*.f64 (PI.f64) #s(literal 0 binary64))))) #s(literal 1/2 binary64))
(.f64 (+.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 phi0 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 phi0))
(.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 1/2 binary64))
(.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) phi0) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 phi0 (-.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (.f64 (-.f64 (-.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) phi0) #s(literal 1/2 binary64))) (sin.f64 (.f64 (-.f64 phi0 (-.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(.f64 (sin.f64 phi0) (cos.f64 (neg.f64 (neg.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(*.f64 (sin.f64 phi0) (sin.f64 (/.f64 (neg.f64 y) esp)))
(*.f64 (sin.f64 (/.f64 y esp)) (neg.f64 (sin.f64 phi0)))
(.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(/.f64 (.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)) (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 (PI.f64) #s(literal 0 binary64))) phi0)) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (neg.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))))))
(/.f64 (-.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))
(neg.f64 (.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal -2 binary64)))
(neg.f64 (/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))))) #s(literal 2 binary64)))
(neg.f64 (*.f64 (sin.f64 phi0) (sin.f64 (/.f64 y esp))))
(-.f64 (/.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) #s(literal 2 binary64)))
(-.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (neg.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64))))
(-.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (/.f64 (neg.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (*.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0))) #s(literal 2 binary64)))
(+.f64 (.f64 (sin.f64 phi0) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp)))) (.f64 (sin.f64 phi0) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp)))))
(+.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 0 binary64))) (cos.f64 (/.f64 y esp))) (sin.f64 phi0)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (/.f64 (neg.f64 y) esp))) (sin.f64 phi0)))
(+.f64 (/.f64 (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 2 binary64)))
(+.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)) (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64))))) (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64)))))))) #s(literal 4 binary64))
(neg.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) phi0)))
(sin.f64 (-.f64 phi0 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (.f64 (neg.f64 (neg.f64 (cos.f64 phi0))) (neg.f64 (cos.f64 (/.f64 y esp)))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (neg.f64 (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp))))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0)))
(+.f64 (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))))
(+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (+.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp))))))
(+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (-.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0))))
(+.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(atan2.f64 g (sin.f64 (-.f64 phi0 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64))))) (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64)))))))) #s(literal 4 binary64))
(neg.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) phi0)))
(sin.f64 (-.f64 phi0 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (.f64 (neg.f64 (neg.f64 (cos.f64 phi0))) (neg.f64 (cos.f64 (/.f64 y esp)))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (neg.f64 (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp))))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0)))
(+.f64 (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))))
(+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (+.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp))))))
(+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (-.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0))))
(+.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(atan2.f64 g (sin.f64 (-.f64 phi0 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64))))) (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (-.f64 (cos.f64 (+.f64 (-.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64)))) (cos.f64 (-.f64 (+.f64 phi0 (/.f64 (neg.f64 y) esp)) (.f64 (PI.f64) #s(literal 0 binary64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (neg.f64 phi0) (-.f64 (/.f64 (neg.f64 y) esp) (*.f64 (PI.f64) #s(literal 0 binary64)))))))) #s(literal 4 binary64))
(neg.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)) phi0)))
(sin.f64 (-.f64 phi0 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (.f64 (neg.f64 (neg.f64 (cos.f64 phi0))) (neg.f64 (cos.f64 (/.f64 y esp)))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (neg.f64 (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp))))))
(-.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0)))
(+.f64 (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))) (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))))
(+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (+.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp))))))
(+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (-.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 (/.f64 y esp))) (cos.f64 phi0))))
(+.f64 (.f64 (neg.f64 (sin.f64 phi0)) (sin.f64 (/.f64 y esp))) (.f64 (neg.f64 (cos.f64 phi0)) (neg.f64 (cos.f64 (/.f64 y esp)))))
(atan2.f64 g (sin.f64 (-.f64 phi0 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))

eval84.0ms (3.4%)

Memory: 5.8MiB live, 66.6MiB allocated; 6ms collecting garbage
Compiler: Compiled 52 689 to 5 627 computations (89.3% saved)

prune29.0ms (1.2%)

Memory

-6.4MiB live, 33.8MiB allocated; 1ms collecting garbage

Pruning

31 alts after pruning (23 fresh and 8 done)

	Pruned	Kept	Total
New	633	14	647
Fresh	4	9	13
Picked	3	2	5
Done	1	6	7
Total	641	31	672

Accuracy

79.6%

Counts

672 → 31

Alt Table

Click to see full alt table

Status	Accuracy	Program
	67.0%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) #s(literal 0 binary64))) (atan2.f64 g (/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) #s(literal 0 binary64))
	64.7%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
	66.6%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (-.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)) (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0)))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 (+.f64 (+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (-.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)) (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0)))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	65.7%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (/.f64 y esp))) (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (/.f64 y esp)))) #s(literal 2 binary64)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (/.f64 y esp))) (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (/.f64 y esp)))) #s(literal 2 binary64)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
	74.4%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0))))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0))))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
	69.0%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	68.0%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	68.7%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	67.8%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	66.7%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 phi0)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 phi0)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	75.7%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
	76.9%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (+.f64 (/.f64 y esp) (PI.f64)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (+.f64 (/.f64 y esp) (PI.f64)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
✓	76.7%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
	75.8%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal 0 binary64))
	65.5%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0)))) #s(literal 2 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0)))) #s(literal 2 binary64)))) #s(literal 0 binary64))
	65.5%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
	65.0%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
✓	74.6%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
	64.1%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))
	74.6%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (+.f64 (.f64 (cos.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (sin.f64 (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (+.f64 (.f64 (cos.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (sin.f64 (/.f64 y esp))))) #s(literal 0 binary64))
	66.7%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
	66.5%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
✓	65.6%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
✓	66.1%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
	59.5%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
	66.5%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) esp) y) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) esp) y) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
	67.2%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 0 binary64))
✓	63.3%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))
✓	74.3%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))
✓	74.2%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))
✓	74.3%	(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))

Compiler

Compiled 1 815 to 352 computations (80.6% saved)

regimes309.0ms (12.5%)

Memory

-1.8MiB live, 192.9MiB allocated; 9ms collecting garbage

Counts

1 → 1

10 → 1

13 → 2

14 → 2

18 → 3

21 → 1

24 → 1

51 → 1

Calls

Call 1

Inputs

(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))

Outputs

(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))

Call 2

Inputs
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) esp) y) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) esp) y) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))

Outputs
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))

Outputs

(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (*.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (*.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))

Call 3

Inputs
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) esp) y) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) esp) y) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))

Outputs
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))

Outputs

(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (*.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (*.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))

(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (*.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (*.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))

Call 4

Inputs
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) esp) y) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) esp) y) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))

Outputs
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))

Outputs

(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (*.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (*.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))

(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (*.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (*.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))

Call 5

Inputs
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) esp) y) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) esp) y) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))

Outputs
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 0 binary64))

Outputs

(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (*.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (*.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))

(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (*.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (*.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (*.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (*.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))

(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (+.f64 (-.f64 phi0 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (*.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 0 binary64))

Call 6

Inputs
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) esp) y) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) esp) y) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (+.f64 (.f64 (cos.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (sin.f64 (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (+.f64 (.f64 (cos.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (sin.f64 (/.f64 y esp))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))))) #s(literal 0 binary64))

Outputs
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))

Outputs

(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi0)) (*.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (neg.f64 y) esp) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi0)) (*.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))

Call 7

Inputs
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) esp) y) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) esp) y) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (+.f64 (.f64 (cos.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (sin.f64 (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (+.f64 (.f64 (cos.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (sin.f64 (/.f64 y esp))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))

Outputs
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal 0 binary64))

Outputs

(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (*.f64 (sin.f64 phi0) (cos.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (*.f64 (cos.f64 phi0) (sin.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (*.f64 (sin.f64 phi0) (cos.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (*.f64 (cos.f64 phi0) (sin.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal 0 binary64))

Call 8

Inputs
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (.f64 (/.f64 #s(literal 1 binary64) esp) y)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (/.f64 (+.f64 (.f64 esp phi0) y) esp))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (-.f64 (PI.f64) (+.f64 (-.f64 phi0 (PI.f64)) (/.f64 y esp))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (PI.f64))) (PI.f64)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) phi0) (.f64 #s(literal -1/2 binary64) (PI.f64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) esp) y) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) esp) y) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) esp) (+.f64 (.f64 esp phi0) y)) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 esp y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (-.f64 phi0 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))) (atan2.f64 g (sin.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) esp) (/.f64 #s(literal 1 binary64) y)) phi0) (.f64 (PI.f64) #s(literal -1/2 binary64))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (-.f64 (PI.f64) (/.f64 y esp)) phi0))) (.f64 (sin.f64 (-.f64 (+.f64 (/.f64 y esp) phi0) (PI.f64))) #s(literal 0 binary64)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (cos.f64 (/.f64 y esp)) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 (+.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi0)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (+.f64 (.f64 (cos.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (sin.f64 (/.f64 y esp))))) #s(literal 0 binary64))) (atan2.f64 g (+.f64 (.f64 (cos.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (cos.f64 (/.f64 y esp))) (.f64 (sin.f64 (-.f64 (PI.f64) (-.f64 phi0 (PI.f64)))) (sin.f64 (/.f64 y esp))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))))) #s(literal 0 binary64))) (atan2.f64 g (+.f64 (.f64 (cos.f64 (/.f64 y esp)) (cos.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))) (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 (-.f64 (-.f64 phi0 (PI.f64)) (PI.f64)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (+.f64 (/.f64 y esp) (PI.f64)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (+.f64 (/.f64 y esp) (PI.f64)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 phi0)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 (/.f64 (neg.f64 y) esp)) (sin.f64 phi0)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0)) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (.f64 (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0)) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0))))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 (/.f64 y esp) phi0)) (cos.f64 (+.f64 (/.f64 y esp) phi0))))) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 phi0 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 phi0 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (/.f64 y esp))) (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (/.f64 y esp)))) #s(literal 2 binary64)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (/.f64 y esp))) (sin.f64 (+.f64 (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))) (/.f64 y esp)))) #s(literal 2 binary64)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 phi0 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 phi0 (-.f64 (.f64 #s(literal -1/2 binary64) (PI.f64)) (/.f64 y esp))))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) #s(literal 1/2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 esp) y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))))) (sin.f64 (+.f64 phi0 (fabs.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal 2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp))))) (sin.f64 (+.f64 phi0 (fabs.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))))) #s(literal 2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0)))) #s(literal 2 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 y esp)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0)))) #s(literal 2 binary64)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)) (.f64 (sin.f64 (/.f64 y esp)) (sin.f64 phi0)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0)))) #s(literal 2 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0))) (sin.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi0)))) #s(literal 2 binary64)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (cos.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))) (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 phi0 (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 2 binary64)))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0)) (cos.f64 (+.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0))) #s(literal 2 binary64)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0)) (cos.f64 (+.f64 (-.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))) (.f64 #s(literal -1/2 binary64) (PI.f64))) phi0))) #s(literal 2 binary64)) (.f64 (sin.f64 (+.f64 (neg.f64 phi0) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) #s(literal 0 binary64))) (atan2.f64 g (/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 (-.f64 phi0 (/.f64 y esp)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (/.f64 y esp) phi0))) (-.f64 (cos.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) phi0) (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64))) #s(literal 0 binary64))
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (/.f64 (+.f64 (+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (-.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)) (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0)))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (/.f64 (+.f64 (+.f64 (.f64 (sin.f64 (-.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))))) #s(literal 1/2 binary64)) (-.f64 (.f64 (sin.f64 (+.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64)))) phi0)) #s(literal 1/2 binary64)) (.f64 (sin.f64 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi0)))) (sin.f64 (+.f64 phi0 (fabs.f64 (-.f64 (/.f64 y esp) (.f64 #s(literal -1/2 binary64) (PI.f64))))))) #s(literal 2 binary64)) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 (neg.f64 y) esp) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))

Outputs
(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (+.f64 (/.f64 y esp) (PI.f64)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (.f64 (sin.f64 phi0) (sin.f64 (+.f64 (/.f64 y esp) (PI.f64)))) (.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))

Outputs

(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (-.f64 (*.f64 (sin.f64 phi0) (sin.f64 (+.f64 (/.f64 y esp) (PI.f64)))) (*.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))) (atan2.f64 g (-.f64 (*.f64 (sin.f64 phi0) (sin.f64 (+.f64 (/.f64 y esp) (PI.f64)))) (*.f64 (cos.f64 phi0) (sin.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 esp y)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) #s(literal 0 binary64))

Calls

53 calls:

14.0ms	phi0
12.0ms	esp
12.0ms	(cos.f64 (+.f64 phi0 (/.f64 y esp)))
12.0ms	g
12.0ms	y

Results

Accuracy	Segments	Branch
74.2%	1	`y`
74.2%	1	`(/.f64 y esp)`
74.2%	1	`esp`
74.2%	1	`phi0`
74.2%	1	`g`
74.2%	1	`(+.f64 phi0 (/.f64 y esp))`
74.2%	1	`(cos.f64 (+.f64 phi0 (/.f64 y esp)))`
74.2%	1	`(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))`
74.3%	1	`(+.f64 phi0 (/.f64 y esp))`
74.3%	1	`(cos.f64 (+.f64 phi0 (/.f64 y esp)))`
74.3%	1	`(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))`
74.3%	1	`(/.f64 y esp)`
74.3%	1	`y`
74.3%	1	`phi0`
74.3%	1	`g`
74.3%	1	`(+.f64 phi0 (/.f64 y esp))`
74.3%	1	`(cos.f64 (+.f64 phi0 (/.f64 y esp)))`
74.3%	1	`(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))`
74.3%	1	`esp`
76.0%	2	`(/.f64 y esp)`
76.3%	2	`(/.f64 y esp)`
78.1%	3	`(/.f64 y esp)`
74.6%	1	`(+.f64 phi0 (/.f64 y esp))`
74.6%	1	`(cos.f64 (+.f64 phi0 (/.f64 y esp)))`
74.6%	1	`(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))`
74.6%	1	`y`
74.6%	1	`esp`
74.6%	1	`phi0`
74.6%	1	`g`
75.7%	1	`esp`
75.7%	1	`(/.f64 y esp)`
75.7%	1	`(+.f64 phi0 (/.f64 y esp))`
75.7%	1	`(cos.f64 (+.f64 phi0 (/.f64 y esp)))`
75.7%	1	`(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))`
75.7%	1	`phi0`
75.7%	1	`g`
75.7%	1	`y`
75.8%	1	`(/.f64 y esp)`
75.8%	1	`y`
75.8%	1	`g`
75.8%	1	`(+.f64 phi0 (/.f64 y esp))`
75.8%	1	`(cos.f64 (+.f64 phi0 (/.f64 y esp)))`
75.8%	1	`(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))`
75.8%	1	`esp`
75.8%	1	`phi0`
76.9%	1	`(/.f64 y esp)`
76.9%	1	`(+.f64 phi0 (/.f64 y esp))`
76.9%	1	`(cos.f64 (+.f64 phi0 (/.f64 y esp)))`
76.9%	1	`(if.f64 (or (>.f64 (fabs.f64 g) #s(literal 0 binary64)) (>.f64 (fabs.f64 (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))) (atan2.f64 g (cos.f64 (+.f64 phi0 (/.f64 y esp)))) #s(literal 0 binary64))`
76.9%	1	`y`
76.9%	1	`esp`
76.9%	1	`phi0`
76.9%	1	`g`

Compiler

Compiled 3 552 to 743 computations (79.1% saved)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	3559003773.3591948	10608100324.214046
0.0ms	-1.1814671226235836e+50	-4.498423011359263e+45

Compiler

Compiled 29 to 21 computations (27.6% saved)

bsearch0.0ms (0.0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-1.1814671226235836e+50	-4.498423011359263e+45

Compiler

Compiled 29 to 21 computations (27.6% saved)

bsearch0.0ms (0.0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-1.1814671226235836e+50	-4.498423011359263e+45

Compiler

Compiled 29 to 21 computations (27.6% saved)

derivations282.0ms (11.4%)

Memory

3.7MiB live, 11.4MiB allocated; 0ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 519 to 122 computations (76.5% saved)

preprocess77.0ms (3.1%)

Memory: 4.1MiB live, 90.7MiB allocated; 5ms collecting garbage
Compiler: Compiled 543 to 137 computations (74.8% saved)

end0.0ms (0.0%)

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

start0.0ms (0.0%)

analyze96.0ms (3.9%)

sample1.0s (41.6%)

preprocess40.0ms (1.6%)

rewrite57.0ms (2.3%)

eval8.0ms (0.3%)

prune4.0ms (0.2%)

rewrite95.0ms (3.9%)

eval35.0ms (1.4%)

prune11.0ms (0.5%)

rewrite111.0ms (4.5%)

eval67.0ms (2.7%)

prune17.0ms (0.7%)

rewrite122.0ms (4.9%)

eval84.0ms (3.4%)

prune29.0ms (1.2%)

regimes309.0ms (12.5%)

bsearch1.0ms (0.0%)

bsearch0.0ms (0.0%)

bsearch0.0ms (0.0%)

derivations282.0ms (11.4%)

preprocess77.0ms (3.1%)

end0.0ms (0.0%)

Profiling